From 0c8d01507ea988d9619683ff33c0b1127ca4264d Mon Sep 17 00:00:00 2001
From: hjunes <hjunes>
Date: Mon, 15 Sep 2003 22:22:36 +0000
Subject: [PATCH]        * buildscripts/lilypond.words.py: add all slur types,
 suppose        everything is postfixed by dropping `-' -marks.

---
 ChangeLog                      |  6 ++++++
 buildscripts/lilypond.words.py | 14 ++++++++------
 2 files changed, 14 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 9526998150..24e46c852a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2003-09-16  Heikki Junes  <hjunes@cc.hut.fi>
+
+	* buildscripts/lilypond.words.py: add all slur types to Emacs
+	insertion menu, suppose everything is postfixed by dropping 
+	unnecessary `-' -marks.
+
 2003-09-15  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
 	* lily/stem.cc (get_default_stem_end_position): lengthen stems for
diff --git a/buildscripts/lilypond.words.py b/buildscripts/lilypond.words.py
index 338b65d523..32fcbf2f4d 100755
--- a/buildscripts/lilypond.words.py
+++ b/buildscripts/lilypond.words.py
@@ -99,17 +99,19 @@ else:
 
 # the menu in lilypond-mode.el
 for line in [
-'-/( - _ -/) -',
-'-/[ - _ -/] -',
-'-///( - _ -///) -',
+'/( - _ /) -',
+'/[ - _ /] -',
+'< - _ > -',
+'<< - _ >> -',
+'///( - _ ///) -',
 '///[ - _ ///] -',
-'-///< - _ -///! -',
-'-///> - _ -///! -',
+'///< - _ ///! -',
+'///> - _ ///! -',
 '//center - / << _ >> -',
 '//column - / << _ >> -',
 '//context/ Staff/ = - % { _ } -',
 '//context/ Voice/ = - % { _ } -',
-'-//markup - { _ } -',
+'//markup - { _ } -',
 '//notes - { _ } -',
 '//relative - % { _ } -',
 '//score - { //n /? //simultaneous { //n _ //n } /! //n //paper {  } //n /? //midi {  } //n /! } //n -',
-- 
2.39.5