From 573e78754882c775e2ab422ac763e634adbe9e66 Mon Sep 17 00:00:00 2001
From: Heikki Junes <heikki.junes@hut.fi>
Date: Fri, 2 May 2003 23:18:17 +0000
Subject: [PATCH] Fix Xemacs. Add words.

---
 ChangeLog        |  7 +++++++
 lilypond-mode.el |  4 ++--
 lilypond.words   | 10 ++++++++++
 3 files changed, 19 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 9dee6cc915..ec4168c7e4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2003-05-03  Heikki Junes  <hjunes@cc.hut.fi>
+
+	* lilypond-mode.el: Fix XEmacs: 
+	changed [S-iso-lefttab] to [(shift iso-lefttab)].
+	
+	* lilypond.words: Add few words from input/*/*.ly.
+
 2003-05-02  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
 	* input/mutopia/J.S.Bach/baerenreiter-sarabande.ly: corrections
diff --git a/lilypond-mode.el b/lilypond-mode.el
index a5706faadd..d679d8aa47 100644
--- a/lilypond-mode.el
+++ b/lilypond-mode.el
@@ -20,7 +20,7 @@
 ;;; for installing instructions.
 
 ;;; TODO:
-;;;    * XEmacs, broken ?
+;;;    * XEmacs-menus, broken ?
 ;;;    * parenthesis matching
 
 (require 'easymenu)
@@ -679,7 +679,7 @@ command."
   (define-key LilyPond-mode-map ")" 'LilyPond-electric-close-paren) ; urgh
   (define-key LilyPond-mode-map ">" 'LilyPond-electric-close-paren) ; argh
   (define-key LilyPond-mode-map "}" 'LilyPond-electric-close-paren) ; ..rgh
-  (define-key LilyPond-mode-map [S-iso-lefttab] 'LilyPond-autocompletion)
+  (define-key LilyPond-mode-map [(shift iso-lefttab)] 'LilyPond-autocompletion)
   (define-key LilyPond-mode-map "\C-c\t" 'LilyPond-info-index-search)
   )
 
diff --git a/lilypond.words b/lilypond.words
index 27e36e6afc..4403ea8f98 100644
--- a/lilypond.words
+++ b/lilypond.words
@@ -11,6 +11,7 @@ alto
 Ambitus_engraver
 \\apply
 \\applycontext
+\\applyoutput
 \\archiGroup
 \\arpeggio
 \\autoBeamOff
@@ -19,6 +20,9 @@ autoBeamSettings
 \\autochange
 \\bar
 baritone
+Bar
+Bar_engraver
+Bar_number_engraver
 BarLine 
 BarNumber
 \\BarNumberingContext
@@ -52,6 +56,7 @@ ChordNames
 \\circulus
 \\clef
 \\clipping
+Cluster
 \\cm
 \\coda
 \\column
@@ -85,6 +90,7 @@ Dots
 \\dynamicBoth
 \\dynamicDown
 DynamicText
+DynamicsLineSpanner
 \\dynamicUp
 \\EasyNotation
 \\eccentric
@@ -95,6 +101,7 @@ DynamicText
 \\endcresc
 \\endHorizScript
 \\endincipit
+Engraver_group_engraver
 \\ex
 \\extreme
 \\f
@@ -107,6 +114,7 @@ F
 \\ffff
 FiguredBass
 \\FiguredBassContext
+Fingering
 \\figures
 \\flageolet
 fold
@@ -152,6 +160,7 @@ InnerChoirStaff
 \\InnerStaffContext
 InnerStaffGroup
 \\InnerStaffGroupContext
+Instrument_name_engraver
 \\inversions
 \\invisible
 \\ionian
@@ -221,6 +230,7 @@ mezzosoprano
 \\noResetKey
 \\normalkey
 \\normalsize
+NoteColumn
 NoteHead
 \\notenames
 NoteNames
-- 
2.39.5