Generated by hanwen@cs.uu.nl,
From = lilypond-1.7.7, To = lilypond-1.7.8

usage 

    cd lilypond-source-dir; patch -E -p1 < lilypond-1.7.7-1.7.8.diff

Patches do not contain automatically generated files 
or (urg) empty directories, 
i.e., you should run

	./autogen.sh
	./configure [your options.]

	
diff -purN ../lilypond-1.7.7/aclocal.m4 ./aclocal.m4
--- ../lilypond-1.7.7/aclocal.m4	2002-11-14 11:29:14.000000000 +0100
+++ ./aclocal.m4	2002-11-19 11:51:55.000000000 +0100
@@ -88,15 +88,14 @@ AC_DEFUN(STEPMAKE_CHECK_SEARCH_RESULT, [
 # add entry to missing-list ($2, one of 'OPTIONAL', 'REQUIRED').
 AC_DEFUN(STEPMAKE_CHECK_VERSION, [
     r="`eval echo '$'"$1"`"
-    AC_MSG_CHECKING("$r version")
-    #exe=`STEPMAKE_GET_EXECUTABLE($r)`
+    AC_MSG_CHECKING([$r version])
     exe=`STEPMAKE_GET_EXECUTABLE($r)`
     ver=`STEPMAKE_GET_VERSION($exe)`
     num=`STEPMAKE_NUMERIC_VERSION($ver)`
     req=`STEPMAKE_NUMERIC_VERSION($3)`
-    AC_MSG_RESULT("$ver")
+    AC_MSG_RESULT([$ver])
     if test "$num" -lt "$req"; then
-	STEPMAKE_ADD_ENTRY($2, "$r $3 (installed: $ver)")
+	STEPMAKE_ADD_ENTRY($2, ["$r $3 (installed: $ver)"])
     fi
 ])
 
@@ -207,7 +206,7 @@ AC_DEFUN(STEPMAKE_COMPILE, [
 ])
 
 AC_DEFUN(STEPMAKE_CXX, [
-    AC_LANG_CPLUSPLUS
+    AC_LANG([C++])
     AC_PROG_CXX
     STEPMAKE_OPTIONAL_REQUIRED(CXX, c++, $1)
 
@@ -225,12 +224,10 @@ AC_DEFUN(STEPMAKE_CXX, [
 AC_DEFUN(STEPMAKE_CXXTEMPLATE, [
     AC_CACHE_CHECK([whether explicit instantiation is needed],
 	lily_cv_need_explicit_instantiation,
-	AC_TRY_LINK([
+	AC_LINK_IFELSE([AC_LANG_PROGRAM([[
     template <class T> struct foo { static int baz; };
     template <class T> int foo<T>::baz = 1;
-    ], [ return foo<int>::baz; ],
-	    lily_cv_need_explicit_instantiation=no,
-	    lily_cv_need_explicit_instantiation=yes))
+    ]], [[ return foo<int>::baz; ]])],[lily_cv_need_explicit_instantiation=no],[lily_cv_need_explicit_instantiation=yes]))
     if test x"$lily_cv_need_explicit_instantiation"x = x"yes"x; then
 	AC_DEFINE(NEED_EXPLICIT_INSTANTIATION)
     fi
@@ -248,7 +245,7 @@ AC_DEFUN(STEPMAKE_DATADIR, [
     
     package_datadir=$datadir/$package
     local_package_datadir=$package_datadir/$FULL_VERSION
-    build_package_datadir=$builddir/share/$package
+    build_package_datadir=$ugh_ugh_autoconf250_builddir/share/$package
     
     DATADIR=`echo ${datadir} | sed "s!\\\${prefix}!$presome!"`
     PACKAGE_DATADIR=`echo ${package_datadir} | sed "s!\\\${prefix}!$presome!"`
@@ -259,10 +256,10 @@ AC_DEFUN(STEPMAKE_DATADIR, [
     AC_SUBST(package_datadir)
     AC_SUBST(local_package_datadir)
     AC_SUBST(build_package_datadir)
-    AC_DEFINE_UNQUOTED(DATADIR, "${DATADIR}")
-    AC_DEFINE_UNQUOTED(PACKAGE_DATADIR, "${PACKAGE_DATADIR}")
-    AC_DEFINE_UNQUOTED(LOCAL_PACKAGE_DATADIR, "${LOCAL_PACKAGE_DATADIR}")
-    AC_DEFINE_UNQUOTED(BUILD_PACKAGE_DATADIR, "${BUILD_PACKAGE_DATADIR}")
+    AC_DEFINE_UNQUOTED(DATADIR, ["${DATADIR}"])
+    AC_DEFINE_UNQUOTED(PACKAGE_DATADIR, ["${PACKAGE_DATADIR}"])
+    AC_DEFINE_UNQUOTED(LOCAL_PACKAGE_DATADIR, ["${LOCAL_PACKAGE_DATADIR}"])
+    AC_DEFINE_UNQUOTED(BUILD_PACKAGE_DATADIR, ["${BUILD_PACKAGE_DATADIR}"])
 ])
 
 
@@ -270,7 +267,8 @@ AC_DEFUN(STEPMAKE_END, [
     AC_SUBST(OPTIONAL)
     AC_SUBST(REQUIRED)
     
-    AC_OUTPUT($CONFIGFILE.make:config.make.in)
+    AC_CONFIG_FILES([$CONFIGFILE.make:config.make.in])
+AC_OUTPUT
 
     
     if test -n "$OPTIONAL"; then
@@ -313,7 +311,7 @@ AC_DEFUN(STEPMAKE_FLEX, [
     # AC_PROG_LEX
     # urg: automake 1.3: hope this doesn't break 1.2 ac_cv_pro_lex_root hack...
 
-    # AC_DECL_YYTEXT
+    # AC_PROG_LEX()
     # ugh, ugh
     ac_cv_prog_lex_root=lex.yy
     STEPMAKE_PROGS(FLEX, flex, $1)
@@ -321,7 +319,7 @@ AC_DEFUN(STEPMAKE_FLEX, [
 
 
 AC_DEFUN(STEPMAKE_FLEXLEXER, [
-    AC_HAVE_HEADERS(FlexLexer.h, true, false)
+    AC_CHECK_HEADERS([FlexLexer.h],[true],[false])
     if test $? -ne 0; then
 	warn='FlexLexer.h (flex package)'
 	STEPMAKE_ADD_ENTRY($1, $warn)
@@ -347,7 +345,7 @@ AC_DEFUN(STEPMAKE_GETTEXT, [
     LOCALEDIR=`echo ${localedir} | sed "s!\\\${prefix}!$presome!"`
     
     AC_SUBST(localedir)
-    AC_DEFINE_UNQUOTED(LOCALEDIR, "${LOCALEDIR}")
+    AC_DEFINE_UNQUOTED(LOCALEDIR, ["${LOCALEDIR}"])
     AC_CHECK_LIB(intl, gettext)
     AC_CHECK_FUNCS(gettext)
 ])
@@ -379,10 +377,10 @@ AC_DEFUN(STEPMAKE_GUILE, [
 AC_DEFUN([STEPMAKE_GUILE_FLAGS], [
     exe=`STEPMAKE_GET_EXECUTABLE($guile_config)`
     if test -x $exe; then
-	AC_MSG_CHECKING("guile compile flags")
+	AC_MSG_CHECKING([guile compile flags])
 	GUILE_CFLAGS="`$guile_config compile`"
 	AC_MSG_RESULT($GUILE_CFLAGS)
-	AC_MSG_CHECKING("guile link flags")
+	AC_MSG_CHECKING([guile link flags])
 	GUILE_LDFLAGS="`$guile_config link`"
 	AC_MSG_RESULT($GUILE_LDFLAGS)
     fi
@@ -393,12 +391,12 @@ AC_DEFUN([STEPMAKE_GUILE_FLAGS], [
 
 AC_DEFUN(STEPMAKE_GUILE_DEVEL, [
     ## First, let's just see if we can find Guile at all.
-    AC_MSG_CHECKING("for guile-config")
+    AC_MSG_CHECKING([for guile-config])
     for guile_config in guile-config $target-guile-config $build-guile-config; do
-	AC_MSG_RESULT("$guile_config")
+	AC_MSG_RESULT([$guile_config])
 	if ! $guile_config --version > /dev/null 2>&1 ; then
-	    AC_MSG_WARN("cannot execute $guile_config")
-	    AC_MSG_CHECKING("if we are cross compiling")
+	    AC_MSG_WARN([cannot execute $guile_config])
+	    AC_MSG_CHECKING([if we are cross compiling])
 	    GUILE_CONFIG='echo no guile-config'
 	else
 	    GUILE_CONFIG=$guile_config
@@ -443,6 +441,7 @@ AC_DEFUN(STEPMAKE_GXX, [
 
 AC_DEFUN(STEPMAKE_INIT, [
 
+    AC_PREREQ(2.50)
     . $srcdir/VERSION
     FULL_VERSION=$MAJOR_VERSION.$MINOR_VERSION.$PATCH_LEVEL
     if test x$MY_PATCH_LEVEL != x; then
@@ -478,32 +477,33 @@ AC_DEFUN(STEPMAKE_INIT, [
 
 	AC_MSG_CHECKING(builddir)
 
-	builddir="`pwd`"
-
+	ugh_ugh_autoconf250_builddir="`pwd`"
+	
 	if test "$srcdir" = "."; then
 	    srcdir_build=yes
 	else
 	    srcdir_build=no
-	    package_builddir="`dirname $builddir`"
+	    package_builddir="`dirname $ugh_ugh_autoconf250_builddir`"
 	    package_srcdir="`dirname  $srcdir`"
 	fi
-	AC_MSG_RESULT($builddir)
+	AC_MSG_RESULT($ugh_ugh_autoconf250_builddir)
 
 	(cd stepmake 2>/dev/null || mkdir stepmake)
 	(cd stepmake; rm -f bin; ln -s ../$srcdir/bin .)
-	AC_CONFIG_AUX_DIR(bin)
+# only possible with autoconf < 2.50 -- hardcoded in configure.in
+#	AC_CONFIG_AUX_DIR(bin)
 	stepmake=stepmake
     else
         AC_MSG_RESULT($PACKAGE)
 
 	AC_MSG_CHECKING(builddir)
-	builddir="`pwd`"
+	ugh_ugh_autoconf250_builddir="`pwd`"
 	if test "$srcdir" = "."; then
 	    srcdir_build=yes
 	else
 	    srcdir_build=no
 	fi
-	AC_MSG_RESULT($builddir)
+	AC_MSG_RESULT($ugh_ugh_autoconf250_builddir)
 
 	AC_MSG_CHECKING(for stepmake)
 	# Check for installed stepmake
@@ -511,30 +511,23 @@ AC_DEFUN(STEPMAKE_INIT, [
 	    AC_MSG_RESULT($stepmake)
 	else
 	    stepmake="`cd $srcdir/stepmake; pwd`"
-	    AC_MSG_RESULT($srcdir/stepmake  ($datadir/stepmake not found))
+	    AC_MSG_RESULT([$srcdir/stepmake  ($datadir/stepmake not found)])
 	fi
 
-	AC_CONFIG_AUX_DIR(\
-	  $HOME/usr/local/share/stepmake/bin\
-	  $HOME/usr/local/lib/stepmake/bin\
-	  $HOME/usr/share/stepmake/bin\
-	  $HOME/usr/lib/stepmake/bin\
-	  /usr/local/share/stepmake/bin\
-	  /usr/local/lib/stepmake/bin\
-	  /usr/share/stepmake/bin\
-	  /usr/lib/stepmake/bin\
-	  stepmake/bin\
-	  $srcdir/stepmake/bin\
-	)
+# only possible with autoconf < 2.50 -- hardcoded in configure.in
+# 	AC_CONFIG_AUX_DIR(\
+# 	  stepmake/bin\
+# 	  $srcdir/stepmake/bin\
+#	)
     fi
 
-    AC_SUBST(builddir)
+    AC_SUBST(ugh_ugh_autoconf250_builddir)
     AC_SUBST(stepmake)
     AC_SUBST(package)
     AC_SUBST(PACKAGE)
     AC_SUBST(PACKAGE_NAME)
-    AC_DEFINE_UNQUOTED(PACKAGE, "${PACKAGE_NAME}")
-    AC_DEFINE_UNQUOTED(TOPLEVEL_VERSION, "${FULL_VERSION}")
+    AC_DEFINE_UNQUOTED(PACKAGE, ["${PACKAGE_NAME}"])
+    AC_DEFINE_UNQUOTED(TOPLEVEL_VERSION, ["${FULL_VERSION}"])
 
     if test -z "$package_depth"; then
     	package_depth="."
@@ -612,8 +605,8 @@ AC_DEFUN(STEPMAKE_INIT, [
     AC_SUBST(LN)
     AC_SUBST(LN_S)
     AC_SUBST(INSTALL)
-    AC_DEFINE_UNQUOTED(DIRSEP, '${DIRSEP}')
-    AC_DEFINE_UNQUOTED(PATHSEP, '${PATHSEP}')
+    AC_DEFINE_UNQUOTED(DIRSEP, ['${DIRSEP}'])
+    AC_DEFINE_UNQUOTED(PATHSEP, ['${PATHSEP}'])
     AC_SUBST(DIRSEP)
     AC_SUBST(PATHSEP)
     AC_SUBST(ROOTSEP)
@@ -652,7 +645,7 @@ AC_DEFUN(STEPMAKE_KPATHSEA, [
     [kpathsea_b=$with_kpathsea])
 
     if test "$kpathsea_b" != "no"; then	
-	AC_HAVE_HEADERS(kpathsea/kpathsea.h)
+	AC_CHECK_HEADERS([kpathsea/kpathsea.h])
 	AC_CHECK_LIB(kpathsea, kpse_find_file)
 	AC_CHECK_FUNCS(kpse_find_file,,kpathsea_b=no)
 	if test "$kpathsea_b" = "no"; then
@@ -813,7 +806,7 @@ AC_DEFUN(STEPMAKE_PERL, [
 
 
 AC_DEFUN(STEPMAKE_PYTHON_DEVEL, [
-    AC_HAVE_HEADERS(python2.2/Python.h python2.1/Python.h python2.0/Python.h python2/Python.h python/Python.h python1.5/Python.h Python.h, PYTHON_HEADER=yes)
+    AC_CHECK_HEADERS([python2.2/Python.h python2.1/Python.h python2.0/Python.h python2/Python.h python/Python.h python1.5/Python.h Python.h],[PYTHON_HEADER=yes])
     if test -z "$PYTHON_HEADER"; then
 	warn='python.h (python-devel, python-dev or libpython-dev package)'
 	STEPMAKE_ADD_ENTRY($1, $warn)
diff -purN ../lilypond-1.7.7/autogen.sh ./autogen.sh
--- ../lilypond-1.7.7/autogen.sh	2002-07-14 19:11:32.000000000 +0200
+++ ./autogen.sh	2002-11-19 11:52:01.000000000 +0100
@@ -1,7 +1,4 @@
 #!/bin/sh
-# WARNING WARNING WARNING
-# do not edit! this is autogen.sh, generated from stepmake/autogen.sh
-#!/bin/sh
 # Run this to generate configure and initial GNUmakefiles
 
 srcdir=`dirname $0`
@@ -12,23 +9,23 @@ if [ stepmake/autogen.sh -nt autogen.sh 
     exec ./autogen.sh
 fi
 
-# Be paranoid: check for autoconf == 2.13
-# Some setups have both autoconf 2.13 and 2.50 available through
+# Be paranoid: check for autoconf >= 2.50
+# Some setups have both autoconf 2.13 and 2.5x available through
 # a wrapper script: /usr/bin/autoconf.
 # This wrapper may incorrectly autoselect autoconf 2.50, but it
 # advertises itself as autoconf 2.13.
 # If you have such a setup, invoke this script as:
-#   autoconf=autoconf2.13 ./autogen.sh
-for i in autoconf-2.13 autoconf2.13 autoconf  false; do
+#   autoconf=autoconf2.50 ./autogen.sh
+for i in autoconf2.50 autoconf-2.50 autoconf  false; do
   version=`$i --version 2>/dev/null | head -1 | awk '{print $NF}' | awk -F. '{print $1 * 100 + $2}'`
-  if test "0$version" -eq 213; then
+  if test "0$version" -ge 250; then
     autoconf=$i
     break
   fi
 done
 
 if test -z "$autoconf"; then
-    echo "ERROR: Please install autoconf 2.13"
+    echo "ERROR: Please install autoconf 2.50 or newer"
     exit 1
 fi
 
diff -purN ../lilypond-1.7.7/buildscripts/new-chords.py ./buildscripts/new-chords.py
--- ../lilypond-1.7.7/buildscripts/new-chords.py	2002-11-14 15:12:54.000000000 +0100
+++ ./buildscripts/new-chords.py	2002-11-19 11:51:35.000000000 +0100
@@ -10,11 +10,15 @@ import os
 def sub_chord (m):
 	str = m.group(1)
 
+	origstr =  '<%s>' % str
 	if re.search (r'\\\\', str):
-		return '<%s>' % str
+		return origstr
+
+	if re.search (r'\\property', str):
+		return origstr
 
 	if re.match (r'^\s*\)?\s*\\[a-zA-Z]+', str):
-		return '<%s>' % str
+		return origstr
 
 	durs = []
 	def sub_durs (m):
@@ -30,65 +34,67 @@ def sub_chord (m):
 		if dur_str <> d:
 			return '<%s>' % m.group (1)
 
-
+	pslur_strs = ['']
 	dyns = ['']
-	def sub_dyn_end (m):
-		dyns.append (' -\!')
-		return m.group(2)
-
-	str = re.sub (r'(\\!)\s*([a-z]+)', sub_dyn_end, str)
-
 	slur_strs = ['']
-	def sub_slurs(m):
-		if '-)' not in slur_strs:
-			slur_strs.append ( '-)')
-		return m.group(1)
-	def sub_p_slurs(m):
-		if '-\)' not in slur_strs:
-			slur_strs.append ( '-\)')
-		return m.group(1)
-	str = re.sub (r"\)[ ]*([a-z]+)", sub_slurs, str)
-	str = re.sub (r"\\\)[ ]*([a-z]+)", sub_p_slurs, str)
-	def sub_begin_slurs(m):
-		if '-(' not in slur_strs:
-			slur_strs.append ( '-(')
-		return m.group(1)
-	str = re.sub (r"([a-z]+[,'!?0-9 ]*)\(", sub_begin_slurs, str)
-	def sub_begin_p_slurs(m):
-		if '-\(' not in slur_strs:
-			slur_strs.append ( '-\(')
-		return m.group(1)
-
-	str = re.sub (r"([a-z]+[,'!?0-9 ]*)\\\(", sub_begin_p_slurs, str)
-
-	def sub_dyns (m):
-		s = m.group(0)
-		if s == '@STARTCRESC@':
-			slur_strs.append ("-\\<")
-		elif s == '@STARTDECRESC@':
-			slur_strs.append ("-\\>")
-		elif s == r'-?\\!':
-			slur_strs.append ('-\\!')
-		return ''
-		
-	str = re.sub (r'@STARTCRESC@', sub_dyns, str)
-	str = re.sub (r'-?\\!', sub_dyns, str)
-	
-	def sub_articulations (m):
-		a = m.group(1)
-		if a not in slur_strs:
-			slur_strs.append (a)
-		return ''
-	
-	str = re.sub (r"([_^-]\@ACCENT\@)", sub_articulations, str)
-	str = re.sub (r"([_^-]\\[a-z]+)", sub_articulations, str)
-	str = re.sub (r"([_^-][>_.+|^-])", sub_articulations, str)
-	
-	pslur_strs = ['']
-	def sub_pslurs(m):
-		slur_strs.append ( ' -\\)')
-		return m.group(1)
-	str = re.sub (r"\\\)[ ]*([a-z]+)", sub_pslurs, str)
+
+	last_str = ''
+	while last_str <> str:
+	  last_str = str
+	  def sub_dyn_end (m):
+		  dyns.append (' -\!')
+		  return ' ' + m.group(2)
+
+	  str = re.sub (r'(\\!)\s*([a-z]+)', sub_dyn_end, str)
+	  def sub_slurs(m):
+		  if '-)' not in slur_strs:
+			  slur_strs.append ( '-)')
+		  return m.group(1)
+	  def sub_p_slurs(m):
+		  if '-\)' not in slur_strs:
+			  slur_strs.append ( '-\)')
+		  return m.group(1)
+	  str = re.sub (r"\)[ ]*([a-z]+)", sub_slurs, str)
+	  str = re.sub (r"\\\)[ ]*([a-z]+)", sub_p_slurs, str)
+	  def sub_begin_slurs(m):
+		  if '-(' not in slur_strs:
+			  slur_strs.append ( '-(')
+		  return m.group(1)
+	  str = re.sub (r"([a-z]+[,'!?0-9 ]*)\(", sub_begin_slurs, str)
+	  def sub_begin_p_slurs(m):
+		  if '-\(' not in slur_strs:
+			  slur_strs.append ( '-\(')
+		  return m.group(1)
+
+	  str = re.sub (r"([a-z]+[,'!?0-9 ]*)\\\(", sub_begin_p_slurs, str)
+
+	  def sub_dyns (m):
+		  s = m.group(0)
+		  if s == '@STARTCRESC@':
+			  slur_strs.append ("-\\<")
+		  elif s == '@STARTDECRESC@':
+			  slur_strs.append ("-\\>")
+		  elif s == r'-?\\!':
+			  slur_strs.append ('-\\!')
+		  return ''
+
+	  str = re.sub (r'@STARTCRESC@', sub_dyns, str)
+	  str = re.sub (r'-?\\!', sub_dyns, str)
+
+	  def sub_articulations (m):
+		  a = m.group(1)
+		  if a not in slur_strs:
+			  slur_strs.append (a)
+		  return ''
+
+	  str = re.sub (r"([_^-]\@ACCENT\@)", sub_articulations, str)
+	  str = re.sub (r"([_^-]\\[a-z]+)", sub_articulations, str)
+	  str = re.sub (r"([_^-][>_.+|^-])", sub_articulations, str)
+
+	  def sub_pslurs(m):
+		  slur_strs.append ( ' -\\)')
+		  return m.group(1)
+	  str = re.sub (r"\\\)[ ]*([a-z]+)", sub_pslurs, str)
 
 	suffix = string.join (slur_strs, '') + string.join (pslur_strs, '') \
 		 + string.join (dyns, '')
@@ -125,11 +131,12 @@ def sub_chords (str):
 
 	str = re.sub ('<([^?])', r'%s\1' % simstart, str)
 	str = re.sub ('>([^?])', r'%s\1' % simend,  str)
-	str= re.sub ('@STARTCRESC@', r'\\<', str)
-	str= re.sub ('@STARTDECRESC@', r'\\>' ,str)
-	str= re.sub ('@STARTCHORD@', chordstart, str)
-	str= re.sub ('@ENDCHORD@', chordend, str)
-	str= re.sub (r'@ACCENT@', '>', str)
+	str = re.sub ('@STARTCRESC@', r'\\<', str)
+	str = re.sub ('@STARTDECRESC@', r'\\>' ,str)
+	str = re.sub (r'\\context *Voice *@STARTCHORD@', '@STARTCHORD@', str)
+	str = re.sub ('@STARTCHORD@', chordstart, str)
+	str = re.sub ('@ENDCHORD@', chordend, str)
+	str = re.sub (r'@ACCENT@', '>', str)
 	return str
 
 (opts, files)= getopt.getopt( sys.argv[1:], 'e',['edit'])
@@ -140,8 +147,10 @@ for (o,a) in opts:
 
 for a in files:
 	str = open (a).read()
-	if re.search (str, marker_str):
+	if re.search (marker_str, str):
 		continue
+
+	sys.stderr.write ("processing %s\n" %a)
 	
 	str = sub_chords (str)  + marker_str + '\n'
 
diff -purN ../lilypond-1.7.7/ChangeLog ./ChangeLog
--- ../lilypond-1.7.7/ChangeLog	2002-11-14 11:28:33.000000000 +0100
+++ ./ChangeLog	2002-11-19 13:10:24.000000000 +0100
@@ -1,5 +1,91 @@
+2002-11-19 Juergen Reuter  <reuter@ipd.uka.de>
+
+	* lily/cluster-engraver.cc: bugfix: use protected scm upon columns
+
+	* lily/cluster-engraver.cc: stick better to variable naming
+	conventions
+
+	* lily/cluster-engraver.cc: bugfix: delay typesetting of cluster
+	until stop_translation_timestep()
+
+	* lily/cluster-engraver.cc, lily/cluster.cc: design fix: pass
+	min/max coordinates to backend, but no musical info such as
+	pitches
+
+	* lily/cluster.cc: robustness fix: do not crash upon empty cluster
+
+	* lily/grob.cc: robustness fix: warning(): do not crash if
+	cause is not set
+
+	* lily/ligature-bracket-engraver.cc, scm/grob-description.scm: use
+	the much more elaborated tuplet brackets than the very naive and
+	simple ligature bracket grob
+
+2002-11-19  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+	* Documentation/user/refman.itely (Analysis brackets): add
+	horizontal bracket doco.
+
+	* ly/property-init.ly (setMmRestFermata): added.
+
+	* Documentation/user/refman.itely (Multi measure rests): fermatas
+	on mm rests.
+
+	* input/regression/apply-context.ly (texidoc): new file
+
+	* lily/parser.yy (Simple_music): \applycontext #FUNCTION allows
+	code to be executed during interpretation. Possible applications:
+	smart octavation, more advanced bar checks. 
+
+	* lily/apply-context-iterator.cc: new file.
+
+2002-11-18  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+	* input/test/new-markup.ly: new file.
+
+	* lily/text-item.cc (text_to_molecule): new function
+
+	* scm/new-markup.scm (lambda): new file
+
+	* lily/function-documentation.cc (ly_add_function_documentation):
+	add proc property as well
+
+2002-11-17  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+	* Documentation/user/music-glossary.tely (Top): add custos.
+
+2002-11-16  Heikki Junes <hjunes@cc.hut.fi>
+
+	* Documentation/topdocs/INSTALL.texi: advise how to include source
+	path to Emacs load-path and improve language.
+
+2002-11-16  Jan Nieuwenhuizen  <janneke@gnu.org>
+
+	* GNUmakefile.in: config.h message fix.
+
+	* autogen.sh:
+	* aclocal.m4: Regenerate.
+
+	* configure.in: 
+	* config.make.in: 
+	* stepmake/config.make.in: 
+	* stepmake/configure.in: 
+	* stepmake/autogen.sh: 
+	* stepmake/aclocal.m4: Update for autoconf 2.56.
+
+2002-11-16  Heikki Junes <hjunes@cc.hut.fi>
+
+	* Documentation/topdocs/INSTALL.texi: instructions for an user how
+	to install Emacs-mode. Instructions how to use vim-mode.
+
 2002-11-14  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+	* scm/music-types.scm (music-descriptions): no length for tempo event.
+
+	* input/*.ly: add \version everywhere.
+	
+	* input/*.ly: update syntax to 1.7 + new-chords.
+
 	* Documentation/user/*.tely: new chord syntax.
 
 	* input/regression/[bc]*.ly (texidoc): syntax updates.
diff -purN ../lilypond-1.7.7/config.make.in ./config.make.in
--- ../lilypond-1.7.7/config.make.in	2002-08-10 17:05:30.000000000 +0200
+++ ./config.make.in	2002-11-19 11:51:34.000000000 +0100
@@ -19,7 +19,7 @@ PACKAGE_NAME = @PACKAGE_NAME@
 prefix = $(DESTDIR)@prefix@
 exec_prefix = @exec_prefix@
 
-builddir = @builddir@
+builddir = @ugh_ugh_autoconf250_builddir@
 build_lilypond_datadir = @build_package_datadir@
 bindir = @bindir@
 datadir = @datadir@
diff -purN ../lilypond-1.7.7/configure.in ./configure.in
--- ../lilypond-1.7.7/configure.in	2002-10-21 00:44:13.000000000 +0200
+++ ./configure.in	2002-11-19 11:51:34.000000000 +0100
@@ -1,13 +1,21 @@
 dnl configure.in   -*-shell-script-*-
 dnl Process this file with autoconf to produce a configure script. 
 
-# Bootstrap the init proces.  List a file identifies your package.
-AC_INIT(make/lilypond.lsm.in)
-AC_CONFIG_HEADER($CONFIGFILE.h:config.hh.in)
+# Bootstrap the init proces.
+AC_INIT
 
 # Bootstrap StepMake configure
+# For user package:
+AC_CONFIG_AUX_DIR([stepmake/bin])
+# For stepmake package:
+# AC_CONFIG_AUX_DIR(bin)
 STEPMAKE_INIT
 
+# List a file that identifies your package.
+AC_CONFIG_SRCDIR([make/lilypond.lsm.in])
+# Move to aclocal.m4?
+AC_CONFIG_HEADER([$CONFIGFILE.h:config.hh.in])
+
 # For all packages except the StepMake package itself
 AC_CONFIG_SUBDIRS(stepmake)
 
@@ -35,12 +43,12 @@ STEPMAKE_MAKEINFO(REQUIRED)
 STEPMAKE_PYTHON_DEVEL(REQUIRED)
 
 
-AC_HAVE_HEADERS(assert.h sys/stat.h sstream)
+AC_CHECK_HEADERS([assert.h sys/stat.h sstream])
 AC_HEADER_STAT
 
 AC_FUNC_MEMCMP
 AC_FUNC_VPRINTF
-AC_CHECK_FUNCS(memmem snprintf vsnprintf gettext isinf)
+AC_CHECK_FUNCS([memmem snprintf vsnprintf gettext isinf])
 
 
 ## Optional tools for building documentation, website, extra fonts.
@@ -77,5 +85,5 @@ Type:
     make$mc install   to install LilyPond
     make$mc help      to see all possible targets
 
-Do not worry if ./Documentation or ./mutopia should not build.
+Do not worry if ./Documentation should not build.
 EOF
diff -purN ../lilypond-1.7.7/Documentation/topdocs/INSTALL.texi ./Documentation/topdocs/INSTALL.texi
--- ../lilypond-1.7.7/Documentation/topdocs/INSTALL.texi	2002-11-12 11:47:55.000000000 +0100
+++ ./Documentation/topdocs/INSTALL.texi	2002-11-19 11:51:34.000000000 +0100
@@ -90,7 +90,7 @@ to compile them ourselves, they are not 
 released.
 
 @itemize @bullet
-@item @uref{ftp://ftp.cs.uu.nl/pub/GNU/LilyPond/binaries/RedHat-7.x/, Red Hat i386}
+@item @uref{http://www-ccrma.stanford.edu/planetccrma/software/soundapps.html#lilypond,Red Hat i386}
 @item @uref{ftp://ftp.lilypond.org/pub/LilyPond/binaries/SuSE, SuSE}
 @item @uref{ftp://ftp.lilypond.org/pub/LilyPond/binaries/linuxppc/,
 LinuxPPC}
@@ -320,31 +320,36 @@ and for the profiling version, I specify
 
 @section Emacs mode
 
-An Emacs mode for entering music and running LilyPond is included with
+An Emacs mode for entering music and running LilyPond is contained in
 the source archive as @file{lilypond-mode.el},
-@file{lilypond-indent.el} and @file{lilypond-font-lock.el}.  You
-should install these files somewhere in your @var{load-path}.  If you
-have installed a precompiled LilyPond package, these files can be
-found in @file{/usr/share/doc/lilypond-x.y.z/}.
-
-Add this to your @file{~/.emacs} or @file{~/.emacs.el}, or install this
-file in Emacs' @file{site-start.d}:
+@file{lilypond-indent.el} and @file{lilypond-font-lock.el}. 
+You should install these files to a directory included in your 
+@var{load-path}. As a user, you may want add your source path or
+@file{~/site-lisp/} to your @var{load-path}. Append the following line 
+(modified) to your @file{~/.emacs} or @file{~/.emacs.el}:
 @quotation
 @example
-  ;;; lilypond-init.el --- Startup code for LilyPond mode
-
-  (autoload 'LilyPond-mode "lilypond-mode")
-  (setq auto-mode-alist
-        (cons '("\\.ly$" . LilyPond-mode) auto-mode-alist))
-
-  (add-hook 'LilyPond-mode-hook (lambda () (turn-on-font-lock)))
+(setq load-path (append (list (expand-file-name "~/site-lisp")) load-path))
 @end example
 @end quotation
+File @file{lilypond-init.el} should be placed to 
+@var{load-path}@file{/site-start.d/} or appended to your @file{~/.emacs}.
+If you have installed a precompiled LilyPond package, these files can be
+found in @file{/usr/share/doc/lilypond-x.y.z/}. 
 
 If you have the latest LilyPond-1.4.x Debian package, LilyPond-mode is
 automatically loaded, you not even need to modify your @code{~/.emacs}
 file.
 
+@section Vim mode
+
+A Vim mode for entering music and running LilyPond is contained in
+the source archive. Append the content of @file{vimrc} to @file{~/.vimrc}
+to get shortcuts. Install files @file{lilypond.vim} and @file{lilypond.words} 
+to @file{~/.vim/} to get syntax-highlighting and auto-completion,
+correspondingly.
+
+
 @section Compiling for distributions 
 
 @subsection Red Hat Linux
diff -purN ../lilypond-1.7.7/Documentation/user/music-glossary.tely ./Documentation/user/music-glossary.tely
--- ../lilypond-1.7.7/Documentation/user/music-glossary.tely	2002-11-14 14:54:48.000000000 +0100
+++ ./Documentation/user/music-glossary.tely	2002-11-19 11:51:34.000000000 +0100
@@ -965,6 +965,40 @@ N: ?.
 In a separate part notes belonging to another part with the purpose of hinting
 when to start playing.  Usually printed in a smaller type.
 
+@aitem{custos}
+
+A custos is a staff symbol that appears at the end of a staff line
+with monophonic musical contents (i.e. with a single voice).  It
+anticipates the pitch of the first note of the following line and thus
+helps the player or singer to manage line breaks during performance,
+thus enhancing readability of a score.
+
+Custodes were frequently used in music notation until the 16th
+century.  There were different appearences for different notation
+styles.  Nowadays, they have survived only in special forms of musical
+notation such as via the editio vaticana dating back to the beginning
+of the 20th century
+
+@lilypond[13pt]
+\score {
+    \notes {
+	\property Staff.Custos \set #'neutral-position = #4
+	\property Staff.Custos \set #'neutral-direction = #-1
+	\property Staff.Custos \set #'adjust-if-on-staffline = ##t
+
+	\property Staff.Custos \set #'style = #'hufnagel
+	c'1^"Custos style = \#'hufnagel"
+	\break << d' a' f''>>1
+    }
+    \paper {
+	\translator {
+	    \StaffContext
+	    \consists Custos_engraver
+	}
+    }
+}
+@end lilypond
+  
 @aitem{D}
 ES: Re,
 I: re,
diff -purN ../lilypond-1.7.7/Documentation/user/refman.itely ./Documentation/user/refman.itely
--- ../lilypond-1.7.7/Documentation/user/refman.itely	2002-11-14 11:28:34.000000000 +0100
+++ ./Documentation/user/refman.itely	2002-11-19 11:51:35.000000000 +0100
@@ -1651,6 +1651,7 @@ accidentals using @code{!} and @code{?}.
 * Breath marks::                
 * Tempo::                       
 * Text spanners::               
+* Analysis brackets::           
 @end menu
 
 @node Slurs 
@@ -1814,6 +1815,32 @@ An application---or rather, a hack---is 
 @end lilypond
 
 
+@node Analysis brackets
+@subsection Analysis brackets
+@cindex brackets
+@cindex phrasing brackets
+@cindex musicological analysis
+@cindex note grouping bracket
+
+Brackets are used in musical analysis to indicate structure in musical
+pieces. LilyPond supports a simple form of nested horizontal brackets.
+To use this, add the @internalsref{Horizontal_bracket_engraver} to
+@internalsref{Staff} context.  A bracket is started with
+@code{\groupOpen} and closed with @code{\groupClose}. This produces
+@internalsref{HorizontalBracket} objects.
+
+@lilypond[singleline,verbatim]
+\score { \notes \relative c'' {  
+	c4-\groupOpen-\groupOpen
+	c4-\groupClose
+	c4-\groupOpen
+        c4-\groupClose-\groupClose
+  }
+  \paper { \translator {
+	    \StaffContext \consists "Horizontal_bracket_engraver"
+	}}}
+@end lilypond
+
 @c .  {Ornaments}
 @node Ornaments
 @section Ornaments
@@ -2865,7 +2892,7 @@ Piano pedal instruction can be expressed
 The symbols that are printed can be modified by setting
 @code{pedal@var{X}Strings}, where @var{X} is one of the pedal types:
 Sustain, Sostenuto or UnaCorda.  Refer to the generated documentation of
-@rgrob{SustainPedal}, for example, for more information.
+@internalsref{SustainPedal}, for example, for more information.
 
 Pedals can also be indicated by a sequence of brackets, by setting the 
 @code{pedal-type} property of SustainPedal objects: 
@@ -3585,11 +3612,10 @@ effect music that appears inside a @code
 
 Multi measure rests are entered using `@code{R}'. It is specifically
 meant for full bar rests and for entering parts: the rest can expand to
-fill a score with 
-rests, or it can be printed as a single multimeasure rest This expansion
-is controlled by the property @code{Score.skipBars}. If this is set to true,
-Lily will not expand empty measures, and the appropriate number is added
-automatically.
+fill a score with rests, or it can be printed as a single multimeasure
+rest This expansion is controlled by the property
+@code{Score.skipBars}. If this is set to true, Lily will not expand
+empty measures, and the appropriate number is added automatically.
 
 @lilypond[fragment,verbatim]
  \time 4/4 r1 | R1 | R1*2
@@ -3617,14 +3643,29 @@ rest centered in the measure, regardless
 
 @cindex whole rests for a full measure 
 
-The object for this object is @internalsref{MultiMeasureRest}.
+The object for this object is @internalsref{MultiMeasureRest}, and
+@internalsref{MultiMeasureRestNumber}.
 
 @refbugs
 
 Currently, there is no way to automatically condense multiple rests
 into a single multimeasure rest. Multi measure rests do not take part
-in rest collisions. There is no way to put texts centered on
-multi-measure rests.
+in rest collisions.
+
+Multi-measure rests do not accept @var{note}-@code{text} syntax for
+putting texts and scripts on the rest.  This has to be done by setting
+@code{#'text} in @internalsref{MultiMeasureRestNumber}. An identifier is
+provided for a fermata:
+
+@cindex text on multi-measure rest
+@cindex script on multi-measure rest
+@cindex fermata on multi-measure rest
+
+@lilypond[verbatim,fragment]
+  \time 3/4
+  \setMmRestFermata R2.
+@end lilypond
+
 
 @cindex condensing rests
 
diff -purN ../lilypond-1.7.7/GNUmakefile.in ./GNUmakefile.in
--- ../lilypond-1.7.7/GNUmakefile.in	2002-11-12 11:47:54.000000000 +0100
+++ ./GNUmakefile.in	2002-11-19 11:51:34.000000000 +0100
@@ -170,8 +170,8 @@ $(config_h): configure.in aclocal.m4
 # and they blindly run "cvs update; make".
 #
 	@echo
-	@echo ' *** config.h is out of date'
+	@echo ' *** $(config_h) is out of date'
 	@echo ' *** Remove it and rerun autogen:'
-	@echo '         rm config.h; ./autogen.sh'
+	@echo '         rm $(config_h); ./autogen.sh'
 	@echo
 	@false
diff -purN ../lilypond-1.7.7/input/allfontstyle.ly ./input/allfontstyle.ly
--- ../lilypond-1.7.7/input/allfontstyle.ly	2002-07-21 21:27:40.000000000 +0200
+++ ./input/allfontstyle.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 
diff -purN ../lilypond-1.7.7/input/ascii-art/as1.ly ./input/ascii-art/as1.ly
--- ../lilypond-1.7.7/input/ascii-art/as1.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/ascii-art/as1.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,5 +1,5 @@
 
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
diff -purN ../lilypond-1.7.7/input/ascii-art/as2.ly ./input/ascii-art/as2.ly
--- ../lilypond-1.7.7/input/ascii-art/as2.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/ascii-art/as2.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 % test for ascii-art output
 
diff -purN ../lilypond-1.7.7/input/ascii-art/asciiscript5.ly ./input/ascii-art/asciiscript5.ly
--- ../lilypond-1.7.7/input/ascii-art/asciiscript5.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/ascii-art/asciiscript5.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % ASCII Art output
 %
 % Process as:
diff -purN ../lilypond-1.7.7/input/ascii-art/asciiscript9.ly ./input/ascii-art/asciiscript9.ly
--- ../lilypond-1.7.7/input/ascii-art/asciiscript9.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/ascii-art/asciiscript9.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % ASCII Art output
 %
 % Process as:
diff -purN ../lilypond-1.7.7/input/ascii-art/as-email.ly ./input/ascii-art/as-email.ly
--- ../lilypond-1.7.7/input/ascii-art/as-email.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/ascii-art/as-email.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % ASCII Art output
 %
 % Process as:
diff -purN ../lilypond-1.7.7/input/ascii-art/r-as.ly ./input/ascii-art/r-as.ly
--- ../lilypond-1.7.7/input/ascii-art/r-as.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/ascii-art/r-as.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % ASCII Art output
 %
 % Process as:
diff -purN ../lilypond-1.7.7/input/ascii-art/standchen-as5.ly ./input/ascii-art/standchen-as5.ly
--- ../lilypond-1.7.7/input/ascii-art/standchen-as5.ly	2002-10-21 00:44:14.000000000 +0200
+++ ./input/ascii-art/standchen-as5.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 % ASCII Art output
 %
 % Process as:
@@ -14,7 +14,7 @@
     \context Staff=upper \notes\relative c{
       \key f \major
       \time 3/4
-      r8^"Moderato" %\pp 
+      r8^"Moderato" %-\pp 
       <g'-. c-.> <c-. es-.> <g-. c-.> <c-. es-.> <g-. c-.> |
       r8 <as-. c-.> <c-. es-.>
     }
diff -purN ../lilypond-1.7.7/input/ascii-art/standchen-as9.ly ./input/ascii-art/standchen-as9.ly
--- ../lilypond-1.7.7/input/ascii-art/standchen-as9.ly	2002-10-21 00:44:14.000000000 +0200
+++ ./input/ascii-art/standchen-as9.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 % ASCII Art output
 
 % Process as:
@@ -15,7 +15,7 @@
     \context Staff=upper \notes\relative c{
       \key f \major
       \time 3/4
-      r8^"Moderato" %\pp 
+      r8^"Moderato" %-\pp 
       <g'-. c-.> <c-. es-.> <g-. c-.> <c-. es-.> <g-. c-.> |
       r8 <as-. c-.> <c-. es-.>
     }
diff -purN ../lilypond-1.7.7/input/ascii-art/twinkle-as5.ly ./input/ascii-art/twinkle-as5.ly
--- ../lilypond-1.7.7/input/ascii-art/twinkle-as5.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/ascii-art/twinkle-as5.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % ASCII Art output
 %
 % Process as:
diff -purN ../lilypond-1.7.7/input/example-1.ly ./input/example-1.ly
--- ../lilypond-1.7.7/input/example-1.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/example-1.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % A simple scale in LilyPond
 %
 % Type:
diff -purN ../lilypond-1.7.7/input/example-2.ly ./input/example-2.ly
--- ../lilypond-1.7.7/input/example-2.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/example-2.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % Some beamed and slurred notes of different taste in LilyPond
 %
 % Type:
diff -purN ../lilypond-1.7.7/input/example-3.ly ./input/example-3.ly
--- ../lilypond-1.7.7/input/example-3.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/example-3.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 one =  \notes\relative c{
 	c'' d e f
diff -purN ../lilypond-1.7.7/input/GNUmakefile ./input/GNUmakefile
--- ../lilypond-1.7.7/input/GNUmakefile	2002-10-28 01:26:22.000000000 +0100
+++ ./input/GNUmakefile	2002-11-19 11:51:36.000000000 +0100
@@ -3,7 +3,7 @@ depth = ..
 SUBDIRS=test regression tutorial no-notation ascii-art template mutopia 
 
 # nereides is tweaked a lot, can't do (read webpage)
-examples= size11 size26 
+examples= size13 size26 
 #examples+=size11 size13 size16 size20 size23 size26
 
 LOCALSTEPMAKE_TEMPLATES=ly mutopia
diff -purN ../lilypond-1.7.7/input/just-friends.ly ./input/just-friends.ly
--- ../lilypond-1.7.7/input/just-friends.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/just-friends.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   filename =    "just-friends.ly"
   title =       "Just Friends"
diff -purN ../lilypond-1.7.7/input/les-nereides.ly ./input/les-nereides.ly
--- ../lilypond-1.7.7/input/les-nereides.ly	2002-11-04 11:53:08.000000000 +0100
+++ ./input/les-nereides.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.4"
+\version "1.7.6"
 
 \header {
     composer =   "ARTHUR GRAY"
@@ -228,7 +228,7 @@ bassTwo =  \context Voice=bassTwo \notes
 }
 
 middleDynamics =  \context Dynamics=middle \notes{
-    s8 s16 s\f s4
+    s8 s16 s-\f s4
     s1*2
     %4
     s2
@@ -241,15 +241,15 @@ middleDynamics =  \context Dynamics=midd
 
     \outputproperty #(make-type-checker 'dynamic-interface) 
 	    #'extra-offset = #'(0 . 4)
-    %s1\mf-"a tempo"
-%%    s2\mf-"a tempo" s4
-    s2\mf-"a tempo" s8
+    %s1-\mf-"a tempo"
+%%    s2-\mf-"a tempo" s4
+    s2-\mf-"a tempo" s8
 %%    s\> \!s8
     s16 s32 s64 \> s s8  s \!s8
     \outputproperty #(make-type-checker 'dynamic-interface) 
 	    #'extra-offset = #'(-1 . 4)
-%%    s8\mf s4 s4 s8\> s32 s s \!s
-    s8\mf s4 s8 s16 s32 s64 \> s s16 s8 s32 s s s\! s128
+%%    s8-\mf s4 s4 s8\> s32 s s \!s
+    s8-\mf s4 s8 s16 s32 s64 \> s s16 s8 s32 s s s\! s128
 }
 
 lowerDynamics =  \context Dynamics=lower \notes{
diff -purN ../lilypond-1.7.7/input/mutopia/E.Satie/petite-ouverture-a-danser.ly ./input/mutopia/E.Satie/petite-ouverture-a-danser.ly
--- ../lilypond-1.7.7/input/mutopia/E.Satie/petite-ouverture-a-danser.ly	2002-10-21 00:44:14.000000000 +0200
+++ ./input/mutopia/E.Satie/petite-ouverture-a-danser.ly	2002-11-19 11:51:36.000000000 +0100
@@ -12,7 +12,7 @@
  Tested Features:
 %}
 
-\version "1.7.3"
+\version "1.7.6"
 
 \include "nederlands.ly"
 
@@ -69,65 +69,65 @@ ii =  \context Staff \notes\relative c'{
   \context Voice=ii
   \voiceTwo
 
-  r8 <es as> r <des f> | r <es g> r <es as> | r <f as> r <f as> |
-  r <es g> r <es g> | r <es as> r <as, des> | r <des f> r <des f> |
-  r <as des> r <bes des> | r bes r <as c> | r <g des'> r <bes d> |
-  r <a! c> r <a c>
+  r8 <<es as>> r <<des f>> | r <<es g>> r <<es as>> | r <<f as>> r <<f as>> |
+  r <<es g>> r <<es g>> | r <<es as>> r <<as, des>> | r <<des f>> r <<des f>> |
+  r <<as des>> r <<bes des>> | r bes r <<as c>> | r <<g des'>> r <<bes d>> |
+  r <<a! c>> r <<a c>>
 
   % Au movement
-  r <as des> r <c e> | r <c f> r <d! f> | r <cis e> r <cis e> |
-  r <c! f> r <d f> | r <d f> r <d g> | r <e g> r <e g> | r <e g> r <d g> |
-  r <d fis> r <d fis> | r <fis b> r <fis a> | r <e a> r <d g> |
-  r <d fis> r <d fis> |
+  r <<as des>> r <<c e>> | r <<c f>> r <<d! f>> | r <<cis e>> r <<cis e>> |
+  r <<c! f>> r <<d f>> | r <<d f>> r <<d g>> | r <<e g>> r <<e g>> | r <<e g>> r <<d g>> |
+  r <<d fis>> r <<d fis>> | r <<fis b>> r <<fis a>> | r <<e a>> r <<d g>> |
+  r <<d fis>> r <<d fis>> |
 
-  r <cis e> r <cis fis> r <cis f> |
+  r <<cis e>> r <<cis fis>> r <<cis f>> |
 
-  r <cis e> r <cis e> | r <b d> r <a d> | r <g b> r <a cis> |
-  r <a cis> r <a cis> |
+  r <<cis e>> r <<cis e>> | r <<b d>> r <<a d>> | r <<g b>> r <<a cis>> |
+  r <<a cis>> r <<a cis>> |
 
   \translator Staff=bass\voiceOne
-  r <g b> r <fis a> r <fis a> | r <g bes>
+  r <<g b>> r <<fis a>> r <<fis a>> | r <<g bes>>
   \translator Staff=treble\voiceTwo
-  r <a c> r <a d> |
+  r <<a c>> r <<a d>> |
 
-  r <bes d> r <bes d> | r <g c> r <bes d> | r <c es> r <d g> |
-  r <d f> r <es g> | r <e! g> r <d fis> | r <e a> r <fis a> |
-  r <es g> r <es g> | r <es g> r <es g> |
+  r <<bes d>> r <<bes d>> | r <<g c>> r <<bes d>> | r <<c es>> r <<d g>> |
+  r <<d f>> r <<es g>> | r <<e! g>> r <<d fis>> | r <<e a>> r <<fis a>> |
+  r <<es g>> r <<es g>> | r <<es g>> r <<es g>> |
 
   
   % copy from begin: 1-10
-  r8 <es as> r <des f> | r <es g> r <es as> | r <f as> r <f as> |
-  r <es g> r <es g> | r <es as> r <as, des> | r <des f> r <des f> |
-  r <as des> r <bes des> | r bes r <as c> | r <g des'> r <bes d> |
-  r <a! c> r <a c>
+  r8 <<es as>> r <<des f>> | r <<es g>> r <<es as>> | r <<f as>> r <<f as>> |
+  r <<es g>> r <<es g>> | r <<es as>> r <<as, des>> | r <<des f>> r <<des f>> |
+  r <<as des>> r <<bes des>> | r bes r <<as c>> | r <<g des'>> r <<bes d>> |
+  r <<a! c>> r <<a c>>
  
 }
 
 lower =  \context Staff \notes \relative c{
   \context Voice=iii
 
-  <as4 as'> <es es'> | r <as as'> | <des, des'> <f f'> | <c c'> r |
-  <as as'> <des des'> | <bes bes'> r | <des des'> <bes bes'> |
-  <g g'> <f f'> | <c' c'> <bes bes'> | <f f'> r |
+  <<as as'>>4 <<es es'>> | r <<as as'>> | <<des, des'>> <<f f'>> | <<c c'>> r |
+  <<as as'>> <<des des'>> | <<bes bes'>> r | <<des des'>> <<bes bes'>> |
+  <<g g'>> <<f f'>> | <<c' c'>> <<bes bes'>> | <<f f'>> r |
 
   % Au movement
-  <des' des'> <c c'> | <f f'> <d! d'!> | <a a'> r | <f' f'> <d d'> |
-  r <f f'> | <e e'> <c c'> | r <g g'> | <d' d'> r | <b b'> <fis fis'> |
-  <a a'> <b b'> | <d d'> r |
+  <<des' des'>> <<c c'>> | <<f f'>> <<d! d'!>> | <<a a'>> r | <<f' f'>> <<d d'>> |
+  r <<f f'>> | <<e e'>> <<c c'>> | r <<g g'>> | <<d' d'>> r | <<b b'>> <<fis fis'>> |
+  <<a a'>> <<b b'>> | <<d d'>> r |
 
-  <a a'> <fis fis'> r |
+  <<a a'>> <<fis fis'>> r |
 
-  <a a'> r | <b b'> <d d'> | <e e'> <a, a'> | <fis fis'> r |
+  <<a a'>> r | <<b b'>> <<d d'>> | <<e e'>> <<a, a'>> | <<fis fis'>> r |
 
-  <g g'> <d d'> r | <g g'> <f! f'!> <d' d'> |
+  <<g g'>> <<d d'>> r | <<g g'>> <<f! f'!>> <<d' d'>> |
 
-  <bes bes'> r | <c c'>  <bes bes'> | <as as'> <g g'> | <d' d'> <c c'> |
-  <e! e'!> <b! b'!> | <a a'> <d d'> | <es es> r | <c c'> r
+  <<bes bes'>> r | <<c c'>>  <<bes bes'>> | <<as as'>> <<g g'>> | <<d' d'>> <<c c'>> |
+  <<e! e'!>> <<b! b'!>> | <<a a'>> <<d d'>> | <<es es>> r | <<c c'>> r
   
   % copy from begin: 1-10
-  <as'4 as'> <es es'> | r <as as'> | <des, des'> <f f'> | <c c'> r |
-  <as as'> <des des'> | <bes bes'> r | <des des'> <bes bes'> |
-  <g g'> <f f'> | <c' c'> <bes bes'> | <f f'> r |
+  <<as' as'>>4 <<es es'>> | r <<as as'>> | <<des, des'>> <<f f'>> | <<c c'>> r |
+  <<as as'>> <<des des'>> | <<bes bes'>> r | <<des des'>> <<bes bes'>> |
+  <<g g'>> <<f f'>> | <<c' c'>> <<bes bes'>> | <<f f'>> r |
 
 }
 
@@ -159,3 +159,4 @@ lower =  \context Staff \notes \relative
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/F.Schubert/standchen.ly ./input/mutopia/F.Schubert/standchen.ly
--- ../lilypond-1.7.7/input/mutopia/F.Schubert/standchen.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/mutopia/F.Schubert/standchen.ly	2002-11-19 11:51:36.000000000 +0100
@@ -41,7 +41,7 @@ instrument = "Piano"
  footer = "Mutopia-2001/04/27-xx"
 } 
 
-\version "1.7.5"
+\version "1.7.6"
 
 dynamicUp = \property Voice.DynamicLineSpanner \override #'direction = #1
 dynamicRevert = \property Voice.DynamicLineSpanner \revert #'direction
@@ -73,7 +73,7 @@ vocalVerse =  \notes\relative c''{
 	c8. g16 e4. c8 |
  	\grace { [ a'32( b ] } \times 2/3 { [ )a!8( ) gis] a } c4. a8 |
 	g!2. |
-	\times 2/3 { [ d'8\f( )cis] d } f4. b,8 |
+	\times 2/3 { [ d'8-\f( )cis] d } f4. b,8 |
 	c!2. |
 }
 
@@ -89,7 +89,7 @@ vocalThrough =  \notes\relative c{
 	R2. |
 	\grace { [ a32( b ] } \times 2/3 { [ )a!8( ) gis] a } c4. a8 |
 	g!2. |
-	\times 2/3 { [ d'8\f( )cis] d } f4. b,8 |
+	\times 2/3 { [ d'8-\f( )cis] d } f4. b,8 |
 	c!2. ~ |
 	% bug: slur on other staff fools lily into extending melisma
 	c4 r c |
@@ -139,75 +139,75 @@ lyricThrough =  \lyrics{
 }
 
 trebleIntro =  \notes\relative c{
-	r8^"\bf M\\\"a\\ss ig"\pp <g'-. c-.> <c-. es-.> <g-. c-.> <c-. es-.> <g-. c-.> |
-	r8 <as-. c-.> <c-. es-.> <as-. c-.> <c-. es-.> <as-. c-.> |
-	r8 <as-. c-.> <c-. d-.> <as-. c-.> <c-. d-.> <as-. c-.> |
-	r8 <g-. b-.> <b-. d-.> <g-. b-.> <b-. d-.> <g-. b-.> |
+	r8^"\bf M\\\"a\\ss ig"-\pp <<g' c>>-. <<c es>>-. <<g c>>-. <<c es>>-. <<g c>>-. |
+	r8 <<as c>>-. <<c es>>-. <<as c>>-. <<c es>>-. <<as c>>-. |
+	r8 <<as c>>-. <<c d>>-. <<as c>>-. <<c d>>-. <<as c>>-. |
+	r8 <<g b>>-. <<b d>>-. <<g b>>-. <<b d>>-. <<g b>>-. |
 }
 
 trebleVerseOne =  \notes\relative c{
 	%5
-	r8 <g' c> <c es> <g c> <c es> <g c> |
-	r8 <f c'> <c' d> <f, c'> <c' d> <f, c'> |
-	r8 <f g b> <g b d> <f g b> <g b d> <f g b> |
-	r8 <es g c> <g c es> <es g c> <g c es> <es g c> |
-	<g''4.( b,> <)f8 d>
+	r8 <<g' c>> <<c es>> <<g c>> <<c es>> <<g c>> |
+	r8 <<f c'>> <<c' d>> <<f, c'>> <<c' d>> <<f, c'>> |
+	r8 <<f g b>> <<g b d>> <<f g b>> <<g b d>> <<f g b>> |
+	r8 <<es g c>> <<g c es>> <<es g c>> <<g c es>> <<es g c>> |
+	<<g'' b,>>4.-( <<f d>>8-)
 	\times 2/3 < { [ f( es )d ] } { d c b } > |
 	%10
-	<c2. es> |
-	r8 <g, c> <c es> <g c> <c es> <g c> |
-	r8 <f c'> <c' d> <f, c'> <c' d> <f, c'> |
-	r8 <f as bes> <as bes d> <f as bes> <as bes d> <f as bes> |
+	<<c es>>2. |
+	r8 <<g, c>> <<c es>> <<g c>> <<c es>> <<g c>> |
+	r8 <<f c'>> <<c' d>> <<f, c'>> <<c' d>> <<f, c'>> |
+	r8 <<f as bes>> <<as bes d>> <<f as bes>> <<as bes d>> <<f as bes>> |
 	r8 < { [ es g es g ] } { g bes g bes } { bes es bes es } >
 	<{ es'( )  d4.() f8}{ c' | bes4.  as8 } >
 	\times 2/3 < { [ f( es )d ] } { as' g f } > |
 	%16
-	<es2. g> |
-	r8 <f, g> <g b> <f g> <g b> <f g> |
-	r8 <es g> <g c> <es g> <g c> <es g> |
-	r8\pp <es as c> <as c es> <es as c> <as c es> <es as c> |
+	<<es g>>2. |
+	r8 <<f, g>> <<g b>> <<f g>> <<g b>> <<f g>> |
+	r8 <<es g>> <<g c>> <<es g>> <<g c>> <<es g>> |
+	r8-\pp <<es as c>> <<as c es>> <<es as c>> <<as c es>> <<es as c>> |
 	%20
-	r8 <es g bes> <g bes es> <es g bes> <g bes es> <es g bes> |
+	r8 <<es g bes>> <<g bes es>> <<es g bes>> <<g bes es>> <<es g bes>> |
 	\property Voice.Slur \override #'attachment = #'(stem . stem)
 	\grace { [ as'32( bes ] } \times 2/3 { [ )as8( g as] } c4.-> ) as8 |
 	\property Voice.Slur \revert #'attachment
 	g2. |
-	r8 <f, g> <g b> <f g> <g b> <f g> |
-	r8 <e g> <g c> <e g> <g c> <e g> |
-	r8 <f a c> <a c f> <f a c> <a c f> <f a c> |
-	r8 <e g c> <g c e> <e g c> <g c e> <e g c> |
-	\times 2/3 < { [ f'8\f( e f] } {  f' e f } >
+	r8 <<f, g>> <<g b>> <<f g>> <<g b>> <<f g>> |
+	r8 <<e g>> <<g c>> <<e g>> <<g c>> <<e g>> |
+	r8 <<f a c>> <<a c f>> <<f a c>> <<a c f>> <<f a c>> |
+	r8 <<e g c>> <<g c e>> <<e g c>> <<g c e>> <<e g c>> |
+	\times 2/3 < { [ f'8-\f( e f] } {  f' e f } >
 	< {a4.- > )f8}  { a'4. f8 }  > |
 }
 
 trebleEentje =  \notes \relative c' \context Voice {
 	\stemBoth
-	<e2 e'> r4 |
-	<f2\mf as!\(> <as8.->( c> <f16 \))as> |
+	<<e e'>>2 r4 |
+	<<f as!>>2-\(-\mf <<as c>>8.-(-> <<f as>>16-)-\) |
 	% urg: slurs with staccati are ugly
-	<e4. g> <e8-. g-.(> <e-. g-.> <e-. )g-.> |
-	<f4. g> <b,8-. g'-.(> <d-. g-.> <f-. )g-.> |
-	<e2 g> <e4\pp g> |
-	<f2 a\(> <a8.( c> <f16 \))a> |
-	<e4.\( g> <e8-.( g-.> <e-. g-.> <e-. \))g-.> |
-	<f4. g> <b,8-. g'-.(> <d-. g-.> <f-. )g-.> |
+	<<e g>>4. <<e g>>8-.-( <<e g>>-. <<e g>>-)-. |
+	<<f g>>4. <<b, g'>>8-.-( <<d g>>-. <<f g>>-)-. |
+	<<e g>>2 <<e g>>4-\pp |
+	<<f a>>2-\( <<a c>>8.-( <<f a>>16-)-\) |
+	<<e g>>4.-\( <<e g>>8-(-. <<e g>>-. <<e g>>-)-\)-. |
+	<<f g>>4. <<b, g'>>8-(-. <<d g>>-. <<f g>>-)-. |
 	%60
-	<e2 g> r4 |
+	<<e g>>2 r4 |
 }
 
 trebleThrough =  \notes \relative c'{
 	\stemBoth
-	<e2. e'> |
+	<<e e'>>2. |
 	%61
 	R2. |
-	[<g,8.\< g'> <g16 g'> <b8. b'> <\! b16\> b'16> <d8. d'> <d16 d'>] |
+	[<<g, g'>>8.-\< <<g g'>>16 <<b b'>>8. <<b b'>>16-\>-\! <<d d'>>8. <<d d'>>16] |
 
 	%% score has double slur on chord.
 	< { c4( )b } { c'4 b } > \!r |
 
-	<g4. g'> <b8 b'> [<d'8.-> d,-> > c16] |
+	<<g g'>>4. <<b b'>>8 [<<d' d, >>8.-> c16] |
 	%65
-	< { d,2.(\f )a'2} { e2. ~ e2 } { b'2.( )c,2 }> r4 |
+	< { d,2.(-\f )a'2} { e2. ~ e2 } { b'2.( )c,2 }> r4 |
 	\context Staff < 
 		\context Voice=one {
 			\voiceOne
@@ -219,126 +219,126 @@ trebleThrough =  \notes \relative c'{
 		}
 		\context Voice=two {
 			\voiceTwo
-			<d,4 f> <d2 f> |
-			<c!4 es> <c2 es> |
+			<<d, f>>4 <<d f>>2 |
+			<<c! es>>4 <<c es>>2 |
 		}
 	>
 
 	% 4 bars copied from end verse1
-	r8 <f, a c> <a c f> <f a c> <a c f> <f a c> |
+	r8 <<f, a c>> <<a c f>> <<f a c>> <<a c f>> <<f a c>> |
 	%70
-	r8 <e g c> <g c e> <e g c> <g c e> <e g c> |
-	\times 2/3 < { [ f'8\f( e f] } {  f' e f } >
+	r8 <<e g c>> <<g c e>> <<e g c>> <<g c e>> <<e g c>> |
+	\times 2/3 < { [ f'8-\f( e f] } {  f' e f } >
 	< { a4.-> )f8 } { a'4. f8 } > |
-	<e2. e'> |
-	<es!2. es'! > |
+	<<e e'>>2. |
+	<<es! es'! >>2. |
 	\property Voice . TextScript \override #'font-shape = #'italic
 	<d2._"decresc." d'> |
 	\property Voice . TextScript \revert #'font-shape
 
 	%75
-	<b2. b'> |
-	<c2 c'> <e4\pp g> |
+	<<b b'>>2. |
+	<<c c'>>2 <<e g>>4-\pp |
 
 	% four copied from begin eentje
-	<f2 as!(> <as8.-> c> <f16 )as> |
-	<e4. g> <e8-. g-.(> <e-. g-.> <e-. )g-.> |
-	<f4. g> <b,8-. g'-.(> <d-. g-.> <f-. )g-.> |
+	<<f as!>>2-( <<as c>>8.-> <<f as>>16-) |
+	<<e g>>4. <<e g>>8-(-. <<e g>>-. <<e g>>-)-. |
+	<<f g>>4. <<b, g'>>8-(-. <<d g>>-. <<f g>>-)-. |
 	%80
 
 	\property Voice . TextScript \override #'font-shape = #'italic
 	<e2._"dim." g> |
 	\property Voice . TextScript \revert #'font-shape
 
-	<g,2. e' g> |
-	<g2.-\fermata e' g> |
+	<<g, e' g>>2. |
+	<<g e' g>>2.-\fermata |
 }
 
 bassIntro =  \notes\relative c{
 	\dynamicUp
 %1
-	<c,2 c'> r4 |
-	<as2 as'> r4 |
-	<f2 f'> r4 |
-	<g2 g'> r4 |
+	<<c, c'>>2 r4 |
+	<<as as'>>2 r4 |
+	<<f f'>>2 r4 |
+	<<g g'>>2 r4 |
 }
 
 bassVerseOne =  \notes\relative c{
 %	\clef bass
 	\dynamicUp
 %5
-	<c,2 c'> r4 |
-	<as2 as'> r4 |
-	<g2 g'> r4 |
-	<c2 c'> r4 |
-	<g8 g'> [<g'' d'> <d' f> <g, d'> <d' f> <g, d'>] |
+	<<c, c'>>2 r4 |
+	<<as as'>>2 r4 |
+	<<g g'>>2 r4 |
+	<<c c'>>2 r4 |
+	<<g g'>>8 [<<g'' d'>> <<d' f>> <<g, d'>> <<d' f>> <<g, d'>>] |
 %10
-	<c,,8 c'> [<g'' c> <c es> <g c> <c es> <g c>] |
-	<c,,2 c'> r4 |
-	<as2 as'> r4 |
-	<bes2 bes'> r4 |
-	<es,2 es'> r4 |
+	<<c,, c'>>8 [<<g'' c>> <<c es>> <<g c>> <<c es>> <<g c>>] |
+	<<c,, c'>>2 r4 |
+	<<as as'>>2 r4 |
+	<<bes bes'>>2 r4 |
+	<<es, es'>>2 r4 |
 %15
-	bes'8 [<bes' f'> <f' as> <bes, f'> <f' as> <bes, f'>] |
-	es,8 [<bes' es> <es g> <bes es> <es g> <bes es>] |
-	<g,2 g'> r4 |
-	<c2 c'> r4 |
-	<as2 as'> r4 |
-	<es2 es'> r4 |
-	<bes'8 bes'> [<f'' bes> <bes d> <f bes> <bes d> <f bes>] |
-	<es,,8 es'> [<es'' g bes> <g bes es> <es g bes> <g bes es> <es g bes>] |
-	<g,,2 g'> r4 |
-	<c2 c'> r4 |
-	<f,2 f'> r4 |
-	<c'2 c'> r4 |
-	<g8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
-	c,8 [<c' e g> <e g c> <c e g> <e g c> <c e g>] |
+	bes'8 [<<bes' f'>> <<f' as>> <<bes, f'>> <<f' as>> <<bes, f'>>] |
+	es,8 [<<bes' es>> <<es g>> <<bes es>> <<es g>> <<bes es>>] |
+	<<g, g'>>2 r4 |
+	<<c c'>>2 r4 |
+	<<as as'>>2 r4 |
+	<<es es'>>2 r4 |
+	<<bes' bes'>>8 [<<f'' bes>> <<bes d>> <<f bes>> <<bes d>> <<f bes>>] |
+	<<es,, es'>>8 [<<es'' g bes>> <<g bes es>> <<es g bes>> <<g bes es>> <<es g bes>>] |
+	<<g,, g'>>2 r4 |
+	<<c c'>>2 r4 |
+	<<f, f'>>2 r4 |
+	<<c' c'>>2 r4 |
+	<<g g'>>8 [<<d'' g>> <<g b>> <<d g>> <<g b>> <<d g>>] |
+	c,8 [<<c' e g>> <<e g c>> <<c e g>> <<e g c>> <<c e g>>] |
 }
 
 bassEentje =  \notes\relative c{
 	\dynamicUp
-	<c,8 c'> [<c' f as!> <f as c> <c f as> <f as c> <c f as>] |
-	c,8 [<c' e g> <e g c> <c e g> <e g c> <c e g>] |
-	<g,8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
-	c,8 [<e' g> <g c> <e g> <g c> <e g>] |
-	<c,8 c'> [<c' f a> <f a c> <c f a> <f a c> <c f a>] |
-	c,8 [<c' e g> <e g c> <c e g> <e g c> <c e g>] |
-	<g,8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
-	c,8 [<e' g> <g c> <e g> <g c> <e g>] |
+	<<c, c'>>8 [<<c' f as!>> <<f as c>> <<c f as>> <<f as c>> <<c f as>>] |
+	c,8 [<<c' e g>> <<e g c>> <<c e g>> <<e g c>> <<c e g>>] |
+	<<g, g'>>8 [<<d'' g>> <<g b>> <<d g>> <<g b>> <<d g>>] |
+	c,8 [<<e' g>> <<g c>> <<e g>> <<g c>> <<e g>>] |
+	<<c, c'>>8 [<<c' f a>> <<f a c>> <<c f a>> <<f a c>> <<c f a>>] |
+	c,8 [<<c' e g>> <<e g c>> <<c e g>> <<e g c>> <<c e g>>] |
+	<<g, g'>>8 [<<d'' g>> <<g b>> <<d g>> <<g b>> <<d g>>] |
+	c,8 [<<e' g>> <<g c>> <<e g>> <<g c>> <<e g>>] |
 }
 
 bassThrough =  \notes\relative c{
 	\dynamicUp
 	%61
-	<g,8^"cresc." g'> [<g' b d> <b d f> <g b d> <as!-> b-> d-> > <b d f>] |
-	<g,8 g'> [<g' d'> <d' f> <g, d'> <as-> b-> d-> > <b d f>] |
+	<g,8^"cresc." g'> [<<g' b d>> <<b d f>> <<g b d>> <<as! b d >>-> <<b d f>>] |
+	<<g, g'>>8 [<<g' d'>> <<d' f>> <<g, d'>> <<as b d >>-> <<b d f>>] |
 	% copied
-	<g,8 g'> [<g' d'> <d' f> <g, d'> <as-> b-> d-> > <b d f>] |
-	<g,8 g'> [<g' d'> <d' f> <g, d'> <gis-> b-> d-> > <b d f>] |
+	<<g, g'>>8 [<<g' d'>> <<d' f>> <<g, d'>> <<as b d >>-> <<b d f>>] |
+	<<g, g'>>8 [<<g' d'>> <<d' f>> <<g, d'>> <<gis b d >>-> <<b d f>>] |
 	%65
-	<gis,8 gis'> [<d''\> e> <e b'> <d e> <e b'> <d\! e>] |
-	<a,8 a'> [<c' e> <e a> <c e> <e a> <c e>] |
-	<a,8 a'> [<a' d f> <d f a> <a d f> <d f a> <a d f>] |
-	<a,8 a'> [<a' c e> <c e a> <a c e> <c e a> <a c e>] |
+	<<gis, gis'>>8 [<<d'' e>>-\> <<e b'>> <<d e>> <<e b'>> <<d e>> -\!] |
+	<<a, a'>>8 [<<c' e>> <<e a>> <<c e>> <<e a>> <<c e>>] |
+	<<a, a'>>8 [<<a' d f>> <<d f a>> <<a d f>> <<d f a>> <<a d f>>] |
+	<<a, a'>>8 [<<a' c e>> <<c e a>> <<a c e>> <<c e a>> <<a c e>>] |
 	% 4 bars copied from end verse1
-	<f,2\p f'> r4 |
+	<<f, f'>>2-\p r4 |
 	%70
-	<c'2 c'> r4 |
-	<g8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
-	c,8\> [<c' e g> < \! e g c> <c e g> <e g c> <c e g>] |
+	<<c' c'>>2 r4 |
+	<<g g'>>8 [<<d'' g>> <<g b>> <<d g>> <<g b>> <<d g>>] |
+	c,8\> [<<c' e g>> << e g c>> -\! <<c e g>> <<e g c>> <<c e g>>] |
 
-	<c,8 c'> [<c' es! g> <es g c> <c es g> <es g c> <c es g>] |
-	<f,,8 f'> [<d'' f> <f as!> <d f> <f as> <d f>] |
+	<<c, c'>>8 [<<c' es! g>> <<es g c>> <<c es g>> <<es g c>> <<c es g>>] |
+	<<f,, f'>>8 [<<d'' f>> <<f as!>> <<d f>> <<f as>> <<d f>>] |
 	%75
-	<g,,8 g'> [<d'' f> <f g> <d f> <f g> <d f>] |
-	c,8 [<c' e> <e g> <c e> <e g> <c e>] |
-	c,8 [<c' f> <f as> <c f> <f as> <c f>] |
-	c,8 [<c' e> <e g> <c e> <e g> <c e>] |
-	g,8 [<g' d'> <d' f> <g, d'> <d' f> <g, d'>] |
+	<<g,, g'>>8 [<<d'' f>> <<f g>> <<d f>> <<f g>> <<d f>>] |
+	c,8 [<<c' e>> <<e g>> <<c e>> <<e g>> <<c e>>] |
+	c,8 [<<c' f>> <<f as>> <<c f>> <<f as>> <<c f>>] |
+	c,8 [<<c' e>> <<e g>> <<c e>> <<e g>> <<c e>>] |
+	g,8 [<<g' d'>> <<d' f>> <<g, d'>> <<d' f>> <<g, d'>>] |
 	%80
-	c,8 [<c' e> <e g> <c e> <e g> <c e>] |
-	c,8 [<c' g> <e c> <c g> <e c> <c g>] |
-	<c,2._\fermata g' c> |
+	c,8 [<<c' e>> <<e g>> <<c e>> <<e g>> <<c e>>] |
+	c,8 [<<c' g>> <<e c>> <<c g>> <<e c>> <<c g>>] |
+	<<c, g' c>>2._\fermata |
 }
 		
 global =  \notes{
@@ -463,3 +463,4 @@ grandStaff =  \context PianoStaff <
 		\tempo 4 = 54
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/baerenreiter-sarabande.ly ./input/mutopia/J.S.Bach/baerenreiter-sarabande.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/baerenreiter-sarabande.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/mutopia/J.S.Bach/baerenreiter-sarabande.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 % #(ly:set-point-and-click 'line-column)
 
@@ -63,19 +63,19 @@ sarabandeA =  \context Voice \notes \rel
   < { d'8. e16 f4.-\trill d16 e |
       f4. [d8 e f] }
     \\
-    { <a,4 f> a2 <a4. d,4.>  } > |
+    { <<a, f>>4 a2 <<a d,>>4.  } > |
 
   %%7
   g8 bes16()a c()bes a()g d'8 f, |
   <  e4.-\trill
-  \\ <c,4 g'> >
+  \\ <<c, g'>>4 >
   [d8 c bes]
 
   %%9
   < { f'8 g16()a a4. g16()f  |
       g8 a16()bes bes4. c16()d }
     \\
-    { a,4 <bes4. d4. > r8 bes4 <g2 f'2>  }
+    { a,4 <<bes d >>4. r8 bes4 <<g f'>>2  }
   > |
   \forcedBreak
 
@@ -93,7 +93,7 @@ sarabandeA =  \context Voice \notes \rel
   \forcedBreak
   
   %%16
-  < bes4.-\trill d, g, > [a8 g f!] |
+  << bes d, g, >>4.-\trill [a8 g f!] |
   e bes a f' g a |
   d, as g es' f g |
   [cis, bes'] [a g16 f] [e!8 f16 d] |
@@ -105,8 +105,8 @@ sarabandeA =  \context Voice \notes \rel
       e8 f16()g g4. a16()bes |
       a8 cis16 d d,8 e16 f32 g f8-\trill e16()d } \\
     { bes4 g2 |
-      g4 <bes4. cis,> s8 |
-      <d8 a f> r r g, a4 } >
+      g4 <<bes cis,>>4. s8 |
+      <<d a f>>8 r r g, a4 } >
   |
   \stemUp
   d4 d,16 a'( b cis d e f )g |
@@ -117,7 +117,7 @@ sarabandeA =  \context Voice \notes \rel
       b cis d cis d4. e16()f | }
     \\
     { f,4 fis4. s8 |
-      <d4 g,> gis4.   } >
+      <<d g,>>4 gis4.   } >
   \voiceOne
   d16(cis)d f,
   [a,8 e']
@@ -196,3 +196,4 @@ baerPaper = \paper {
 %%% Local variables:
 %%% LilyPond-indent-level:2
 %%% End:
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/header.ly ./input/mutopia/J.S.Bach/Petites-Preludes/header.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/header.ly	2002-07-17 01:57:05.000000000 +0200
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/header.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 %{
  Header for Petites Preludes.
 
@@ -39,3 +39,4 @@ instrument = "Piano"
  tagline = \mutopiapublicdomain
  footer = "pre-Mutopia-200y/mm/dd-nr"
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-1.ly ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-1.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-1.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-1.ly	2002-11-19 11:51:36.000000000 +0100
@@ -18,7 +18,7 @@ Lemoine puts fermatas on ending bar line
 
 
 
-\version "1.7.3"
+\version "1.7.6"
 
 
 lowstaff =  \translator "Staff" = "lower"
@@ -48,7 +48,7 @@ upper =  \context Staff=upper \notes\rel
 	r a, c g' r a, c f! |
 	
 	% ugh arpeggio FIXME: is that so?
-	<f4 d b4>
+	<<f d b>>4
 	r4
 	
 	\stemBoth
@@ -87,7 +87,7 @@ upper =  \context Staff=upper \notes\rel
 		\context Voice=ii { \stemDown  d,8 f }
 	>
 	\stemBoth |
-	<c1 g e>
+	<<c g e>>1
 	\bar "|."
 }
 
@@ -108,7 +108,7 @@ lower =  \context Staff=lower \notes\rel
 		{ \stemUp\tieUp g1 ~ g ~ g ~ g ~ g ~ g ~ g }
 		\context Voice=ii { \stemDown\tieDown g,1 ~ g ~ g ~ g ~ g ~ g ~ g }
 	>
-	<c,1 c,>
+	<<c, c,>>1
 	\bar "|."
 }
 
@@ -136,3 +136,4 @@ global =  \notes{
 		piece = \piece
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-2.ly ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-2.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-2.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-2.ly	2002-11-19 11:51:36.000000000 +0100
@@ -4,47 +4,47 @@ opus= "BWV 939"
 piece = "2"
 
 
-\version "1.7.3"
+\version "1.7.6"
 upper =  \context Staff \notes\relative c{
 	\context Voice=i
 	\property Voice.TextScript \set #'font-style = #'italic
 	r8 c' e g  e c bes' g |
 	a c, f a  f c c' a |
 	b g b d  b g f' d |
-	<e2 c g>
+	<<e c g>>2
 	r4
-	<e c g >
-	<d2 c a>
+	<<e c g >>
+	<<d c a>>2
 	r4
-	<d c a>
+	<<d c a>>
 	< { \stemUp [d8 g, 8 b d] }
 	  \context Voice = ii < \stemDown b g >
 	>
 	
-	<b4 g>
-	<e b>
+	<<b g>>4
+	<<e b>>
 	c2
 	r4
 	<
 		{ \stemUp\tieUp c ~ c8}
 		% We get a warning: No ties created!
 		% but they are too!
-		\context Voice=ii { \stemDown\tieDown <e,4 a> ~ <e8 a> }
+		\context Voice=ii { \stemDown\tieDown <<e, a>>4 ~ <<e a>>8 }
 	>
 	\stemBoth 
 	d, fis a  fis d c' a |
 	b g b d  b g f'! d |
 	e g, c e  c g g' e |
 	fis a, c fis  c a a' fis |
-	<g2 d b>
+	<<g d b>>2
 	r4 b,4 |
 	c8 e g c  g e bes' g |
 	a16 g f e  d c b ! a 
 	b g a b  c d e f |
 	g4
-	<g,2 c>
-	<d4 b'>
-	<e1 c'>
+	<<g, c>>2
+	<<d b'>>4
+	<<e c'>>1
 	\bar "|."
 }
 
@@ -99,3 +99,4 @@ global =  \notes{
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-3.ly ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-3.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-3.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-3.ly	2002-11-19 11:51:36.000000000 +0100
@@ -14,7 +14,7 @@ note, some have dotted half notes.
 This file was partly generated using m4.
 %}
 
-\version "1.7.5"
+\version "1.7.6"
 
 
 upper =   \notes \transpose c c' {
@@ -65,7 +65,7 @@ upper =   \notes \transpose c c' {
 	r16 [g, b, d] [b, g, b, d] [es c a, fis] |
 
 
-	<g4 d b>	
+	<<g d b>>4	
 	\bar "|."
 }
 
@@ -156,3 +156,4 @@ global  = \notes{
 		piece = \piece
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly	2002-11-19 11:51:36.000000000 +0100
@@ -3,7 +3,7 @@
 opus = "BWV 925"
 piece = "4"
 
-\version "1.7.3"
+\version "1.7.6"
 
 %{
 
@@ -26,9 +26,9 @@ one = \context Staff \notes\relative c {
 	g fis g a  g b a g |
 	\stemUp
 
-	fis4 e8 a <fis4 d> <gis e> |
+	fis4 e8 a <<fis d>>4 <<gis e>> |
 	%5
-	<a4 e> <fis d> < g!16 d> fis g a 
+	<<a e>>4 <<fis d>> << g! d>>16 fis g a 
 	\stemBoth
 	g b a g |
 	\property Voice.TextScript \set #'font-style = #'italic
@@ -92,9 +92,9 @@ two = \context Staff \notes\relative c{
 	e4 d ~ d16 d cis b cis4 ~ |
 	cis8 a d4. d4^> cis8 |
 	\translator Staff=upper \stemDown\tieDown
-	d4 \stemBoth\tieBoth r16 b d b~ <g'4 e b> 
+	d4 \stemBoth\tieBoth r16 b d b~ <<g' e b>>4 
 	r16 cis, e cis~ |
-	<a'4 fis cis> r16 d, fis d~ <b'4 g d>
+	<<a' fis cis>>4 r16 d, fis d~ <<b' g d>>4
 	r16 fis a fis~ |
 	%10
 	\stemDown
@@ -108,9 +108,9 @@ two = \context Staff \notes\relative c{
 	\translator Staff=upper \stemDown\tieDown
 	d'8. ~ d8 c d4 a8 g |
 	%15
-	fis8 \translator Staff=lower \stemUp c' b4 \stemDown <a
+	fis8 \translator Staff=lower \stemUp c' b4 \stemDown <<a
 	\translator Staff=upper \stemDown
-	a'4.>
+	a'>>4.
 	\stemDown\tieDown
 	a'8~ |
 	a g~  g16 e fis8~  fis16 d8.~  d8. cis!16 |
@@ -227,3 +227,4 @@ global = \notes{
 		piece = \piece
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-5.ly ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-5.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-5.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-5.ly	2002-11-19 11:51:36.000000000 +0100
@@ -3,7 +3,7 @@
 piece = "5"
 opus = "BWV 926"
 
-\version "1.7.3"
+\version "1.7.6"
 
 upper =  \context Staff \notes\relative c
 	\context Voice=i {
@@ -85,8 +85,8 @@ upper =  \context Staff \notes\relative 
 	f a f d  f d b d  gis, b a gis |
 
 	% arpeggio
-	<g'!4. e a,> a8 
-	< f4  d a > ~ 
+	<<g'! e a,>>4. a8 
+	<< f  d a >>4 ~ 
 	[f8 e]
 	< { \stemUp 
 		e4.^\prall d8
@@ -101,7 +101,7 @@ upper =  \context Staff \notes\relative 
 	a fis d g e cis |
 
 	%  the mordent is on the D !
-	<fis2. d-\mordent a> 
+	<<fis d a>>2.-\mordent 
 }
 
 
@@ -206,3 +206,4 @@ global =  \notes{
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-6.ly ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-6.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-6.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-6.ly	2002-11-19 11:51:36.000000000 +0100
@@ -3,7 +3,7 @@
 opus = "BWV 940"
 piece = "6"
 
-\version "1.7.3"
+\version "1.7.6"
 
 
 
@@ -89,7 +89,7 @@ four =  \context Staff \notes\relative c
 	\stemUp\tieUp
 	b2 a |
 	g a4. gis16 a |
-	gis2 < g8 cis,> <f d> e4 |
+	gis2 << g cis,>>8 <<f d>> e4 |
 	d4. fis16 g r16 bes8. ~ bes4 |
 	%10
 	\stemDown
@@ -127,3 +127,4 @@ global =  \notes{
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-score.ly ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-score.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/Petites-Preludes/preludes-score.ly	2002-07-17 01:57:05.000000000 +0200
+++ ./input/mutopia/J.S.Bach/Petites-Preludes/preludes-score.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % This is the main score file of the Petites Preludes
 
 \include "header.ly"
@@ -11,3 +11,4 @@
 \include "preludes-4.ly"
 \include "preludes-5.ly"
 \include "preludes-6.ly"
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/wtk1-fugue1.ly ./input/mutopia/J.S.Bach/wtk1-fugue1.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/wtk1-fugue1.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/mutopia/J.S.Bach/wtk1-fugue1.ly	2002-11-19 11:51:36.000000000 +0100
@@ -19,7 +19,7 @@ enteredby = 	 "Shay Rojansky"
 %{
 TODO: use autobeaming.	
 %}
-\version "1.7.3"
+\version "1.7.6"
 
 % #(ly:set-point-and-click 'line-column)
 
@@ -98,7 +98,7 @@ soprane = 
 %% 25
 	[d8 e] f4 ~ [f16 a g f] [e f e d] |
 	c2 r16 [g32 a  b !16 c] [d e f8] ~ |
-	[f32 c d e f16 g] [a8. b16] <g2 c 2> |
+	[f32 c d e f16 g] [a8. b16] <<g c >>2 |
 	}
 
 alt = 
@@ -196,3 +196,4 @@ bass = \context Voice = bassvoice
 
 	\midi { \tempo 4 = 84 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/wtk1-fugue2.ly ./input/mutopia/J.S.Bach/wtk1-fugue2.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/wtk1-fugue2.ly	2002-09-20 11:21:06.000000000 +0200
+++ ./input/mutopia/J.S.Bach/wtk1-fugue2.ly	2002-11-19 11:51:36.000000000 +0100
@@ -37,7 +37,7 @@
 %}
 
 
-\version "1.6.0"
+\version "1.7.6"
 
 
 
@@ -99,8 +99,8 @@ dux =  \context Voice=two \notes \relati
   b, c d b b c r c |
   f16 d es c ~ c8 b c4 r8 e |
 %%30
-  f4 r8 f f es16 d es8 <f as> |
-  <b, d> r <b d> r <g2 c> |
+  f4 r8 f f es16 d es8 <<f as>> |
+  <<b, d>> r <<b d>> r <<g c>>2 |
 }
 
 
@@ -142,7 +142,7 @@ comes =  \context Voice=one \notes \rela
   g f16 es f8 d as' g r a |
   b c f,16 es d c c8 c'16 b c8 g |
 %%30
-  as c16 b c8 <d b ! as !> g,8 c16 b c8 d |
+  as c16 b c8 <<d b ! as !>> g,8 c16 b c8 d |
   f,16 g as4 g16 f e2 |
 }
 
@@ -222,3 +222,4 @@ bassdux =  \context Voice=three \notes \
     }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/J.S.Bach/wtk1-prelude1.ly ./input/mutopia/J.S.Bach/wtk1-prelude1.ly
--- ../lilypond-1.7.7/input/mutopia/J.S.Bach/wtk1-prelude1.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/mutopia/J.S.Bach/wtk1-prelude1.ly	2002-11-19 11:51:36.000000000 +0100
@@ -15,7 +15,7 @@ enteredby = 	 "Shay Rojansky"
   lastupdated = "1999/Oct/14"
 }
 
-\version "1.7.5"
+\version "1.7.6"
 
 % should do programmable input.
 soprane = 
@@ -76,7 +76,7 @@ soprane = 
 
 	r8 [f,16 a,] [c f c a,] [c a, f, a,] [f, d, f, d,] |
 	r8 [g16 b] [d' f' d' b] [d' b g b] [d f e d] |
-	<e1 g c'> \bar "|."
+	<<e g c'>>1 \bar "|."
     }
 
 bass = 
@@ -174,3 +174,4 @@ bass = 
 
 % EOF
 	
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/R.Schumann/romanze-op28-2.ly ./input/mutopia/R.Schumann/romanze-op28-2.ly
--- ../lilypond-1.7.7/input/mutopia/R.Schumann/romanze-op28-2.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/mutopia/R.Schumann/romanze-op28-2.ly	2002-11-19 11:51:36.000000000 +0100
@@ -5,7 +5,7 @@
 
 %% 19 is broken --hwn.
 %\include "paper19.ly"
-\version "1.7.5"
+\version "1.7.6"
 
 \header {
   title = "Romanzen"
@@ -54,12 +54,12 @@ righta = \notes \transpose c cis' {
   \m g,( \u c g c \m f, \u h,^2 g h, \m e, \u c^2 g )c] |
  }
  \stemUp \slurUp \tieUp \break
- b4^5( <a8 g>~<a g> a g^4 |
+ b4^5( <<a g>>8~<<a g>> a g^4 |
  f4^5 e8^5~e )d4^4 |
- as4^4( <g8 f>~<g f> g^5 f^4 |
+ as4^4( <<g f>>8~<<g f>> g^5 f^4 |
  es4^5 d8^5~d )c4^4 |
- c^4( es8^5~<es as,_1> d^3 )f |
- e4^4( g8^5~<g ces_4> f^3 )as |
+ c^4( es8^5~<<es as,_1>> d^3 )f |
+ e4^4( g8^5~<<g ces_4>> f^3 )as |
  g4^4 b8^5~b a c'^5~ |
  c' b^4 ges^5 des^3 b,^5 \d [ges,16^4 f,] |
  e,^2^#'(large "ritard...") cis,^1 \u r8 r r4 r16 \d gis,^2^"R.H." |
@@ -76,11 +76,11 @@ righta = \notes \transpose c cis' {
  as' des'^1 c'8^#'(finger "2-3") h~h )c'16 \clef F [e,16(^2 f, g,] |
  \break
 
- [as,^5 )h,,^2] \clef G [<c8 a^3(> <c16 g^2> c'] <c4. es ges c'^5>~
- <)c8 es ges c'> s4 s8 r16 h^2( c' d' | 
+ [as,^5 h,,^2-)-] \clef G [<<c a^3>>8-( <<c g^2>>16 c'] <<c es ges c'^5>>4.~
+ <<c es ges c'>>8-) s4 s8 r16 h^2( c' d' | 
  es' ges-1 f-2 a-1 c'-2 f'-4 \stemUp \tieUp e'-5 d' c' b-4 a^\prall^#'(finger "2-4-3") g |
- )f f'-5( e'-5 d'-4 c'-3 )f'-5 <f4^4 a^5(> <e8^3 g^5> |
- <a,4 f^4> <g,8 e^3> f16^4 d'^5~[d'8. c'16^4] |
+ )f f'-5( e'-5 d'-4 c'-3 )f'-5 <<f^4 a^5>>4-( <<e^3 g^5>>8 |
+ <<a, f^4>>4 <<g, e^3>>8 f16^4 d'^5~[d'8. c'16^4] |
  \break 
  <)f8^3 \context Voice = another { \m a,16^\pp \u c8 c16] } > \m g, \u c_3 \m b,^#'(finger "2-1") \u c8 c16 \m a, \u c]~ | \stemBoth
  c16 c8_4 c c16~c c8_2 c c16~ |
@@ -133,12 +133,12 @@ rightb = \notes \transpose c cis' {
   s2. s
  \u s4. \grace {f8(} )f4 e8 |
  f g16_2 b_1 a_2 gis_1 c_2 h, c cis_1 d_2 b,_1 |
- \tieDown c4.~<f,16 c \< > \tieBoth <f h>~[< \! f8^3 h \> > < \! e b^2>] |
+ \tieDown c4.~<<f, c  >>16-\< \tieBoth <<f h>>~[<< f^3 h >>8-\> -\! << e b^2>> -\!] |
  \translator Staff=mid
  \transpose c' c {
   a4^1( g8^1 b4 a8^2 |
-  f8..^1 f32^1 g8^2 )a8..   \slurUp <f32 f'^3(> <g8 g'^4> |
-  <)a8.. a'^5> <f32 f'^3(> <g8 g'^4> <)a4. a'^5 \> > ~ |
+  f8..^1 f32^1 g8^2 )a8..   \slurUp <<f f'^3>>32-( <<g g'^4>>8 |
+  <<a a'^5>>8..-) <<f f'^3>>32-( <<g g'^4>>8 <<a a'^5 >>4.-\>-) ~ |
   a~ \! a^\fermata \bar "|."
  }
 }
@@ -161,14 +161,14 @@ lefta = \notes \transpose c cis {
   g4 a8~a f g | a4 g8~g f e |
   d4 g8~g es f | g4 f8~f es d |
   c4 r8 f4 as8~ | as g b as4 ces'8~ |
-  ces' b des' c'4 \context Voice=another { \stemUp \tieUp <es'8 es>~ |
+  ces' b des' c'4 \context Voice=another { \stemUp \tieUp <<es' es>>8~ |
   es' des'4^1~ \stemDown [des'8. c'16] }
  }
  \transpose c' c, {
   g4(-4 a8-3~a f-5 g-4 | a4-3 g8-#'(finger "4-3") ~g f-4 e-5 |
   )d4-#'(finger "4-5")( g8-3~g es f-4 | g4-3 f8-4~f es d-4 |
   )c4 r8 f4-4( as8-5~ | as g-4 )b-5 as4-5( ces'8-4~ |
-  ces' b des'-4 )c'4-5( <es'8-4 es''8> |
+  ces' b des'-4 )c'4-5( <<es'-4 es''>>8 |
   \stemDown \tieDown )des'4._5~des'~ |
   \property Voice.NoteColumn \override #'horizontal-shift = #-1 des' s
  }
@@ -184,7 +184,7 @@ lefta = \notes \transpose c cis {
  s2.*2
  s8 r16 h\( c' d' es' as g8-\arpeggio )fis(
  )\)ges f16-2( a-1 c'-3 )f'-1 \grace {\stemDown \slurUp [b,( f] \stemUp } )e'-1( d' c' b-1 a-2-\prall g 
- )f16-4 f' <c' e'> d'-1 c'-2 h-1 s4.
+ )f16-4 f' <<c' e'>> d'-1 c'-2 h-1 s4.
  s2.
  f4^1( e8 g4 f8 |
  d8..^1 d32-2 e8^1 )f8.. d32^2( e8^1 |
@@ -214,11 +214,11 @@ leftb = \notes \transpose c cis {
  fis^1 d d, d [a d_2] g, d g d_3 [b,_5( g_2] |
  ) a c_3 f, c [c' f_2] b, f b f_3 d' as |
  h, as d' as h, as() f'4.^\fermata-\arpeggio_2 ~
- \d \stemDown f'8. \clef G \stemBoth \tieBoth \transpose c c' {[e16_4( f g] [as des_3] [c8_4 <h, d f d'>]~ |
- <h, d f d'>} \clef F [<c_3( f_1> <b,_4 e^2>] <)a,8._5 eis^1> h,16_4( c d |
+ \d \stemDown f'8. \clef G \stemBoth \tieBoth \transpose c c' {[e16_4( f g] [as des_3] [c8_4 <<h, d f d'>>]~ |
+ <<h, d f d'>>} \clef F [<<c_3 f_1>>-( <<b,_4 e^2>>] <<a,_5 eis^1>>8.-) h,16_4( c d |
  \voiceTwo
  es as,_3 g,8 fis,~fis, g,_4-\arpeggio gis,_5~ |
- gis, <a,16 c> r16 r8 r4 cis8( |
+ gis, <<a, c>>16 r16 r8 r4 cis8( |
  )d e( f16_4 d_5 )c4._ #'(finger "4-3")~ |
  \oneVoice
  c16( h,_4 c_3 cis_1 d_2 b,_3 a,_4 as,_1 g,8 ) )c,8 |
@@ -272,3 +272,4 @@ leftb = \notes \transpose c cis {
   }
   \midi { \tempo 8=100 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-allegro.ly ./input/mutopia/W.A.Mozart/mozart-hrn3-allegro.ly
--- ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-allegro.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/mutopia/W.A.Mozart/mozart-hrn3-allegro.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \include  "mozart-hrn3-defs.ly"
 
 allegro =
@@ -49,12 +49,12 @@ allegro =
 	[a( \< b c \!cis\> ]  d4 \! )c
 	[ais8() b] r8 \cresc b [b()c] r c
 	[cis ()d] r4 r2
-	\endcresc g,1\f ~ g2 ~ [g8 a16 b] [c()d e c]
+	\endcresc g,1-\f ~ g2 ~ [g8 a16 b] [c()d e c]
 	%% 64
 	f4-. d-. b-. g-.
 	R1
 
-	c,2\p e4 g c \cresc e g4. e8 |
+	c,2-\p e4 g c \cresc e g4. e8 |
 	\endcresc d4.-\f [e16 fis] [g () fis e d] [c() b a g]
 
 	< a1(-\trill
@@ -122,7 +122,7 @@ allegro =
 	[c8-. c-.] r c-. [cis()d] r\cresc d-. |
 	[dis()e] r e-. [e()f] r f-. |
 	g4-.-\f\endcresc  e-. c-. bes-. |
-	g-.\ff e-. c-. r |
+	g-.-\ff e-. c-. r |
 	a'2 ~ [a8_""_#`(,italic-bf "sempre " (dynamic "f")) b16 c] [d( e d )e]
 
 	
@@ -141,7 +141,7 @@ allegro =
 	  \times 2/3 { [ c d e] } \times 2/3 { [ f e d] }|
 	c4 \times 2/3 {  r8 [g'()e]} c4 \times 2/3 {  r8 [e () c]} |
 	g4 \times 2/3 {  r8 [c8() g] } \times 2/3 { [ e ()g e-. ] } \times 2/3 { [c () e c-.] }|
-	g4 r8 g'\f [a b c d]|
+	g4 r8 g'-\f [a b c d]|
 
 	< d1(-\trill
 	  { s2 \grace { [c16 d] } }  >
@@ -165,3 +165,4 @@ allegro =
 	\header { piece = "allegro" opus = "" }	
 	\midi{ \tempo 4=90 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-defs.ly ./input/mutopia/W.A.Mozart/mozart-hrn3-defs.ly
--- ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-defs.ly	2002-10-30 00:44:26.000000000 +0100
+++ ./input/mutopia/W.A.Mozart/mozart-hrn3-defs.ly	2002-11-19 11:51:36.000000000 +0100
@@ -6,7 +6,7 @@ longgrace = \property Voice.Stem \overri
 endlonggrace = \property Voice.Stem \revert #'stroke-style
 ritenuto = \textscript #'(italic  "rit.")
 
-\version "1.7.3"
+\version "1.7.6"
 
 #(define italic-bf '((font-shape . italic) (font-series . bold)))
 
@@ -76,3 +76,4 @@ stopGraceMusic= \sequential {
     linewidth = 189. \mm
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn-3.ly ./input/mutopia/W.A.Mozart/mozart-hrn-3.ly
--- ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn-3.ly	2002-07-17 01:57:05.000000000 +0200
+++ ./input/mutopia/W.A.Mozart/mozart-hrn-3.ly	2002-11-19 11:51:36.000000000 +0100
@@ -30,7 +30,7 @@ virtuoso that taught in Geneva. 
 
 %}
 
-\version "1.5.68"
+\version "1.7.6"
 
 \include "mozart-hrn3-defs.ly"
 \include "mozart-hrn3-allegro.ly"
@@ -38,3 +38,4 @@ virtuoso that taught in Geneva. 
 \include "mozart-hrn3-rondo.ly"
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-romanze.ly ./input/mutopia/W.A.Mozart/mozart-hrn3-romanze.ly
--- ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-romanze.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/mutopia/W.A.Mozart/mozart-hrn3-romanze.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,5 +1,5 @@
 
-\version "1.7.5"
+\version "1.7.6"
 \include  "mozart-hrn3-defs.ly"
 
 romanze = \notes \relative c' {
@@ -19,7 +19,7 @@ romanze = \notes \relative c' {
 	c r e r f r r4
 	\mark "A"
 	R1*8
-	g4.\mf f8  [e d c bes]
+	g4.-\mf f8  [e d c bes]
 	% 18
 	[bes( a d )c] c4 r
 	R1*2
@@ -28,12 +28,12 @@ romanze = \notes \relative c' {
 	R1
 	% 25
 	[c16 ( d c )d] [e ( f e )f] [g()e c-. c-.] [f()d b-. b-.]
-	[c16\p () d c )d] [e ( f e )f] [g()e c-. c-.] [f()d b-. b-.]
+	[c16-\p () d c )d] [e ( f e )f] [g()e c-. c-.] [f()d b-. b-.]
 	[c8 \< c, c c] [c c c \! c ]
 	\mark "B"
-	c1\f
+	c1-\f
 	R1*9
-	f'4.(\p )d8 b4 r8 g
+	f'4.(-\p )d8 b4 r8 g
 	g'4.() e8 c4 r8 cis |
 	% 39
 	d4(~ [d16 e d )e] [f8 () d f() d]
@@ -91,3 +91,4 @@ romanze = \notes \relative c' {
 	\midi{ \tempo 4 = 70  }
 	\paper{}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-rondo.ly ./input/mutopia/W.A.Mozart/mozart-hrn3-rondo.ly
--- ../lilypond-1.7.7/input/mutopia/W.A.Mozart/mozart-hrn3-rondo.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/mutopia/W.A.Mozart/mozart-hrn3-rondo.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 % \include "mozart-hrn3-defs.ly"
 
@@ -46,7 +46,7 @@ rondo = \notes 	\relative c'
 	c4 r8 r4 r8 |
 	R2.*7
 	\mark  "A"
-	c4.\p \grace { e16( } [)d8 c d]
+	c4.-\p \grace { e16( } [)d8 c d]
 	c4 r8 r4 r8
 	e4. \grace g16( [)f8 e f]
 	e4 r8 r4 r8
@@ -129,7 +129,7 @@ rondo = \notes 	\relative c'
 	\mark "F"
 	\endcresc
 	
-	f2.\f ~ |
+	f2.-\f ~ |
 	f4 r8 r4 r8
 	r8 [g,\> g] [g g g]
 	
@@ -144,7 +144,7 @@ rondo = \notes 	\relative c'
 	R2.*7
 	\mark "G"
 	R2.*4
-	c,4.\mf c4 c8
+	c,4.-\mf c4 c8
 	c4. e4 c8
 	g'4. g4 g8
 	g4. g,4 g8
@@ -156,7 +156,7 @@ rondo = \notes 	\relative c'
 	\cresc g'2.  bes,2.
 	a4. [b16 c d e f g]
 	a4. f4 d8
-	[\endcresc c8\f g' e] [c g e]
+	[\endcresc c8-\f g' e] [c g e]
 	[ c e' c]  [g e c]
 	g4 r8 [g''8 e c]
 
@@ -167,13 +167,13 @@ rondo = \notes 	\relative c'
 	
 	)c4 r8 r4 r8
 	R2.*5
-	r8 r8^\fermata d8\p [d e f]
+	r8 r8^\fermata d8-\p [d e f]
 	[g ()e c] [d()e d]
 	\cresc [c  c c] [d e f]
 	[g()e c] [d()e d]
-	\endcresc c4\f  r8 r4 r8
+	\endcresc c4-\f  r8 r4 r8
 	R2.*5
-	[c8\f c, c] [c c c]
+	[c8-\f c, c] [c c c]
 	c4 r8 c4 r8
 
         %This is technically incorrect, since we started with an 8th
@@ -192,3 +192,4 @@ rondo = \notes 	\relative c'
 	\midi{ \tempo 4 = 100 }
 	\paper { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/mutopia-header.ly ./input/mutopia-header.ly
--- ../lilypond-1.7.7/input/mutopia-header.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/mutopia-header.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   title =	"Title"
   subtitle =	"Subtitle"
diff -purN ../lilypond-1.7.7/input/no-notation/bar-check.ly ./input/no-notation/bar-check.ly
--- ../lilypond-1.7.7/input/no-notation/bar-check.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/no-notation/bar-check.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 
diff -purN ../lilypond-1.7.7/input/no-notation/beam-warn.ly ./input/no-notation/beam-warn.ly
--- ../lilypond-1.7.7/input/no-notation/beam-warn.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/no-notation/beam-warn.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header	{
 
diff -purN ../lilypond-1.7.7/input/no-notation/denneboom.ly ./input/no-notation/denneboom.ly
--- ../lilypond-1.7.7/input/no-notation/denneboom.ly	2002-11-06 13:33:56.000000000 +0100
+++ ./input/no-notation/denneboom.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 filename = 	 "denneboom.ly"
 enteredby = 	 "jcn"
diff -purN ../lilypond-1.7.7/input/no-notation/die-staff.ly ./input/no-notation/die-staff.ly
--- ../lilypond-1.7.7/input/no-notation/die-staff.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/no-notation/die-staff.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header  {
 texidoc = "a staff should really die, if no one's referencing it."
diff -purN ../lilypond-1.7.7/input/no-notation/parse2.ly ./input/no-notation/parse2.ly
--- ../lilypond-1.7.7/input/no-notation/parse2.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/no-notation/parse2.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 % Test parser error
 
diff -purN ../lilypond-1.7.7/input/no-notation/parse3.ly ./input/no-notation/parse3.ly
--- ../lilypond-1.7.7/input/no-notation/parse3.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/no-notation/parse3.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 % Test parser error
 
diff -purN ../lilypond-1.7.7/input/no-notation/parse4.ly ./input/no-notation/parse4.ly
--- ../lilypond-1.7.7/input/no-notation/parse4.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/no-notation/parse4.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 % Test parser error
 
diff -purN ../lilypond-1.7.7/input/no-notation/parse.ly ./input/no-notation/parse.ly
--- ../lilypond-1.7.7/input/no-notation/parse.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/no-notation/parse.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 % Test parser error
 
diff -purN ../lilypond-1.7.7/input/no-notation/pc-direction.ly ./input/no-notation/pc-direction.ly
--- ../lilypond-1.7.7/input/no-notation/pc-direction.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/no-notation/pc-direction.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 % move to regtest once it works?
 
diff -purN ../lilypond-1.7.7/input/no-notation/textcresc.ly ./input/no-notation/textcresc.ly
--- ../lilypond-1.7.7/input/no-notation/textcresc.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/no-notation/textcresc.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="crashes lily"
 }
diff -purN ../lilypond-1.7.7/input/opus-130.ly ./input/opus-130.ly
--- ../lilypond-1.7.7/input/opus-130.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/opus-130.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 filename =	 "opus-130.ly"
 title =	 "Quartett"
@@ -17,8 +17,8 @@ tempi = \notes {
 }
 
 dynamics = \notes {
-	s8\p\< \!s8.\> \!s16 | s4.\p | s8\< s8. \!s16 | s4.\p |
-	s8\p\< \!s8.\> \!s16 | s4.\p | s8\< s8. \!s16 | s4.\p |
+	s8-\p\< \!s8.\> \!s16 | s4.-\p | s8\< s8. \!s16 | s4.-\p |
+	s8-\p\< \!s8.\> \!s16 | s4.-\p | s8\< s8. \!s16 | s4.-\p |
 }
 
 global = \notes {
diff -purN ../lilypond-1.7.7/input/praeludium-fuga-E.ly ./input/praeludium-fuga-E.ly
--- ../lilypond-1.7.7/input/praeludium-fuga-E.ly	2002-11-06 13:33:38.000000000 +0100
+++ ./input/praeludium-fuga-E.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
   filename =    "praeludium-fuga-E.ly"
   title =       "praeludium and fuga in E-major"
diff -purN ../lilypond-1.7.7/input/regression/accidental-double.ly ./input/regression/accidental-double.ly
--- ../lilypond-1.7.7/input/regression/accidental-double.ly	2002-11-13 02:12:33.000000000 +0100
+++ ./input/regression/accidental-double.ly	2002-11-19 11:51:36.000000000 +0100
@@ -14,4 +14,4 @@
 }
 
 
-%% new-chords-done %%
\ No newline at end of file
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/apply-context.ly ./input/regression/apply-context.ly
--- ../lilypond-1.7.7/input/regression/apply-context.ly	1970-01-01 01:00:00.000000000 +0100
+++ ./input/regression/apply-context.ly	2002-11-19 00:52:01.000000000 +0100
@@ -0,0 +1,22 @@
+\header {
+
+texidoc = "with \\applycontext, \\properties can be modified
+procedurally. Applications include: checking bar numbers, smart
+octavation. "
+
+}
+
+\score { \notes \relative c'' {
+    c1 c1
+
+    %% todo: should put something interesting in the .tex output.
+    
+    \applycontext #(lambda (tr)
+		    (let* ((bn (ly:get-context-property tr 'currentBarNumber)))
+		     (if (= bn  3)
+		      #t
+		      (format #t "We were called in  ~a" bn))
+		 ))
+
+    c1 c1
+}}
diff -purN ../lilypond-1.7.7/input/regression/bar-number.ly ./input/regression/bar-number.ly
--- ../lilypond-1.7.7/input/regression/bar-number.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/bar-number.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 
diff -purN ../lilypond-1.7.7/input/regression/bar-scripts.ly ./input/regression/bar-scripts.ly
--- ../lilypond-1.7.7/input/regression/bar-scripts.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/bar-scripts.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 
diff -purN ../lilypond-1.7.7/input/regression/beam-auto-knee.ly ./input/regression/beam-auto-knee.ly
--- ../lilypond-1.7.7/input/regression/beam-auto-knee.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-auto-knee.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{ texidoc="Automatic kneeing. A knee is made when a horizontal
 beam fits in a gap between note heads that is larger than a predefined
diff -purN ../lilypond-1.7.7/input/regression/beam-center-slope.ly ./input/regression/beam-center-slope.ly
--- ../lilypond-1.7.7/input/regression/beam-center-slope.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-center-slope.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,3 +1,5 @@
+
+\version "1.7.7"
 \header{
 
     texidoc="Simple beams on middle staffline be allowed to be
@@ -36,4 +38,4 @@
 	linewidth = 0.0
     }
 }
-%% new-chords-done %%
\ No newline at end of file
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/beam-concave.ly ./input/regression/beam-concave.ly
--- ../lilypond-1.7.7/input/regression/beam-concave.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-concave.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 
 texidoc = "Concave beams should be horizontal. informally spoken,
diff -purN ../lilypond-1.7.7/input/regression/beam-cross-staff-auto-knee.ly ./input/regression/beam-cross-staff-auto-knee.ly
--- ../lilypond-1.7.7/input/regression/beam-cross-staff-auto-knee.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-cross-staff-auto-knee.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 
diff -purN ../lilypond-1.7.7/input/regression/beam-cross-staff.ly ./input/regression/beam-cross-staff.ly
--- ../lilypond-1.7.7/input/regression/beam-cross-staff.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-cross-staff.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Beams can be typeset over fixed distance aligned staves, beam
diff -purN ../lilypond-1.7.7/input/regression/beam-cross-staff-slope.ly ./input/regression/beam-cross-staff-slope.ly
--- ../lilypond-1.7.7/input/regression/beam-cross-staff-slope.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-cross-staff-slope.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Cross staff  (kneed) beams
 don't cause extreme slopes"
diff -purN ../lilypond-1.7.7/input/regression/beam-default-lengths.ly ./input/regression/beam-default-lengths.ly
--- ../lilypond-1.7.7/input/regression/beam-default-lengths.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-default-lengths.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
     texidoc="Beamed stems have standard lengths if possible."
diff -purN ../lilypond-1.7.7/input/regression/beamed-chord.ly ./input/regression/beamed-chord.ly
--- ../lilypond-1.7.7/input/regression/beamed-chord.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beamed-chord.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc = "Hairy case for beam, chord, and automatic knees."
diff -purN ../lilypond-1.7.7/input/regression/beam-extreme.ly ./input/regression/beam-extreme.ly
--- ../lilypond-1.7.7/input/regression/beam-extreme.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-extreme.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 texidoc="
 Beams should behave reasonably well, even under extreme circumstances.
diff -purN ../lilypond-1.7.7/input/regression/beam-french.ly ./input/regression/beam-french.ly
--- ../lilypond-1.7.7/input/regression/beam-french.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-french.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
     texidoc = "French style beaming. In french beaming, the stems do not go to the outer beams."
diff -purN ../lilypond-1.7.7/input/regression/beam-funky-beamlet.ly ./input/regression/beam-funky-beamlet.ly
--- ../lilypond-1.7.7/input/regression/beam-funky-beamlet.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-funky-beamlet.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc=" Funky kneed beams with beamlets also work. The beamlets
diff -purN ../lilypond-1.7.7/input/regression/beam-funky.ly ./input/regression/beam-funky.ly
--- ../lilypond-1.7.7/input/regression/beam-funky.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-funky.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
     texidoc = "Knee beaming. (funky)"
 }
diff -purN ../lilypond-1.7.7/input/regression/beaming.ly ./input/regression/beaming.ly
--- ../lilypond-1.7.7/input/regression/beaming.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beaming.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/regression/beaming-ternary-metrum.ly ./input/regression/beaming-ternary-metrum.ly
--- ../lilypond-1.7.7/input/regression/beaming-ternary-metrum.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beaming-ternary-metrum.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "automatic beaming also works in ternary time sigs."
 }
diff -purN ../lilypond-1.7.7/input/regression/beam-length.ly ./input/regression/beam-length.ly
--- ../lilypond-1.7.7/input/regression/beam-length.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-length.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/regression/beam-manual.ly ./input/regression/beam-manual.ly
--- ../lilypond-1.7.7/input/regression/beam-manual.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-manual.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 
diff -purN ../lilypond-1.7.7/input/regression/beam-multiple-cross-staff.ly ./input/regression/beam-multiple-cross-staff.ly
--- ../lilypond-1.7.7/input/regression/beam-multiple-cross-staff.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-multiple-cross-staff.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
     texidoc = "Kneed beams (often happens with cross-staff beams)
diff -purN ../lilypond-1.7.7/input/regression/beam-over-barline.ly ./input/regression/beam-over-barline.ly
--- ../lilypond-1.7.7/input/regression/beam-over-barline.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-over-barline.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "explicit beams may cross barlines. "
 }
diff -purN ../lilypond-1.7.7/input/regression/beam-position.ly ./input/regression/beam-position.ly
--- ../lilypond-1.7.7/input/regression/beam-position.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-position.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Beams should always reach the middle staff line.  The second beam
diff -purN ../lilypond-1.7.7/input/regression/beam-postfix-notation.ly ./input/regression/beam-postfix-notation.ly
--- ../lilypond-1.7.7/input/regression/beam-postfix-notation.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-postfix-notation.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
 
 texidoc = "Beams and ties may be entered in postfix notation, separating the
diff -purN ../lilypond-1.7.7/input/regression/beam-quarter.ly ./input/regression/beam-quarter.ly
--- ../lilypond-1.7.7/input/regression/beam-quarter.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-quarter.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header
 {
     texidoc= "Quarter notes may be beamed: the beam is halted momentarily."
diff -purN ../lilypond-1.7.7/input/regression/beam-shortened-lengths.ly ./input/regression/beam-shortened-lengths.ly
--- ../lilypond-1.7.7/input/regression/beam-shortened-lengths.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beam-shortened-lengths.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
     texidoc="Beams in unnatural direction, have shortened stems, but do not look too short."
diff -purN ../lilypond-1.7.7/input/regression/beams.ly ./input/regression/beams.ly
--- ../lilypond-1.7.7/input/regression/beams.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/beams.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "beams (simple)"
 }
diff -purN ../lilypond-1.7.7/input/regression/between-systems.ly ./input/regression/between-systems.ly
--- ../lilypond-1.7.7/input/regression/between-systems.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/between-systems.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/regression/break.ly ./input/regression/break.ly
--- ../lilypond-1.7.7/input/regression/break.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/break.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/regression/breathing-sign.ly ./input/regression/breathing-sign.ly
--- ../lilypond-1.7.7/input/regression/breathing-sign.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/breathing-sign.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Breathing signs, also used for phrasing, do normally not influence
diff -purN ../lilypond-1.7.7/input/regression/chord-changes.ly ./input/regression/chord-changes.ly
--- ../lilypond-1.7.7/input/regression/chord-changes.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/chord-changes.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 \header{
 texidoc="property chordChanges: only display chord names when
diff -purN ../lilypond-1.7.7/input/regression/chord-names.ly ./input/regression/chord-names.ly
--- ../lilypond-1.7.7/input/regression/chord-names.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/chord-names.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 texidoc="
 Chord names are generated from a list pitches, and are customisable
diff -purN ../lilypond-1.7.7/input/regression/chord-scripts.ly ./input/regression/chord-scripts.ly
--- ../lilypond-1.7.7/input/regression/chord-scripts.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/chord-scripts.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
 
 texidoc = "Scripts can also be attached to chord elements."
diff -purN ../lilypond-1.7.7/input/regression/chord-tremolo.ly ./input/regression/chord-tremolo.ly
--- ../lilypond-1.7.7/input/regression/chord-tremolo.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/chord-tremolo.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/regression/clefs.ly ./input/regression/clefs.ly
--- ../lilypond-1.7.7/input/regression/clefs.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/clefs.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/regression/cluster.ly ./input/regression/cluster.ly
--- ../lilypond-1.7.7/input/regression/cluster.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/cluster.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.4"
+\version "1.7.6"
 \header {
     texidoc = "Clusters are a device to denote that a complete range of
 notes is to be played."
diff -purN ../lilypond-1.7.7/input/regression/collision-2.ly ./input/regression/collision-2.ly
--- ../lilypond-1.7.7/input/regression/collision-2.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/collision-2.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
     \notes
diff -purN ../lilypond-1.7.7/input/regression/collision-dots.ly ./input/regression/collision-dots.ly
--- ../lilypond-1.7.7/input/regression/collision-dots.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/collision-dots.ly	2002-11-19 11:51:37.000000000 +0100
@@ -4,7 +4,7 @@
   on the right side."
 }
 
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
         \context Staff \notes <
diff -purN ../lilypond-1.7.7/input/regression/collision-heads.ly ./input/regression/collision-heads.ly
--- ../lilypond-1.7.7/input/regression/collision-heads.ly	2002-11-14 11:28:36.000000000 +0100
+++ ./input/regression/collision-heads.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 \header {
     texidoc =
 
diff -purN ../lilypond-1.7.7/input/regression/collision-mesh.ly ./input/regression/collision-mesh.ly
--- ../lilypond-1.7.7/input/regression/collision-mesh.ly	2002-11-14 11:28:37.000000000 +0100
+++ ./input/regression/collision-mesh.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
 texidoc = "Oppositely stemmed chords,  meshing into each other,
 are resolved."
diff -purN ../lilypond-1.7.7/input/regression/collisions.ly ./input/regression/collisions.ly
--- ../lilypond-1.7.7/input/regression/collisions.ly	2002-11-14 11:28:37.000000000 +0100
+++ ./input/regression/collisions.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 texidoc="
 Normal collisions. We have support for polyphony, where the
diff -purN ../lilypond-1.7.7/input/regression/completion-heads.ly ./input/regression/completion-heads.ly
--- ../lilypond-1.7.7/input/regression/completion-heads.ly	2002-11-14 11:28:37.000000000 +0100
+++ ./input/regression/completion-heads.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/regression/completion-heads-polyphony.ly ./input/regression/completion-heads-polyphony.ly
--- ../lilypond-1.7.7/input/regression/completion-heads-polyphony.ly	2002-11-14 11:28:37.000000000 +0100
+++ ./input/regression/completion-heads-polyphony.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
 
     texidoc = "Completion heads are broken across bar lines. This was
diff -purN ../lilypond-1.7.7/input/regression/custos.ly ./input/regression/custos.ly
--- ../lilypond-1.7.7/input/regression/custos.ly	1970-01-01 01:00:00.000000000 +0100
+++ ./input/regression/custos.ly	2002-11-19 00:36:39.000000000 +0100
@@ -0,0 +1,35 @@
+\version "1.7.6"
+\header {
+    texidoc = "custodes in various styles."
+}
+
+\score {
+    \notes {
+	\property Staff.Custos \set #'neutral-position = #4
+	\property Staff.Custos \set #'neutral-direction = #-1
+	\property Staff.Custos \set #'adjust-if-on-staffline = ##t
+
+	\property Staff.Custos \set #'style = #'hufnagel
+	c'1^"Custos style = \#'hufnagel"
+	\break << d' a' f''>>1
+
+	\property Staff.Custos \set #'style = #'medicaea
+	c'1^"Custos style = \#'medicaea"
+	\break << d' a' f''>>1
+
+	\property Staff.Custos \set #'style = #'vaticana
+	c'1^"Custos style = \#'vaticana"
+	\break << d' a' f''>>1
+
+	\property Staff.Custos \set #'style = #'mensural
+	c'1^"Custos style = \#'mensural"
+	\break << d' a' f''>>1
+    }
+    \paper {
+	\translator {
+	    \StaffContext
+	    \consists Custos_engraver
+	}
+    }
+}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/dot-flag-collision.ly ./input/regression/dot-flag-collision.ly
--- ../lilypond-1.7.7/input/regression/dot-flag-collision.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/dot-flag-collision.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Dots move to the right when a collision with the (up)flag happens"
 }
@@ -15,3 +15,4 @@
     \paper { linewidth = -1. }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/dots.ly ./input/regression/dots.ly
--- ../lilypond-1.7.7/input/regression/dots.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/dots.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Noteheads can have dots, and rests can too.  Augmentation dots should
@@ -15,13 +15,13 @@ a column.  The dots go along as rests ar
   \context Voice \notes\relative c'' {
     \time 6/8
 	d4. g,,
-	<b''4. c d e>  <f g a b>
-	<g b d> <c, g' d' a'>
+	<<b'' c d e>>4.  <<f g a b>>
+	<<g b d>> <<c, g' d' a'>>
 	
 	
 	\context Staff <
-		\context Voice = VA {  \stemUp   f''  <b c> r4.  }
-		\context Voice = VB {  \stemDown b, <a b> r4. }
+		\context Voice = VA {  \stemUp   f''  <<b c>> r4.  }
+		\context Voice = VB {  \stemDown b, <<a b>> r4. }
 	>
 	
 	
@@ -29,3 +29,4 @@ a column.  The dots go along as rests ar
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/drums.ly ./input/regression/drums.ly
--- ../lilypond-1.7.7/input/regression/drums.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/drums.ly	2002-11-19 11:51:37.000000000 +0100
@@ -8,10 +8,10 @@ texidoc = "Drum notation, although kludg
 
 \include "drumpitch-init.ly"
 
-\version "1.5.68"
+\version "1.7.6"
 
 drh = \notes { cymc4.^"crash" hhc16^"h.h." hh \repeat "unfold" 5 {hhc8 hho hhc8 hh16 hh} hhc4 r4 r2 }
-drl = \notes {\repeat "unfold" 3 {bd4 sn8 bd bd4 <bd ss>} bd8 tommh tommh bd toml toml bd tomfh16 tomfh }
+drl = \notes {\repeat "unfold" 3 {bd4 sn8 bd bd4 <<bd ss>>} bd8 tommh tommh bd toml toml bd tomfh16 tomfh }
 timb = \notes \repeat "unfold" 2 {timh4 ssh timl8 ssh r timh r4 ssh8 timl r4 cb8 cb}
 
 \score { \repeat "volta" 2
@@ -61,3 +61,4 @@ timb = \notes \repeat "unfold" 2 {timh4 
   \midi{ \tempo 4=120 }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/dynamics-broken-hairpin.ly ./input/regression/dynamics-broken-hairpin.ly
--- ../lilypond-1.7.7/input/regression/dynamics-broken-hairpin.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/dynamics-broken-hairpin.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc = "Broken crescendi should look be open on one side."
 }
@@ -11,3 +11,4 @@ texidoc = "Broken crescendi should look 
   }
 }
   
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/dynamics-glyphs.ly ./input/regression/dynamics-glyphs.ly
--- ../lilypond-1.7.7/input/regression/dynamics-glyphs.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/dynamics-glyphs.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {texidoc = "Dynamic letters are kerned, and their weight
 matches that of the hairpin signs.  The dynamic scripts should be
@@ -9,12 +9,13 @@ closer to the note head (staccato, accen
 \score {
     
 \notes\relative c'' { c1-\ff
-		      e,-.-> \f
+		      e,-.-> -\f
 		      e \rfz		      
-		      c' \mf
-		      c \mp \> \!
+		      c' -\mf
+		      c -\mp \> \!
 		      c \ppppp \< \!
 		      c \sfp
 		      
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/dynamics-line.ly ./input/regression/dynamics-line.ly
--- ../lilypond-1.7.7/input/regression/dynamics-line.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/dynamics-line.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc=" Dynamics appear below or above the staff.  If multiple
 dynamics are linked with (de)crescendi, they should be on the same
@@ -18,7 +18,7 @@ a
 
 % because do_removal_processing ()
 % doesn't seem to post_process elements
-d\f
+d-\f
 
 a
 
@@ -29,3 +29,4 @@ a
 \tempo 1 = 60
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/dynamics-unbound-hairpin.ly ./input/regression/dynamics-unbound-hairpin.ly
--- ../lilypond-1.7.7/input/regression/dynamics-unbound-hairpin.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/dynamics-unbound-hairpin.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc = "Crescendi may start off-notes. In that case, they should  not collapse into flat lines."
@@ -10,3 +10,4 @@ texidoc = "Crescendi may start off-notes
 
 \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/easy-notation.ly ./input/regression/easy-notation.ly
--- ../lilypond-1.7.7/input/regression/easy-notation.ly	2002-07-21 04:30:17.000000000 +0200
+++ ./input/regression/easy-notation.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc  = " Ez-notation prints names in note heads.
@@ -14,3 +14,4 @@ You also get ledger lines, of course."
 		 linewidth = -1. 
 	     } 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/figured-bass.ly ./input/regression/figured-bass.ly
--- ../lilypond-1.7.7/input/regression/figured-bass.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/figured-bass.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Test figured bass.
 
@@ -24,3 +24,6 @@ numbers, like @code{<4 6+>}.
  
 >
  }
+%% new-chords-done %%
+%% new-chords-done %%
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/finger-chords.ly ./input/regression/finger-chords.ly
--- ../lilypond-1.7.7/input/regression/finger-chords.ly	2002-11-14 11:28:37.000000000 +0100
+++ ./input/regression/finger-chords.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
 
 texidoc = "With the new chord syntax it's possible to associate
@@ -26,3 +27,5 @@ easier to process."
 }
 
 %% new-chords-done %%
+%% new-chords-done %%
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/fingering.ly ./input/regression/fingering.ly
--- ../lilypond-1.7.7/input/regression/fingering.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/regression/fingering.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Automatic fingering tries to put fingering instructions
@@ -10,7 +10,9 @@ next to noteheads.
 
  \notes\relative c' {
  c4-4
-  <c-1 f-4>
-  < c-1 e-2 g-3  b-4 >
+  <<c-1 f-4>>
+  << c-1 e-2 g-3  b-4 >>
 }}
  
+%% new-chords-done %%
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/font-magnification.ly ./input/regression/font-magnification.ly
--- ../lilypond-1.7.7/input/regression/font-magnification.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/font-magnification.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header { texidoc = "The magnification can be set for any font. Note
 that this doesn't change variable symbols such as beams or slurs. " }
 
@@ -21,3 +21,5 @@ c4
 
 }
 
+%% new-chords-done %%
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/generic-output-property.ly ./input/regression/generic-output-property.ly
--- ../lilypond-1.7.7/input/regression/generic-output-property.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/generic-output-property.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -26,3 +26,4 @@ setting the @code{extra-offset} of a gro
 	linewidth=-1.0
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/glissando.ly ./input/regression/glissando.ly
--- ../lilypond-1.7.7/input/regression/glissando.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/regression/glissando.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 
@@ -31,3 +31,4 @@ The engraver does no time-keeping, so it
 	}
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-auto-beam.ly ./input/regression/grace-auto-beam.ly
--- ../lilypond-1.7.7/input/regression/grace-auto-beam.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-auto-beam.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header
 {
     texidoc = "The autobeamer is not confusde by grace notes."
@@ -11,3 +11,4 @@
         \grace a8 g16 f e f |
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-bar-line.ly ./input/regression/grace-bar-line.ly
--- ../lilypond-1.7.7/input/regression/grace-bar-line.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-bar-line.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Bar line should come before the grace note."
 }
@@ -11,3 +11,4 @@ texidoc = "Bar line should come before t
  f1 \grace { [a'16 f]  } g1 }
 		\paper { linewidth = -1. }
  } 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-bar-number.ly ./input/regression/grace-bar-number.ly
--- ../lilypond-1.7.7/input/regression/grace-bar-number.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-bar-number.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Grace notes do tricky things with timing. If a measure
@@ -12,3 +12,4 @@ printed correctly.
 \score { \notes\relative c''' { c1 \break
 \grace c8
 c1  }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-beam.ly ./input/regression/grace-beam.ly
--- ../lilypond-1.7.7/input/regression/grace-beam.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/grace-beam.ly	2002-11-19 11:51:37.000000000 +0100
@@ -5,5 +5,6 @@ Unbeamed grace notes are not put into no
 "
 }
 
-\version "1.5.68"
+\version "1.7.6"
 \score { \notes\relative c'' { c4 [d8 \grace { [e32  d c d] } e8] [e  e \grace { f16 } e8 e]   }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-dynamic.ly ./input/regression/grace-dynamic.ly
--- ../lilypond-1.7.7/input/regression/grace-dynamic.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/grace-dynamic.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
  % ?
 % niet zo onschuldig!  je hebt graces gefixt in 1.5, zie maar eens 1.3.150
@@ -6,3 +6,4 @@ texidoc="Dynamics on grace notes are sma
 }
  
  \score { \notes \context Voice {\grace {c'_\f} d e f g}}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace.ly ./input/regression/grace.ly
--- ../lilypond-1.7.7/input/regression/grace.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/grace.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -23,7 +23,7 @@ not set.  Main note scripts don't end up
 	\grace { [cis32 dis32] } e4
 	\grace { [c32 d] }\times 2/3 { [c8 c c] }
 	 \grace { [b32 ( c32] } ) c4
-	\grace  <c16 d16> [c8 c8]
+	\grace  <<c d>>16 [c8 c8]
 %	\grace  c16 [c8 c8]
         %% broken?
 	%%\grace  { \property Grace.graceAlignPosition = \right c16} c4
@@ -32,3 +32,4 @@ not set.  Main note scripts don't end up
 \paper {linewidth = -1.}
 \midi{ }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-nest1.ly ./input/regression/grace-nest1.ly
--- ../lilypond-1.7.7/input/regression/grace-nest1.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-nest1.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "grace code should not be confused by nested sequential musics, containing grace notes; practically speaking, this means that the end-bar and measure bar coincide in this example." 
 
@@ -11,3 +11,4 @@ texidoc = "grace code should not be conf
 }
  }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-nest2.ly ./input/regression/grace-nest2.ly
--- ../lilypond-1.7.7/input/regression/grace-nest2.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-nest2.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "grace code should not be confused by nested sequential musics, containing grace notes; practically speaking, this means that the end-bar and measure bar coincide in this example." 
 
@@ -8,3 +8,4 @@ texidoc = "grace code should not be conf
 	 { \grace b'8 c''2 }
        \grace b'16 c''4 c''4 \bar "|."
     }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-nest3.ly ./input/regression/grace-nest3.ly
--- ../lilypond-1.7.7/input/regression/grace-nest3.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-nest3.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { \notes \relative c'' {
 	f1
@@ -6,3 +6,4 @@
         < { \grace { e8 } f1 } >
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-nest4.ly ./input/regression/grace-nest4.ly
--- ../lilypond-1.7.7/input/regression/grace-nest4.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-nest4.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Another combination of grace note nesting."
 }
@@ -13,3 +13,4 @@ texidoc = "Another combination of grace 
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-nest5.ly ./input/regression/grace-nest5.ly
--- ../lilypond-1.7.7/input/regression/grace-nest5.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-nest5.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,8 +1,9 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score
 { \notes {
-     s2 <f4>
+     s2 <<f>>4
     \grace g e4
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-nest.ly ./input/regression/grace-nest.ly
--- ../lilypond-1.7.7/input/regression/grace-nest.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-nest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "grace code should not be confused by nested sequential musics, containing grace notes; practically speaking, this means that the end-bar and measure bar coincide in this example." 
 
@@ -11,3 +11,4 @@ texidoc = "grace code should not be conf
 }
  }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-part-combine.ly ./input/regression/grace-part-combine.ly
--- ../lilypond-1.7.7/input/regression/grace-part-combine.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-part-combine.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "partcombiner and grace notes can go together"
 }
@@ -16,3 +16,4 @@
 	>
     >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-staff-length.ly ./input/regression/grace-staff-length.ly
--- ../lilypond-1.7.7/input/regression/grace-staff-length.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/grace-staff-length.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc = "Stripped version of trip.ly.  Staffs should be of correct length."
 }
@@ -18,3 +18,4 @@ texidoc = "Stripped version of trip.ly. 
   > 
   \paper { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-start.ly ./input/regression/grace-start.ly
--- ../lilypond-1.7.7/input/regression/grace-start.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-start.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Pieces may begin with grace notes."
 }
@@ -10,3 +10,4 @@ texidoc = "Pieces may begin with grace n
   }
   \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-stems.ly ./input/regression/grace-stems.ly
--- ../lilypond-1.7.7/input/regression/grace-stems.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/grace-stems.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc = "startGraceMusic should no-stem-extend to true;
 the two grace beams should be the same here.
@@ -22,3 +22,4 @@ the two grace beams should be the same h
   }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-sync.ly ./input/regression/grace-sync.ly
--- ../lilypond-1.7.7/input/regression/grace-sync.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-sync.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header  {
   texidoc = "grace notes in different voices/staves are synchronized."
 }
@@ -14,3 +14,4 @@
 		>
 		\paper { linewidth = -1. }
  } 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-unfold-repeat.ly ./input/regression/grace-unfold-repeat.ly
--- ../lilypond-1.7.7/input/regression/grace-unfold-repeat.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-unfold-repeat.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Grace notes and unfolded repeats.
 Line breaks may happen before  grace  notes.
@@ -14,3 +14,4 @@ Line breaks may happen before  grace  no
 
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/grace-volta-repeat.ly ./input/regression/grace-volta-repeat.ly
--- ../lilypond-1.7.7/input/regression/grace-volta-repeat.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/grace-volta-repeat.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 
@@ -19,3 +19,4 @@
  }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/hairpin-ending.ly ./input/regression/hairpin-ending.ly
--- ../lilypond-1.7.7/input/regression/hairpin-ending.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/hairpin-ending.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 
@@ -10,6 +10,7 @@ into them."
 
 
 \score {
-\notes \relative c'' { c4 \> c4 \! c4 c4_\ff \> c4 \! c4 \p }
+\notes \relative c'' { c4 \> c4 \! c4 c4_\ff \> c4 \! c4 -\p }
 \paper { linewidth = -1.} 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/hara-kiri-pianostaff.ly ./input/regression/hara-kiri-pianostaff.ly
--- ../lilypond-1.7.7/input/regression/hara-kiri-pianostaff.ly	2002-11-06 13:33:58.000000000 +0100
+++ ./input/regression/hara-kiri-pianostaff.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
 texidoc = "Hara kiri should not upset fixed distance alignment like in pianostaff. In this example the middle staff is harakiried."
 }
@@ -17,3 +17,4 @@ texidoc = "Hara kiri should not upset fi
  }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/hara-kiri-short.ly ./input/regression/hara-kiri-short.ly
--- ../lilypond-1.7.7/input/regression/hara-kiri-short.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/hara-kiri-short.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Hara kiri staves kill themselves if they are empty.  This example really
@@ -46,3 +46,4 @@ zagers =  \context StaffGroup <
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/key-signature-scordatura.ly ./input/regression/key-signature-scordatura.ly
--- ../lilypond-1.7.7/input/regression/key-signature-scordatura.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/key-signature-scordatura.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header { texidoc = "Key signatures can be set per pitch
 individually. This can be done bby setting @code{Staff.keySignature}
@@ -14,3 +14,4 @@ directly."
   e a, g a
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/keys.ly ./input/regression/keys.ly
--- ../lilypond-1.7.7/input/regression/keys.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/keys.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Key signatures appear on key  changes. They may also
@@ -25,3 +25,4 @@ also created on a clef change.
 	e2
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/+.ly ./input/regression/+.ly
--- ../lilypond-1.7.7/input/regression/+.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/+.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 %% +.ly: Be the first .ly file for lys-to-tely.py.
 %% Better to make lys-to-tely.py include "introduction.texi" or
 %% other .texi documents too?
diff -purN ../lilypond-1.7.7/input/regression/lyric-align.ly ./input/regression/lyric-align.ly
--- ../lilypond-1.7.7/input/regression/lyric-align.ly	2002-09-20 11:21:06.000000000 +0200
+++ ./input/regression/lyric-align.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
   texidoc="Lyric alignment
 
@@ -75,3 +75,4 @@
    >
    >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/lyric-combine.ly ./input/regression/lyric-combine.ly
--- ../lilypond-1.7.7/input/regression/lyric-combine.ly	2002-08-12 13:27:14.000000000 +0200
+++ ./input/regression/lyric-combine.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc= "Lyrics can be set to a melody automatically.  Excess lyrics will be
@@ -44,3 +44,4 @@ textII = \context LyricsVoice = "middle-
     >
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/lyric-combine-polyphonic.ly ./input/regression/lyric-combine-polyphonic.ly
--- ../lilypond-1.7.7/input/regression/lyric-combine-polyphonic.ly	2002-09-15 23:35:05.000000000 +0200
+++ ./input/regression/lyric-combine-polyphonic.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
 
 texidoc ="polyphonic rhythms and rests don't disturb
@@ -37,3 +38,4 @@ texidoc ="polyphonic rhythms and rests d
     }
     \paper { linewidth=-1.0 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/lyric-phrasing.ly ./input/regression/lyric-phrasing.ly
--- ../lilypond-1.7.7/input/regression/lyric-phrasing.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/lyric-phrasing.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
   texidoc="Lyric phrasing
 
@@ -40,3 +40,4 @@
       }
    >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/lyrics-bar.ly ./input/regression/lyrics-bar.ly
--- ../lilypond-1.7.7/input/regression/lyrics-bar.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/lyrics-bar.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -39,3 +39,4 @@ lyrics don't collide with barlines.
 		}
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/lyrics-extender.ly ./input/regression/lyrics-extender.ly
--- ../lilypond-1.7.7/input/regression/lyrics-extender.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/lyrics-extender.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
     texidoc =
 
@@ -26,3 +26,4 @@ vielt __ Zeit. __ " " 
 \paper { linewidth = 5.0\cm
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/lyrics-multi-stanza.ly ./input/regression/lyrics-multi-stanza.ly
--- ../lilypond-1.7.7/input/regression/lyrics-multi-stanza.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/lyrics-multi-stanza.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Lyrics syllables are aligned according to
@@ -21,3 +21,4 @@ texidoc = "Lyrics syllables are aligned 
   \paper { linewidth = -1.0}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/markup-stack.ly ./input/regression/markup-stack.ly
--- ../lilypond-1.7.7/input/regression/markup-stack.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/markup-stack.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,5 +1,6 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {texidoc="Stacking of markup scripts."}
 \paper { linewidth=-1. }
 \score { \notes { c^#`(columns "" (lines "1" (bold "2") "3"))}}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/measure-grouping.ly ./input/regression/measure-grouping.ly
--- ../lilypond-1.7.7/input/regression/measure-grouping.ly	2002-11-13 01:40:18.000000000 +0100
+++ ./input/regression/measure-grouping.ly	2002-11-19 11:51:37.000000000 +0100
@@ -30,3 +30,4 @@ of Steve Martland's Dance Works. "
 			   }
 	     }
 	 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/mensural.ly ./input/regression/mensural.ly
--- ../lilypond-1.7.7/input/regression/mensural.ly	2002-11-06 13:33:58.000000000 +0100
+++ ./input/regression/mensural.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
     
 texidoc = "There is limited support for mensural notation: note head
@@ -14,3 +14,4 @@ both for up and down stems."
 \transpose c d'' {  c4 c2 c8  c16 c16  c1 c\breve c\longa }
 \transpose c c' { c4 c2 c8  c16 c16  c1 c\breve c\longa }
 }}}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/merge-differently-dotted.ly ./input/regression/merge-differently-dotted.ly
--- ../lilypond-1.7.7/input/regression/merge-differently-dotted.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/regression/merge-differently-dotted.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 \header {
 
 texidoc = "If NoteCollision has merge-differently-dotted set, note
@@ -15,3 +15,4 @@ heads that have differing dot counts may
   \context Voice = VB { \voiceTwo [g'8. f16] [g'8. f'16] } 
   >
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/mm-rests2.ly ./input/regression/mm-rests2.ly
--- ../lilypond-1.7.7/input/regression/mm-rests2.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/mm-rests2.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -30,3 +30,4 @@ R1*11 | 
 
 	>
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/molecule-hacking.ly ./input/regression/molecule-hacking.ly
--- ../lilypond-1.7.7/input/regression/molecule-hacking.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/regression/molecule-hacking.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \header { texidoc=" You can write molecule callbacks in Scheme, thus
 providing custom glyphs for notation elements.  A simple example is
@@ -74,3 +74,4 @@ GROB.  The dimensions of the molecule is
 	\paper { linewidth = -1. }
 	}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/multi-measure-rest-center.ly ./input/regression/multi-measure-rest-center.ly
--- ../lilypond-1.7.7/input/regression/multi-measure-rest-center.ly	2002-10-23 00:14:06.000000000 +0200
+++ ./input/regression/multi-measure-rest-center.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header
 {
   texidoc = "The multimeasure rest is centered exactly between bar lines."
@@ -16,3 +17,4 @@
     \paper { linewidth = -1.0 } 
 }
 	 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/multi-measure-rest.ly ./input/regression/multi-measure-rest.ly
--- ../lilypond-1.7.7/input/regression/multi-measure-rest.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/regression/multi-measure-rest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 
 texidoc="
@@ -34,3 +34,4 @@ Rests over measures during longer than 2
 	linewidth = -1.	
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/non-empty-text.ly ./input/regression/non-empty-text.ly
--- ../lilypond-1.7.7/input/regression/non-empty-text.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/non-empty-text.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
     texidoc="
@@ -20,3 +20,4 @@ TextScript.no-spacing-rods is used to co
 	linewidth  = 3.0\cm
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/note-group-bracket.ly ./input/regression/note-group-bracket.ly
--- ../lilypond-1.7.7/input/regression/note-group-bracket.ly	2002-10-05 03:52:49.000000000 +0200
+++ ./input/regression/note-group-bracket.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 
 \header {
 
@@ -33,3 +34,4 @@ brackets for analysis start and end.
 	linewidth = -1.0
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/note-head-chord.ly ./input/regression/note-head-chord.ly
--- ../lilypond-1.7.7/input/regression/note-head-chord.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/note-head-chord.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
     texidoc = "Note heads are flipped on the stem to prevent collisions.
@@ -9,9 +9,10 @@ It also works for whole heads that have 
 
 \score { \notes \relative c''
 	 \context Thread {
-	     <g4 a c>
-	     <c d g a>
-	     <c d e >
-	     <c c g>
-	     <c1 d f g>
+	     <<g a c>>4
+	     <<c d g a>>
+	     <<c d e >>
+	     <<c c g>>
+	     <<c d f g>>1
     }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/note-head-style.ly ./input/regression/note-head-style.ly
--- ../lilypond-1.7.7/input/regression/note-head-style.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/note-head-style.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Note head shapes are settable.  The stem endings should be adjusted
@@ -66,3 +66,4 @@ c4 c2 c8  c16 c16  c1 c\breve c\longa b4
 
     \paper {}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/note-line.ly ./input/regression/note-line.ly
--- ../lilypond-1.7.7/input/regression/note-line.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/note-line.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc = "Note head lines (eg glissando)
@@ -29,3 +29,4 @@ sd = \notes{ \translator Staff = down}
 }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/number-staff-lines.ly ./input/regression/number-staff-lines.ly
--- ../lilypond-1.7.7/input/regression/number-staff-lines.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/number-staff-lines.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc=" The number of stafflines of a staff can be set.  Ledger
@@ -17,3 +17,4 @@ StaffSymbol \override #'line-count = #3
 }  }
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/pc-mmrest.ly ./input/regression/pc-mmrest.ly
--- ../lilypond-1.7.7/input/regression/pc-mmrest.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/regression/pc-mmrest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 \header {
 texidoc="Multi measure rests of second voice should not disappear."
 }
@@ -7,16 +7,16 @@ texidoc="Multi measure rests of second v
 #(ly:set-point-and-click 'line-column)
 one = \notes\relative c'' {
 
-	f4 \!e-.\f r2|
+	f4 \!e-.-\f r2|
 	R1|
-	f2\p()es|
+	f2-\p()es|
 	\property Voice.crescendoText = #'(lines " " "cresc." " ")
 	\property Voice.crescendoSpanner = #'dashed-line
 	d1\<|
 	d1|
 	d2 d2|
 	d2 d2|
-	\!f1\ff  |
+	\!f1-\ff  |
 	f1
 }
 
@@ -56,4 +56,4 @@ two = \notes \relative c'' {
       RestCollision \override #'maximum-rest-count = #1
     }
   }
-}
\ No newline at end of file
+}%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/pc-switch-slur.ly ./input/regression/pc-switch-slur.ly
--- ../lilypond-1.7.7/input/regression/pc-switch-slur.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/pc-switch-slur.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="The partcombiner should not combine two small slurs into a big one."
 }
@@ -24,3 +24,4 @@ texidoc="The partcombiner should not com
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/pedal.ly ./input/regression/pedal.ly
--- ../lilypond-1.7.7/input/regression/pedal.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/pedal.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc = "Piano pedal symbols merge stop and start.  The strings are configurable. 
 Text style, bracket style, and a mixture of both are supported.
@@ -15,14 +15,14 @@ Brackets work  across line breaks.
 \context Staff \notes\relative c'{
 
 c4 d e f g 
-\sustainDown b c c, |
-  [d16  c  c c] [e e \sustainUp \sustainDown e e ] f4 \sustainUp
-    g\sustainDown |
-  b \sustainUp c 
+-\sustainDown b c c, |
+  [d16  c  c c] [e e -\sustainUp -\sustainDown e e ] f4 -\sustainUp
+    g-\sustainDown |
+  b -\sustainUp c 
   \property Staff.pedalSustainStrings = #'("-" "-P" "P")
   \property Staff.SustainPedal \override #'padding = #-2
-  c, \sustainDown d e \sustainUp \sustainDown f
-  \sustainUp g b 
+  c, -\sustainDown d e -\sustainUp -\sustainDown f
+  -\sustainUp g b 
 
   \property Staff.UnaCordaPedal \override #'pedal-type = #'mixed
   d \unaCorda e f g
@@ -32,8 +32,8 @@ c4 d e f g 
 
 \property Staff.SustainPedal \override #'pedal-type = #'bracket
 
-c4 d e \sustainDown b c c, \sustainUp \sustainDown [d8 c] [e8 e \sustainUp \sustainDown] f4 d
-\sustainUp g \sustainDown b b, \sustainUp c'
+c4 d e -\sustainDown b c c, -\sustainUp -\sustainDown [d8 c] [e8 e -\sustainUp -\sustainDown] f4 d
+-\sustainUp g -\sustainDown b b, -\sustainUp c'
 c4 
 
 
@@ -45,3 +45,4 @@ c4 
 \tempo 4 = 60
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/percent-repeat.ly ./input/regression/percent-repeat.ly
--- ../lilypond-1.7.7/input/regression/percent-repeat.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/percent-repeat.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Measure and beat repeats are supported."
 }
@@ -17,3 +17,4 @@ texidoc = "Measure and beat repeats are 
 
 
      }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/phrasing-slur.ly ./input/regression/phrasing-slur.ly
--- ../lilypond-1.7.7/input/regression/phrasing-slur.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/phrasing-slur.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc="Slurs play well with phrasing slur."
@@ -12,3 +12,4 @@ texidoc="Slurs play well with phrasing s
     linewidth = -1.
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/prefatory-empty-spacing.ly ./input/regression/prefatory-empty-spacing.ly
--- ../lilypond-1.7.7/input/regression/prefatory-empty-spacing.ly	2002-09-15 23:35:05.000000000 +0200
+++ ./input/regression/prefatory-empty-spacing.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 
 \header {
 
@@ -11,3 +12,4 @@ the break alignment."
 a a a a \break
 \mark A
 a a a a}}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/prefatory-spacing-matter.ly ./input/regression/prefatory-spacing-matter.ly
--- ../lilypond-1.7.7/input/regression/prefatory-spacing-matter.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/prefatory-spacing-matter.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "prefatory spacing
 
@@ -14,3 +14,4 @@ TODO: show all common combinations to ch
 }
 \paper  { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/property-once.ly ./input/regression/property-once.ly
--- ../lilypond-1.7.7/input/regression/property-once.ly	2002-09-15 23:35:05.000000000 +0200
+++ ./input/regression/property-once.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
     texidoc = "Once properties take effect during a single time step only."
 }
@@ -13,3 +14,4 @@
   }
 }
  
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/repeat-fold.ly ./input/regression/repeat-fold.ly
--- ../lilypond-1.7.7/input/regression/repeat-fold.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/repeat-fold.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -16,3 +16,4 @@ Folded.  This doesn't make sense without
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/repeat-line-break.ly ./input/regression/repeat-line-break.ly
--- ../lilypond-1.7.7/input/regression/repeat-line-break.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/repeat-line-break.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -16,3 +16,4 @@ bracket should be equal
 
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/repeat-unfold-all.ly ./input/regression/repeat-unfold-all.ly
--- ../lilypond-1.7.7/input/regression/repeat-unfold-all.ly	2002-08-19 12:59:12.000000000 +0200
+++ ./input/regression/repeat-unfold-all.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
     texidoc = "Repeats may be unfolded through the Scheme function @code{unfold-repeats}."
@@ -15,3 +15,4 @@ nots = \notes\relative c'   {
 }
 \paper {linewidth=-1.} 
      }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/repeat-unfold.ly ./input/regression/repeat-unfold.ly
--- ../lilypond-1.7.7/input/regression/repeat-unfold.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/repeat-unfold.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -25,3 +25,4 @@ Unfolded behavior:
 \repeat unfold 2 { c^"2x 3a" d } \alternative { e f g } 
 }}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/repeat-volta.ly ./input/regression/repeat-volta.ly
--- ../lilypond-1.7.7/input/regression/repeat-volta.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/repeat-volta.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -21,3 +21,4 @@ If they don't barlines should still be s
   \midi {}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/repeat-volta-skip-alternatives.ly ./input/regression/repeat-volta-skip-alternatives.ly
--- ../lilypond-1.7.7/input/regression/repeat-volta-skip-alternatives.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/repeat-volta-skip-alternatives.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,5 +1,6 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {  \notes \context Voice {
   \repeat volta 3 c1
     \alternative { d f } e4 } } 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/rest-collision-default.ly ./input/regression/rest-collision-default.ly
--- ../lilypond-1.7.7/input/regression/rest-collision-default.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/rest-collision-default.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header
 {
@@ -14,3 +14,4 @@ texidoc = "Rests in collisions sit oppos
     r4 }
 \context Voice=lower {\voiceTwo
 b8  }>}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/rest-collision.ly ./input/regression/rest-collision.ly
--- ../lilypond-1.7.7/input/regression/rest-collision.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/regression/rest-collision.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 texidoc="
 Rests should not collide with beams, stems and noteheads.  Rests may
@@ -60,3 +60,4 @@ restsII =  \context Staff \notes {
 }	
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/rest-ledger.ly ./input/regression/rest-ledger.ly
--- ../lilypond-1.7.7/input/regression/rest-ledger.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/rest-ledger.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "whole and half rests moving outside the staff should get
 ledger lines"
@@ -29,3 +29,4 @@ ledger lines"
 
   
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/rest.ly ./input/regression/rest.ly
--- ../lilypond-1.7.7/input/regression/rest.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/rest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -16,3 +16,4 @@ r1 r2 r4 r8 r16 r32 r64 r128 r128
 \time 6/4
 r1. r2. r4. r8. r16. r32. r64. r128. r128.
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/rest-pitch.ly ./input/regression/rest-pitch.ly
--- ../lilypond-1.7.7/input/regression/rest-pitch.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/rest-pitch.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Rests can have pitches--these will be affected by
@@ -15,3 +15,4 @@ collision will leave it alone."
 <d \\  r> 
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/rhythmic-staff.ly ./input/regression/rhythmic-staff.ly
--- ../lilypond-1.7.7/input/regression/rhythmic-staff.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/rhythmic-staff.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header
 {
 
@@ -10,3 +10,4 @@
 	     r4 c4. c8 r8 c8 | c2 r2 | r1
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/script-collision.ly ./input/regression/script-collision.ly
--- ../lilypond-1.7.7/input/regression/script-collision.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/script-collision.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 
@@ -9,9 +9,10 @@
 \score  {
 \notes \relative c'' {
   c4
-  <c d c'-\marcato>
+  <<c d c'>>-\marcato
   < \context Voice = VA { \voiceOne c4^^ }
     \context Voice = VB { \voiceTwo d4_^} >
     }
 \paper { linewidth = -1. }
     }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/script-stacked.ly ./input/regression/script-stacked.ly
--- ../lilypond-1.7.7/input/regression/script-stacked.ly	2002-09-20 11:21:06.000000000 +0200
+++ ./input/regression/script-stacked.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,7 +1,8 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header { 
 texidoc = "Scripts may be stacked."
 }
 
 \score { \notes { c'''->-. } }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/script-stack-order.ly ./input/regression/script-stack-order.ly
--- ../lilypond-1.7.7/input/regression/script-stack-order.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/script-stack-order.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Scripts can be stacked. The order is determined by a
 priority field, but when objects have the same priority, the input
@@ -9,3 +9,4 @@ order determines the order. Objects spec
 \score{ \notes { c4^"inner up"^"outer up"_"inner down"_"outer down" }
 	\paper { linewidth = -1. }
     } 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-attachment.ly ./input/regression/slur-attachment.ly
--- ../lilypond-1.7.7/input/regression/slur-attachment.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/slur-attachment.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -19,3 +19,4 @@ with beams.  Also see: ophee-slurs.
 		linewidth = 100.\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-broken-trend.ly ./input/regression/slur-broken-trend.ly
--- ../lilypond-1.7.7/input/regression/slur-broken-trend.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/slur-broken-trend.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -21,3 +21,4 @@ in unbroken state.
 		indent=0.
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-cross-staff.ly ./input/regression/slur-cross-staff.ly
--- ../lilypond-1.7.7/input/regression/slur-cross-staff.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/slur-cross-staff.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 The same goes for slurs. They behave decently when broken across
@@ -47,3 +47,4 @@ linebreak.
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-dots.ly ./input/regression/slur-dots.ly
--- ../lilypond-1.7.7/input/regression/slur-dots.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/slur-dots.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="Slurs should not get confused by augmentation dots.  We use a lot
 of dots here, to make problems more visible."
@@ -11,3 +11,4 @@ of dots here, to make problems more visi
     linewidth = -1.
   }
 } 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-nice.ly ./input/regression/slur-nice.ly
--- ../lilypond-1.7.7/input/regression/slur-nice.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/slur-nice.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Slurs should look nice and symmetric.  The curvature may increase
@@ -22,3 +22,4 @@ run through noteheads or stems.
 		linewidth = 120.\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-rest.ly ./input/regression/slur-rest.ly
--- ../lilypond-1.7.7/input/regression/slur-rest.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/slur-rest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header
 {
     texidoc ="Slurs may be placed over rest. The slur will avoid colliding with
@@ -16,3 +16,4 @@ the rest
 	      }
 \paper { linewidth = -1. }
     }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-staccato.ly ./input/regression/slur-staccato.ly
--- ../lilypond-1.7.7/input/regression/slur-staccato.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/slur-staccato.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc="Manual hack for slur and staccato."
 }
@@ -14,4 +14,4 @@ texidoc="Manual hack for slur and stacca
       #'attachment-offset = #'((0 . 1.5) . (0 . 1.5))
     b-.( a-. )b-.
   }
-}	
\ No newline at end of file
+}	%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-stem-broken.ly ./input/regression/slur-stem-broken.ly
--- ../lilypond-1.7.7/input/regression/slur-stem-broken.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/slur-stem-broken.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc="Trend of broken slur with user-overridden stem attachment should also
 follow the same vertical direction it would have had in unbroken state."
@@ -13,3 +13,4 @@ follow the same vertical direction it wo
     linewidth=40*\staffspace
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-symmetry-1.ly ./input/regression/slur-symmetry-1.ly
--- ../lilypond-1.7.7/input/regression/slur-symmetry-1.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/slur-symmetry-1.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes\relative c''<
@@ -14,3 +14,4 @@
 		linewidth=-1.
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/slur-symmetry.ly ./input/regression/slur-symmetry.ly
--- ../lilypond-1.7.7/input/regression/slur-symmetry.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/slur-symmetry.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes\relative c'<
@@ -14,3 +14,4 @@
 		linewidth=-1.
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-accidental.ly ./input/regression/spacing-accidental.ly
--- ../lilypond-1.7.7/input/regression/spacing-accidental.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-accidental.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc = "Accidentals sticking out to the left
@@ -14,3 +14,4 @@ of a note will take a little more space,
 
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-accidental-staffs.ly ./input/regression/spacing-accidental-staffs.ly
--- ../lilypond-1.7.7/input/regression/spacing-accidental-staffs.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-accidental-staffs.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header { 
 texidoc = "Accidentals in different staffs don't effect the
@@ -18,3 +18,4 @@ spacing of the quarter notes here."
  }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-bar-stem.ly ./input/regression/spacing-bar-stem.ly
--- ../lilypond-1.7.7/input/regression/spacing-bar-stem.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-bar-stem.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Downstem notes following a barline are
 printed with some extra space. This is an optical correction similar
@@ -22,3 +22,4 @@ su = \property Voice.Stem \set #'directi
 }
 \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-clef-first-note.ly ./input/regression/spacing-clef-first-note.ly
--- ../lilypond-1.7.7/input/regression/spacing-clef-first-note.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-clef-first-note.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
     texidoc = "clef changes at the start of a line get much more space
@@ -22,3 +22,4 @@ than clef changes halfway the line."
 	 }
 
      }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-ended-voice.ly ./input/regression/spacing-ended-voice.ly
--- ../lilypond-1.7.7/input/regression/spacing-ended-voice.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-ended-voice.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header { texidoc = "
 
 A voicelet (a very short voice to get polyphonic chords correct)
@@ -24,3 +24,4 @@ should not confuse the spacing engine."
 }}
 \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-end-of-line.ly ./input/regression/spacing-end-of-line.ly
--- ../lilypond-1.7.7/input/regression/spacing-end-of-line.ly	2002-10-12 23:42:45.000000000 +0200
+++ ./input/regression/spacing-end-of-line.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
     
     texidoc ="Broken matter at the end of line does not upset the
@@ -14,3 +15,4 @@
 \paper {
     raggedright = ##t }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-folded-clef2.ly ./input/regression/spacing-folded-clef2.ly
--- ../lilypond-1.7.7/input/regression/spacing-folded-clef2.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-folded-clef2.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "A clef can be folded below notes in a different staff, if
@@ -22,3 +22,4 @@ show where columns are in the score."
 	}
 	}}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-folded-clef.ly ./input/regression/spacing-folded-clef.ly
--- ../lilypond-1.7.7/input/regression/spacing-folded-clef.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-folded-clef.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "A clef can be folded below notes in a different staff, if
 this doesn't disrupt the flow of the notes."
@@ -11,3 +11,4 @@ this doesn't disrupt the flow of the not
 
 	\paper { linewidth = -1. }
 	}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-grace-duration.ly ./input/regression/spacing-grace-duration.ly
--- ../lilypond-1.7.7/input/regression/spacing-grace-duration.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-grace-duration.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
     texidoc = "Spacing uses the duration of the notes, but disregards
@@ -19,3 +19,4 @@
 
 	 \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-grace.ly ./input/regression/spacing-grace.ly
--- ../lilypond-1.7.7/input/regression/spacing-grace.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-grace.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   texidoc = "Grace note spacing. Should be tuned? "
 }
@@ -8,3 +8,4 @@
   \paper { linewidth =-1. }
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-knee.ly ./input/regression/spacing-knee.ly
--- ../lilypond-1.7.7/input/regression/spacing-knee.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-knee.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "For knees, the spacing correction is such that the
 stems are put at regular distances.
@@ -12,3 +12,4 @@ stems are put at regular distances.
 \paper { linewidth = -1. }
      }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-loose.ly ./input/regression/spacing-loose.ly
--- ../lilypond-1.7.7/input/regression/spacing-loose.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/spacing-loose.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -11,3 +11,4 @@ Loose:
 	indent = 0.0
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-natural.ly ./input/regression/spacing-natural.ly
--- ../lilypond-1.7.7/input/regression/spacing-natural.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/spacing-natural.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -13,3 +13,4 @@ Natural:
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-note-flags.ly ./input/regression/spacing-note-flags.ly
--- ../lilypond-1.7.7/input/regression/spacing-note-flags.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/spacing-note-flags.ly	2002-11-19 11:51:37.000000000 +0100
@@ -16,4 +16,5 @@ linewidth = -1
     }
      }
 
-\version "1.5.68"
+\version "1.7.6"
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-rest.ly ./input/regression/spacing-rest.ly
--- ../lilypond-1.7.7/input/regression/spacing-rest.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-rest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Rests get a little less space, since they are narrower.
 However, the feta quarter rest is relatively wide, causing this effect to be
@@ -14,3 +14,4 @@ very small.
 linewidth = -1
     }
      }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-short-notes.ly ./input/regression/spacing-short-notes.ly
--- ../lilypond-1.7.7/input/regression/spacing-short-notes.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-short-notes.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     
 texidoc = "Notes that are shorter than the common shortest note, Get a
@@ -21,3 +21,4 @@ eighth note. "
 
 	 \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-stem-bar.ly ./input/regression/spacing-stem-bar.ly
--- ../lilypond-1.7.7/input/regression/spacing-stem-bar.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-stem-bar.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Upstem notes before a barline are printed with some extra
@@ -25,3 +25,4 @@ e e e
 }
 \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-stem-direction.ly ./input/regression/spacing-stem-direction.ly
--- ../lilypond-1.7.7/input/regression/spacing-stem-direction.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/spacing-stem-direction.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 
@@ -21,3 +21,4 @@ much to correct."
     linewidth=-1.0
   }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-stem-same-direction.ly ./input/regression/spacing-stem-same-direction.ly
--- ../lilypond-1.7.7/input/regression/spacing-stem-same-direction.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/spacing-stem-same-direction.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 	texidoc = "For juxtaposed chords with the same direction, a
 slight optical correction is used. It is constant, and only works if
@@ -12,3 +12,4 @@ two chords have no common head-positions
 }
 \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-tight.ly ./input/regression/spacing-tight.ly
--- ../lilypond-1.7.7/input/regression/spacing-tight.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/spacing-tight.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -15,3 +15,4 @@ must stretch like the space within the m
 	indent = 0.0
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-to-grace.ly ./input/regression/spacing-to-grace.ly
--- ../lilypond-1.7.7/input/regression/spacing-to-grace.ly	2002-10-12 23:42:45.000000000 +0200
+++ ./input/regression/spacing-to-grace.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.6"
 \header {
 
     texidoc ="space from a normal note /barline to a grace note is
@@ -17,3 +18,4 @@
     }
     \paper { linewidth =  -1.0 }
     }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/spacing-very-tight.ly ./input/regression/spacing-very-tight.ly
--- ../lilypond-1.7.7/input/regression/spacing-very-tight.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/spacing-very-tight.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "
  When tightly spaced, hinterfleisch -> 0.
@@ -19,3 +19,4 @@ texidoc = "
 		indent = 0.0\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/span-bar.ly ./input/regression/span-bar.ly
--- ../lilypond-1.7.7/input/regression/span-bar.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/span-bar.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Span bars draw only in between staff bar lines, so setting those to transparent shows bar lines between systems only.
 "
@@ -36,3 +36,4 @@ texidoc = "Span bars draw only in betwee
   }
  }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/staccato-pos.ly ./input/regression/staccato-pos.ly
--- ../lilypond-1.7.7/input/regression/staccato-pos.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/staccato-pos.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -14,3 +14,4 @@ not be on staff lines.
     linewidth=-1.0
   }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/staff-margin.ly ./input/regression/staff-margin.ly
--- ../lilypond-1.7.7/input/regression/staff-margin.ly	2002-08-02 13:04:17.000000000 +0200
+++ ./input/regression/staff-margin.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Staff margins are also markings attached to barlines.  They should be
@@ -22,3 +22,4 @@ be on normal staves, but also on compoun
 linewidth=-1.0
 }}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/staff-tweak.ly ./input/regression/staff-tweak.ly
--- ../lilypond-1.7.7/input/regression/staff-tweak.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/staff-tweak.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "The staff is a grob, and may be adjusted as well: this one
  shows a staff with 6 thick line, and a slightly large staffspace.
@@ -19,3 +19,4 @@ Beams remain correctly quantized.
 
       } 
      }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/stanza-number.ly ./input/regression/stanza-number.ly
--- ../lilypond-1.7.7/input/regression/stanza-number.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/stanza-number.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Stanza numbers may differ for the first and following systems."
 }
@@ -12,3 +12,4 @@ texidoc = "Stanza numbers may differ for
 Foo1 Bar1   }
 
 \notes { c''1 \break c''1 }>} 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/stem-direction-down.ly ./input/regression/stem-direction-down.ly
--- ../lilypond-1.7.7/input/regression/stem-direction-down.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/stem-direction-down.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 
@@ -16,3 +16,4 @@ texidoc="Similarly, if @code{'neutral-di
 
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/stem-direction.ly ./input/regression/stem-direction.ly
--- ../lilypond-1.7.7/input/regression/stem-direction.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/stem-direction.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -23,3 +23,4 @@ notes, and up for low notes.
   }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/stem-spacing.ly ./input/regression/stem-spacing.ly
--- ../lilypond-1.7.7/input/regression/stem-spacing.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/stem-spacing.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -31,4 +31,4 @@ effects.  In this example, space for opp
     SpacingSpanner \override #'stem-spacing-correction = #0.0
   }  }
 }
- 
\ No newline at end of file
+ %% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/stem-tremolo.ly ./input/regression/stem-tremolo.ly
--- ../lilypond-1.7.7/input/regression/stem-tremolo.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/stem-tremolo.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 Stem tremolos or rolls are tremolo signs that look like beam segments
@@ -28,3 +28,4 @@ tremolo must be centered on the note.
 		c8:32 f: b: e:
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/system-extents.ly ./input/regression/system-extents.ly
--- ../lilypond-1.7.7/input/regression/system-extents.ly	2002-09-20 11:21:06.000000000 +0200
+++ ./input/regression/system-extents.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
     texidoc = "LilyPond correctly determines the size of every
@@ -20,3 +20,4 @@
 	     }
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/system-start-bracket.ly ./input/regression/system-start-bracket.ly
--- ../lilypond-1.7.7/input/regression/system-start-bracket.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/system-start-bracket.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc =
 "
@@ -10,9 +10,10 @@ The piano brace should be shifted horizo
 \score { \notes  {
     \context StaffGroup <
 	c4
-	\context PianoStaff <
-	    d4
-	    e4
-	   >
+	\context PianoStaff <<
+	    d
+	    e
+	   >>4
     >
     }\paper {linewidth = -1. }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/text-spanner.ly ./input/regression/text-spanner.ly
--- ../lilypond-1.7.7/input/regression/text-spanner.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/text-spanner.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 % text spanners should not repeat start text when broken
 
@@ -13,3 +13,4 @@
     linewidth = 40*\staffspace
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tie-accidental.ly ./input/regression/tie-accidental.ly
--- ../lilypond-1.7.7/input/regression/tie-accidental.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/tie-accidental.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -54,3 +54,4 @@ thenotes = \notes \relative cis' {
     \context NoteNames \thenotes
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tie-break-accidental.ly ./input/regression/tie-break-accidental.ly
--- ../lilypond-1.7.7/input/regression/tie-break-accidental.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/tie-break-accidental.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc = "First and second bes (tied across line break)
@@ -17,3 +17,4 @@ Only first B should get natural sign."
     linewidth = 40*\staffspace
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tie-busy-grobs.ly ./input/regression/tie-busy-grobs.ly
--- ../lilypond-1.7.7/input/regression/tie-busy-grobs.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/tie-busy-grobs.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Tie engraver uses @code{busyGrobs} to keep track of
@@ -15,3 +15,4 @@ note heads. Test if this queue works by 
   \context Voice = VIII { \voiceTwo \times 2/5 { a,4 ~a4 ~a4~ a4~ a4 }}
  >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tie-chord.ly ./input/regression/tie-chord.ly
--- ../lilypond-1.7.7/input/regression/tie-chord.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/regression/tie-chord.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 texidoc="
 When tieing chords, the outer slurs point outwards, the inner slurs
@@ -8,7 +8,7 @@ point away from the center of the staff.
 }
 
 
-t =  \notes \relative c' {   <c e g> ~ <c e g> }
+t =  \notes \relative c' {   <<c e g>> ~ <<c e g>> }
 
 	\score { 
 \notes \context Voice {
@@ -20,3 +20,4 @@ t =  \notes \relative c' {   <c e g> ~ <
 
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tie-dots.ly ./input/regression/tie-dots.ly
--- ../lilypond-1.7.7/input/regression/tie-dots.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/tie-dots.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "Ties should not collide with dots."
 }
@@ -10,3 +10,4 @@ texidoc = "Ties should not collide with 
   c4.   ~    c8    a8    g8    f8
 }}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tie-grace.ly ./input/regression/tie-grace.ly
--- ../lilypond-1.7.7/input/regression/tie-grace.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/tie-grace.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Tieing a grace to the to a following grace or main note works."
 }
@@ -7,3 +7,4 @@
     c4 \grace { c8 ~ c16 ~ } c4 
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tie.ly ./input/regression/tie.ly
--- ../lilypond-1.7.7/input/regression/tie.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/tie.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -19,3 +19,4 @@ The horizontal middle should not overlap
 		linewidth=0.
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/triplets.ly ./input/regression/triplets.ly
--- ../lilypond-1.7.7/input/regression/triplets.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/regression/triplets.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc="Simple beams.  This broke somewhere < 1.3.110
@@ -28,3 +28,4 @@ ex = \notes \relative c' {
 }
 
 \score { \context Staff { \notes { \ex } } }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tuplet-beam.ly ./input/regression/tuplet-beam.ly
--- ../lilypond-1.7.7/input/regression/tuplet-beam.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/tuplet-beam.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "In combination with a beam, the bracket of the tuplet
@@ -12,3 +12,4 @@ the bracket."
 \times 2/3 { [c8 c c] }
 \times 2/3 { [c16 c16] [c8 c8] }
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tuplet-nest.ly ./input/regression/tuplet-nest.ly
--- ../lilypond-1.7.7/input/regression/tuplet-nest.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/regression/tuplet-nest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 \header {
   texidoc="Manual hack for nested tuplets, move outer tuplet up."
 }
@@ -30,3 +30,4 @@
   }
   \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tuplet-properties.ly ./input/regression/tuplet-properties.ly
--- ../lilypond-1.7.7/input/regression/tuplet-properties.ly	2002-09-20 11:21:06.000000000 +0200
+++ ./input/regression/tuplet-properties.ly	2002-11-19 11:51:37.000000000 +0100
@@ -5,7 +5,7 @@ NB should have no bracket, B should have
 }
  
 
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score { 
@@ -41,3 +41,4 @@ NB should have no bracket, B should have
 
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tuplet-staffline-collision.ly ./input/regression/tuplet-staffline-collision.ly
--- ../lilypond-1.7.7/input/regression/tuplet-staffline-collision.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/regression/tuplet-staffline-collision.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Horizontal tuplet brackets are shifted vertically
@@ -12,3 +12,4 @@ to avoid staff line collisions."
 \times 2/3 { g4 g g }
 \times 2/3 { a4 a a }
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/tup.ly ./input/regression/tup.ly
--- ../lilypond-1.7.7/input/regression/tup.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/tup.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
     
 texidoc="
@@ -31,3 +31,4 @@ direction as the
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/regression/volta-broken-left-edge.ly ./input/regression/volta-broken-left-edge.ly
--- ../lilypond-1.7.7/input/regression/volta-broken-left-edge.ly	2002-07-17 01:57:06.000000000 +0200
+++ ./input/regression/volta-broken-left-edge.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc ="Broken volta spanners behave correctly at left edge in all cases."
@@ -136,3 +136,4 @@ voiceE = \notes {
 	    }
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/rhythm.ly ./input/rhythm.ly
--- ../lilypond-1.7.7/input/rhythm.ly	2002-11-06 13:33:38.000000000 +0100
+++ ./input/rhythm.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 filename = 	 "rhythm.ly"
 enteredby = 	 "HWN"
diff -purN ../lilypond-1.7.7/input/scarlatti-paper.ly ./input/scarlatti-paper.ly
--- ../lilypond-1.7.7/input/scarlatti-paper.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/scarlatti-paper.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \paper{
 	indent=0.
diff -purN ../lilypond-1.7.7/input/scarlatti-properties.ly ./input/scarlatti-properties.ly
--- ../lilypond-1.7.7/input/scarlatti-properties.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/scarlatti-properties.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,6 +1,6 @@
 %  include file for scarlatti-test
 
-\version "1.5.68"
+\version "1.7.6"
 
 rh=\property Thread.NoteHead \override #'style = #'default
 lh=\property Thread.NoteHead \override #'style = #'diamond
diff -purN ../lilypond-1.7.7/input/scarlatti-test.ly ./input/scarlatti-test.ly
--- ../lilypond-1.7.7/input/scarlatti-test.ly	2002-10-21 00:44:13.000000000 +0200
+++ ./input/scarlatti-test.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 %K000.ly LilyPond 1.2.16
 \header {
 title="John's Scarlatti quotes"
@@ -344,6 +344,6 @@ s4.*6
 \clef bass
 \key d \major
 s4.*38
->>
+> >
 } 
 
diff -purN ../lilypond-1.7.7/input/size11.ly ./input/size11.ly
--- ../lilypond-1.7.7/input/size11.ly	2002-07-21 21:27:40.000000000 +0200
+++ ./input/size11.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
diff -purN ../lilypond-1.7.7/input/size13.ly ./input/size13.ly
--- ../lilypond-1.7.7/input/size13.ly	2002-07-21 21:27:40.000000000 +0200
+++ ./input/size13.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \include "paper13.ly"
 \include "allfontstyle.ly"
diff -purN ../lilypond-1.7.7/input/size16.ly ./input/size16.ly
--- ../lilypond-1.7.7/input/size16.ly	2002-07-21 21:27:40.000000000 +0200
+++ ./input/size16.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \include "paper16.ly"
 \include "allfontstyle.ly"
diff -purN ../lilypond-1.7.7/input/size20.ly ./input/size20.ly
--- ../lilypond-1.7.7/input/size20.ly	2002-07-21 21:27:40.000000000 +0200
+++ ./input/size20.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \include "paper20.ly"
 \include "allfontstyle.ly"
diff -purN ../lilypond-1.7.7/input/size23.ly ./input/size23.ly
--- ../lilypond-1.7.7/input/size23.ly	2002-07-21 21:27:40.000000000 +0200
+++ ./input/size23.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \include "paper23.ly"
 \include "allfontstyle.ly"
diff -purN ../lilypond-1.7.7/input/size26.ly ./input/size26.ly
--- ../lilypond-1.7.7/input/size26.ly	2002-07-21 21:27:40.000000000 +0200
+++ ./input/size26.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \include "paper26.ly"
 \include "allfontstyle.ly"
diff -purN ../lilypond-1.7.7/input/star-spangled-banner.ly ./input/star-spangled-banner.ly
--- ../lilypond-1.7.7/input/star-spangled-banner.ly	2002-11-06 13:33:38.000000000 +0100
+++ ./input/star-spangled-banner.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 %{
 Converted from star.mup with the aid of mup2ly.py
 http://www.arkkra.com/doc/star.html
diff -purN ../lilypond-1.7.7/input/template/header.ly ./input/template/header.ly
--- ../lilypond-1.7.7/input/template/header.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/template/header.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   dedication = "dedication"
   title = "Title"
diff -purN ../lilypond-1.7.7/input/template/melody-chords.ly ./input/template/melody-chords.ly
--- ../lilypond-1.7.7/input/template/melody-chords.ly	2002-08-13 17:51:37.000000000 +0200
+++ ./input/template/melody-chords.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc = "lead sheet format: chords with melody."
diff -purN ../lilypond-1.7.7/input/template/melody.ly ./input/template/melody.ly
--- ../lilypond-1.7.7/input/template/melody.ly	2002-07-26 12:26:57.000000000 +0200
+++ ./input/template/melody.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc = "Only a melody."
diff -purN ../lilypond-1.7.7/input/template/melody-lyrics-chords.ly ./input/template/melody-lyrics-chords.ly
--- ../lilypond-1.7.7/input/template/melody-lyrics-chords.ly	2002-07-26 12:26:57.000000000 +0200
+++ ./input/template/melody-lyrics-chords.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc = "popsong format: chords, melody and lyrics."
diff -purN ../lilypond-1.7.7/input/template/melody-lyrics.ly ./input/template/melody-lyrics.ly
--- ../lilypond-1.7.7/input/template/melody-lyrics.ly	2002-07-26 12:26:57.000000000 +0200
+++ ./input/template/melody-lyrics.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc = "Melody and lyrics."
diff -purN ../lilypond-1.7.7/input/template/piano-4-voices.ly ./input/template/piano-4-voices.ly
--- ../lilypond-1.7.7/input/template/piano-4-voices.ly	2002-07-26 12:26:57.000000000 +0200
+++ ./input/template/piano-4-voices.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc ="Polyphonic piano music"
diff -purN ../lilypond-1.7.7/input/template/piano-dynamics.ly ./input/template/piano-dynamics.ly
--- ../lilypond-1.7.7/input/template/piano-dynamics.ly	2002-08-14 18:04:55.000000000 +0200
+++ ./input/template/piano-dynamics.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc ="
   template that puts dynamics on a separate line, so it is neatly
@@ -16,11 +16,11 @@ lower = \notes\relative c {
 
 dynamics = \notes {
   s2\fff\> s4
-  \!s\pp
+  \!s-\pp
 }
 
 pedal = \notes {
- s2\sustainDown s2\sustainUp
+ s2-\sustainDown s2-\sustainUp
 }
 
 \score {
diff -purN ../lilypond-1.7.7/input/template/piano.ly ./input/template/piano.ly
--- ../lilypond-1.7.7/input/template/piano.ly	2002-07-26 12:26:57.000000000 +0200
+++ ./input/template/piano.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc = "simple piano music" 
diff -purN ../lilypond-1.7.7/input/template/piano-lyrics.ly ./input/template/piano-lyrics.ly
--- ../lilypond-1.7.7/input/template/piano-lyrics.ly	2002-07-26 12:26:57.000000000 +0200
+++ ./input/template/piano-lyrics.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc ="Lyrics between two staffs."
diff -purN ../lilypond-1.7.7/input/template/piano-melody-lyrics.ly ./input/template/piano-melody-lyrics.ly
--- ../lilypond-1.7.7/input/template/piano-melody-lyrics.ly	2002-07-26 12:26:57.000000000 +0200
+++ ./input/template/piano-melody-lyrics.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc ="Classical song format: one staff with melody and lyrics, and piano accompaniment."
diff -purN ../lilypond-1.7.7/input/template/satb.ly ./input/template/satb.ly
--- ../lilypond-1.7.7/input/template/satb.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/template/satb.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
     texidoc = "
diff -purN ../lilypond-1.7.7/input/test/absolute-volume.ly ./input/test/absolute-volume.ly
--- ../lilypond-1.7.7/input/test/absolute-volume.ly	2002-10-09 17:14:32.000000000 +0200
+++ ./input/test/absolute-volume.ly	2002-11-19 11:51:37.000000000 +0100
@@ -2,18 +2,18 @@
     texidoc = "Absolute dynamics have effect in MIDI files."
 }
 
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 \notes\relative c''{
 %segfault in engraver
-a1\ppp 
-a1\pp
-a\p
-a\mp
-a\mf
-a\f
-a\ff
+a1-\ppp 
+a1-\pp
+a-\p
+a-\mp
+a-\mf
+a-\f
+a-\ff
 a\fff
 a\sf
 }
@@ -23,3 +23,4 @@ a\sf
 \tempo 1 = 60
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ac-extra-voice.ly ./input/test/ac-extra-voice.ly
--- ../lilypond-1.7.7/input/test/ac-extra-voice.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/ac-extra-voice.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 %
 % TODO: what's this?
 %
@@ -73,3 +73,4 @@ accompany =  \notes \relative c{
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/add-staccato.ly ./input/test/add-staccato.ly
--- ../lilypond-1.7.7/input/test/add-staccato.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/add-staccato.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"  %% or actually: 1.7.1 ...
+\version "1.7.6"  %% or actually: 1.7.1 ...
 \header {
 
 texidoc= "Using make-music, you can add various stuff to notes. Here
@@ -35,3 +35,4 @@ one would not use scm constructs.  See s
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/add-text-script.ly ./input/test/add-text-script.ly
--- ../lilypond-1.7.7/input/test/add-text-script.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/add-text-script.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"  %% or actually: 1.7.1 ...
+\version "1.7.6"  %% or actually: 1.7.1 ...
 \header {
 texidoc= "Using make-music, you can add
 various stuff to notes. Here is an example
@@ -31,3 +31,4 @@ create, then write a function that will 
   \apply #(lambda (x) (add-text-script x "6") (display x) x ) \notes { c4-3 }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ambitus.ly ./input/test/ambitus.ly
--- ../lilypond-1.7.7/input/test/ambitus.ly	2002-10-09 17:14:32.000000000 +0200
+++ ./input/test/ambitus.ly	2002-11-19 11:51:37.000000000 +0100
@@ -2,7 +2,7 @@
     texidoc = "Ambituses indicate pitch ranges for voices."
 }
 
-\version "1.5.68"
+\version "1.7.6"
 
 upper = \notes \relative c {
 	\clef "treble"
@@ -47,3 +47,4 @@ lower = \notes \relative c {
 		}
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/american-chords.ly ./input/test/american-chords.ly
--- ../lilypond-1.7.7/input/test/american-chords.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/test/american-chords.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
     texidoc = "Chord names in american styles, according to one of our users."
 }
@@ -51,3 +51,4 @@ scheme = \chords {
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ancient-accidentals.ly ./input/test/ancient-accidentals.ly
--- ../lilypond-1.7.7/input/test/ancient-accidentals.ly	2002-10-07 01:33:11.000000000 +0200
+++ ./input/test/ancient-accidentals.ly	2002-11-19 11:51:37.000000000 +0100
@@ -4,7 +4,7 @@ files lists all of them."
 
 }
 
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -52,3 +52,4 @@ files lists all of them."
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ancient-font.ly ./input/test/ancient-font.ly
--- ../lilypond-1.7.7/input/test/ancient-font.ly	2002-11-12 11:47:57.000000000 +0100
+++ ./input/test/ancient-font.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
     title	= "ancient font test"
     date	= "2002"
@@ -290,3 +290,4 @@ lowerStaff =  \context MensuralStaff = l
         }
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ancient-time.ly ./input/test/ancient-time.ly
--- ../lilypond-1.7.7/input/test/ancient-time.ly	2002-09-20 11:21:07.000000000 +0200
+++ ./input/test/ancient-time.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc="Should use old style."
 }
@@ -9,3 +9,4 @@ texidoc="Should use old style."
     s1 
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/auto-beam-4-8.ly ./input/test/auto-beam-4-8.ly
--- ../lilypond-1.7.7/input/test/auto-beam-4-8.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/auto-beam-4-8.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 
 
@@ -28,3 +28,4 @@
   }
 }
     
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/auto-beam.ly ./input/test/auto-beam.ly
--- ../lilypond-1.7.7/input/test/auto-beam.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/auto-beam.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 %{
   The auto-beam engraver has presets for common time signatures.
@@ -62,3 +62,4 @@
     \paper{
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/auto-beam-override.ly ./input/test/auto-beam-override.ly
--- ../lilypond-1.7.7/input/test/auto-beam-override.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/auto-beam-override.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 %{
   Currently (1.1.27.jcn3), the auto-beam engraver will only engrave
@@ -38,3 +38,4 @@
 	}
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/bagpipe.ly ./input/test/bagpipe.ly
--- ../lilypond-1.7.7/input/test/bagpipe.ly	2002-10-09 17:14:32.000000000 +0200
+++ ./input/test/bagpipe.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.6.4"
+\version "1.7.6"
 
 % bagpipe music.
 
@@ -104,3 +104,4 @@ f4 |
 )d4. \gdcg d4.
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/banter-chords.ly ./input/test/banter-chords.ly
--- ../lilypond-1.7.7/input/test/banter-chords.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/test/banter-chords.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 
 \header{
@@ -81,3 +81,4 @@ chord =  \notes\transpose c' c''\chords{
 	>
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/barline-lyric-only.ly ./input/test/barline-lyric-only.ly
--- ../lilypond-1.7.7/input/test/barline-lyric-only.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/barline-lyric-only.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "You can move around Bar_engraver and
@@ -35,3 +35,4 @@ Span_bar_engraver if you want bar lines 
   \remove "Span_bar_engraver"
 }
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/bar-lines.ly ./input/test/bar-lines.ly
--- ../lilypond-1.7.7/input/test/bar-lines.ly	2002-10-09 17:14:32.000000000 +0200
+++ ./input/test/bar-lines.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Different types of bar lines demonstrated."
 }
@@ -17,3 +17,4 @@ c4
 \bar "|"  c
 } 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/bar-number-every-fifth.ly ./input/test/bar-number-every-fifth.ly
--- ../lilypond-1.7.7/input/test/bar-number-every-fifth.ly	2002-10-09 17:14:32.000000000 +0200
+++ ./input/test/bar-number-every-fifth.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,12 +1,11 @@
-
 \header
 {
-
     texidoc = "Bar numbers can also be printed at regular intervals."
 }
+\version "1.7.7"
 
 \score {
-    \context Staff \notes \transpose c'' {
+    \context Staff \notes \transpose  c c' {
 	\property Score.BarNumber \override #'break-visibility = #end-of-line-invisible
 	\property Score.barNumberVisibility = #(every-nth-bar-number-visible 5)
 	\property Score.BarNumber \override #'molecule-callback =
@@ -17,3 +16,4 @@
     }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/bar-script-visibility.ly ./input/test/bar-script-visibility.ly
--- ../lilypond-1.7.7/input/test/bar-script-visibility.ly	2002-08-19 01:12:43.000000000 +0200
+++ ./input/test/bar-script-visibility.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
     texidoc="Second line has bar-numbers on start of every measure."
 }
@@ -13,3 +13,4 @@
     }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-abbrev.ly ./input/test/beam-abbrev.ly
--- ../lilypond-1.7.7/input/test/beam-abbrev.ly	2002-10-09 17:14:32.000000000 +0200
+++ ./input/test/beam-abbrev.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score { 
   \context Voice \notes\relative c {
     c'1:16 
@@ -11,3 +11,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-chord.ly ./input/test/beam-chord.ly
--- ../lilypond-1.7.7/input/test/beam-chord.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/test/beam-chord.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 \header {
 texidoc = "Hmm. what's this supposed to test?"
@@ -12,15 +12,16 @@ texidoc = "Hmm. what's this supposed to 
 			       ,Beam::shift_region_to_valid
 	
 			      )
-		[a'8 <a' g''>]
-		[c <c e,>]
-		[a'16 <a' g''>]
-		[c <c e,>]
-		[a'32 <a' g''>]
-		[c <c e,>]
+		[a'8 <<a' g''>>]
+		[c <<c e,>>]
+		[a'16 <<a' g''>>]
+		[c <<c e,>>]
+		[a'32 <<a' g''>>]
+		[c <<c e,>>]
 	}
 	\paper{
 
 		linewidth = 66.0\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-control.ly ./input/test/beam-control.ly
--- ../lilypond-1.7.7/input/test/beam-control.ly	2002-08-19 01:12:43.000000000 +0200
+++ ./input/test/beam-control.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
     texidoc="Controlling beam positions."
 }
@@ -18,3 +18,4 @@
 	[c e] [e c]
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-count.ly ./input/test/beam-count.ly
--- ../lilypond-1.7.7/input/test/beam-count.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/beam-count.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 
 fragment = \notes {
@@ -20,3 +20,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-damp.ly ./input/test/beam-damp.ly
--- ../lilypond-1.7.7/input/test/beam-damp.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-damp.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score{
 	\notes\relative c''{
 %		\stemUp
@@ -19,3 +19,4 @@
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-dir-function.ly ./input/test/beam-dir-function.ly
--- ../lilypond-1.7.7/input/test/beam-dir-function.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/beam-dir-function.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
   texidoc="
@@ -62,3 +62,4 @@ down by default.  We set that to 1 (up) 
 %% Local variables:
 %% LilyPond-indent-level:2
 %% End:
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-dir-functions.ly ./input/test/beam-dir-functions.ly
--- ../lilypond-1.7.7/input/test/beam-dir-functions.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/beam-dir-functions.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   texidoc = "
 
@@ -45,3 +45,4 @@ your favourite algorithm isn't one of th
 %% End:
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-dir.ly ./input/test/beam-dir.ly
--- ../lilypond-1.7.7/input/test/beam-dir.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-dir.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -8,3 +8,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beamed-slur-endings.ly ./input/test/beamed-slur-endings.ly
--- ../lilypond-1.7.7/input/test/beamed-slur-endings.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beamed-slur-endings.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes \relative c''{
@@ -24,3 +24,4 @@
 		linewidth = 60.0\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-isknee.ly ./input/test/beam-isknee.ly
--- ../lilypond-1.7.7/input/test/beam-isknee.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-isknee.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score{
 	\context PianoStaff <
 	\context Staff=one \notes\relative c'{
@@ -18,3 +18,4 @@
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-neutral-direction.ly ./input/test/beam-neutral-direction.ly
--- ../lilypond-1.7.7/input/test/beam-neutral-direction.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-neutral-direction.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 fragment = \notes {
@@ -13,3 +13,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-position.ly ./input/test/beam-position.ly
--- ../lilypond-1.7.7/input/test/beam-position.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-position.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 fragment = \notes {
@@ -12,3 +12,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-pos.ly ./input/test/beam-pos.ly
--- ../lilypond-1.7.7/input/test/beam-pos.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-pos.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 filename =	 "beam-pos.ly"
@@ -30,3 +30,4 @@ TestedFeatures =	 "beam quant positions"
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-rest.ly ./input/test/beam-rest.ly
--- ../lilypond-1.7.7/input/test/beam-rest.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-rest.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -17,3 +17,4 @@ Beams over rests.
         linewidth =-1
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-second.ly ./input/test/beam-second.ly
--- ../lilypond-1.7.7/input/test/beam-second.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/beam-second.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
   texidoc=""
 }
@@ -12,4 +12,4 @@
     \paper{
 	linewidth = 0.0
     }
-}
\ No newline at end of file
+}%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beams.ly ./input/test/beams.ly
--- ../lilypond-1.7.7/input/test/beams.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/test/beams.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 filename = 	 "beams.ly"
 composer = 	 "heu"
@@ -71,3 +71,4 @@ TestedFeatures = 	 "beams and beamflags"
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-stem-test.ly ./input/test/beam-stem-test.ly
--- ../lilypond-1.7.7/input/test/beam-stem-test.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-stem-test.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   texidoc="Beam-stem attachment test.  Helper file for ps/dvips problems."
 }
@@ -13,4 +13,4 @@
     linewidth = -1.0
     magnification = 64
   }
-}
\ No newline at end of file
+}%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-suspect.ly ./input/test/beam-suspect.ly
--- ../lilypond-1.7.7/input/test/beam-suspect.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-suspect.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes\relative c'{
@@ -16,3 +16,4 @@
 		linewidth=-1.
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/beam-trend.ly ./input/test/beam-trend.ly
--- ../lilypond-1.7.7/input/test/beam-trend.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/beam-trend.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes\relative c'{
@@ -9,3 +9,4 @@
 		linewidth=-1.
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/blank.ly ./input/test/blank.ly
--- ../lilypond-1.7.7/input/test/blank.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/blank.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   texidoc="Blank music paper with clefs"
 }
@@ -18,3 +18,4 @@
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/blank-notes.ly ./input/test/blank-notes.ly
--- ../lilypond-1.7.7/input/test/blank-notes.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/blank-notes.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.0"
+\version "1.7.6"
 
 \header {
     
@@ -22,3 +22,4 @@ unblanknotes = { \property Voice.NoteHea
 	     g4 a 
 	     }}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/boxed-molecule.ly ./input/test/boxed-molecule.ly
--- ../lilypond-1.7.7/input/test/boxed-molecule.ly	2002-09-20 11:21:07.000000000 +0200
+++ ./input/test/boxed-molecule.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.6.1"
+\version "1.7.6"
 \header {
 
 texidoc = "overriding the molecule callback can also be used to draw a
@@ -28,3 +28,4 @@ texidoc = "overriding the molecule callb
 
       c4. c4 \mark "F" c1 
    }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/broken.ly ./input/test/broken.ly
--- ../lilypond-1.7.7/input/test/broken.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/test/broken.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 enteredby = 	 "jcn"
 copyright = 	 "PD"
@@ -43,3 +43,4 @@ broken =  \notes\transpose c c'{
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/broken-spanner-adjustment.ly ./input/test/broken-spanner-adjustment.ly
--- ../lilypond-1.7.7/input/test/broken-spanner-adjustment.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/broken-spanner-adjustment.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 \header {
 
 	 texidoc = "Broken spanners can be adjusted individually, but
@@ -30,3 +30,4 @@ this requires complicated scheme code.
 }
     \paper { linewidth= 5.0 \cm }
     }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/broken-thread-line.ly ./input/test/broken-thread-line.ly
--- ../lilypond-1.7.7/input/test/broken-thread-line.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/broken-thread-line.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 
@@ -23,3 +23,4 @@
 	}
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/caps.ly ./input/test/caps.ly
--- ../lilypond-1.7.7/input/test/caps.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/caps.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc =  " Small caps is available as font-shape caps.
 
@@ -12,3 +12,4 @@ shapeSC   = \property Lyrics.LyricText \
   what4 is4 \shapeSC Bud8 -- dha?8 }>
 \paper { linewidth = -1.}
   }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/cautionaries.ly ./input/test/cautionaries.ly
--- ../lilypond-1.7.7/input/test/cautionaries.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/test/cautionaries.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 %% FIXME
 
@@ -6,12 +6,13 @@
   \key d \major
 %  \property Staff.autoReminders = #'cautionary
   \property Staff.Accidental \override #'font-relative-size = #0
-  <dis1 c> cis2 d
+  <<dis c>>1 cis2 d
 %  \property Staff.Accidental \override #'cautionary-size = #-1
-  <dis1 c> cis2 d
+  <<dis c>>1 cis2 d
 %  \property Staff.Accidental \override #'paren-cautionaries = ##f
-  <dis1 c> cis2 d
+  <<dis c>>1 cis2 d
 
 }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/Cc-chords.ly ./input/test/Cc-chords.ly
--- ../lilypond-1.7.7/input/test/Cc-chords.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/Cc-chords.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   texidoc="Jazz chord names, but with lower case names for minor chords"
 }
@@ -24,3 +24,4 @@
     \context ChordNames \chords { c1 c:m c:m7 }
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/chord-banter.ly ./input/test/chord-banter.ly
--- ../lilypond-1.7.7/input/test/chord-banter.ly	2002-11-06 13:33:59.000000000 +0100
+++ ./input/test/chord-banter.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 filename = 	"chord-table.ly"
 copyright =  	"public domain"
@@ -52,3 +52,4 @@ tab =  \notes\transpose c c''\chords{
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/chord-changes.ly ./input/test/chord-changes.ly
--- ../lilypond-1.7.7/input/test/chord-changes.ly	2002-11-06 13:34:00.000000000 +0100
+++ ./input/test/chord-changes.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 \header{
 texidoc="property chordChanges: only display chord names when
@@ -26,3 +26,4 @@ scheme = \chords {
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/chord-inversion.ly ./input/test/chord-inversion.ly
--- ../lilypond-1.7.7/input/test/chord-inversion.ly	2002-11-06 13:34:00.000000000 +0100
+++ ./input/test/chord-inversion.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 enteredby = 	 "jcn"
 copyright = 	 "public domain"
@@ -22,3 +22,4 @@ inversions =  \notes\transpose c c'\chor
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/chord-markup.ly ./input/test/chord-markup.ly
--- ../lilypond-1.7.7/input/test/chord-markup.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/chord-markup.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
     texidoc = "chord/markup test"
 }
@@ -22,3 +22,4 @@
 	}
    >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/chords.ly ./input/test/chords.ly
--- ../lilypond-1.7.7/input/test/chords.ly	2002-11-06 13:34:00.000000000 +0100
+++ ./input/test/chords.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 
 %{
@@ -19,7 +19,7 @@ Would this be acceptable/good enough/con
 
 % used to be quarter notes here. Why? --hwn 
 scales =  \notes \transpose c c' \chords{
-		%<c1 e g>
+		%<<c e g>>1
 		c1:m c:min c:dim c:aug c:sus c:maj
                 c1:6 c:7 c:9 c:11 c:13
 		c:m7 c:m.sus c:m7.sus
@@ -68,3 +68,4 @@ keys =  \notes{
 		}
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/chord-table.ly ./input/test/chord-table.ly
--- ../lilypond-1.7.7/input/test/chord-table.ly	2002-11-06 13:34:00.000000000 +0100
+++ ./input/test/chord-table.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 filename = 	"chord-table.ly"
 copyright =  	"public domain"
@@ -45,3 +45,4 @@ tab =  \notes\transpose c c''\chords{
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/chord-taxonomy.ly ./input/test/chord-taxonomy.ly
--- ../lilypond-1.7.7/input/test/chord-taxonomy.ly	2002-11-06 13:34:00.000000000 +0100
+++ ./input/test/chord-taxonomy.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
   title="Chord Taxonomy of LilyPond -- jazz"
 }
@@ -23,3 +23,4 @@ scheme = \chords {
     \context Staff \notes \transpose c c' \scheme
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/clef-8-syntax.ly ./input/test/clef-8-syntax.ly
--- ../lilypond-1.7.7/input/test/clef-8-syntax.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/clef-8-syntax.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -9,3 +9,4 @@
   }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/clef-end-of-line.ly ./input/test/clef-end-of-line.ly
--- ../lilypond-1.7.7/input/test/clef-end-of-line.ly	2002-09-15 23:35:05.000000000 +0200
+++ ./input/test/clef-end-of-line.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,3 +1,5 @@
+
+\version "1.7.7"
 \header {
 
     texidoc = "Scales, but with clef and key signature at the end of the line."
@@ -5,7 +7,7 @@
 }
 
 \score {
-    \notes \transpose c'' {
+    \notes \transpose c c' {
 	\property Staff.Clef \set #'break-visibility = #end-of-line-visible
 	\property Staff.KeySignature \set #'break-visibility = #end-of-line-visible
 	\property Staff.explicitClefVisibility = #end-of-line-visible
@@ -30,3 +32,4 @@
 	\break
 	\time 4/4    
 } }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/coda-kludge.ly ./input/test/coda-kludge.ly
--- ../lilypond-1.7.7/input/test/coda-kludge.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/coda-kludge.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 % The volta texts should read: 1-4  and  5
 % Not 1 and 2
 % (see 1.2.17)
@@ -57,3 +57,4 @@ Hi,
 
 
 % 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/coriolan-margin.ly ./input/test/coriolan-margin.ly
--- ../lilypond-1.7.7/input/test/coriolan-margin.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/coriolan-margin.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 % Ugh, we need to override some LaTeX titling stuff
@@ -135,3 +135,4 @@ violoncello = \notes \relative c' {
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/count-systems.ly ./input/test/count-systems.ly
--- ../lilypond-1.7.7/input/test/count-systems.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/count-systems.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
     
     texidoc="Display the number of systems, or the system number of a
@@ -36,3 +36,4 @@
 	    linewidth = 10.0\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/crescendi.ly ./input/test/crescendi.ly
--- ../lilypond-1.7.7/input/test/crescendi.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/crescendi.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,12 +1,12 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 \notes\relative c''{
-a1\fff\> \!a\pp
+a1\fff\> \!a-\pp
 a\< \!a
 \property Voice.crescendoText = "cresc."
 \property Voice.crescendoSpanner = #'dashed-line
-a\mf\< a \!a 
+a-\mf\< a \!a 
 a\< \!a
 }
 \paper{
@@ -15,3 +15,4 @@ a\< \!a
 \tempo 1 = 60
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/crescendo-text.ly ./input/test/crescendo-text.ly
--- ../lilypond-1.7.7/input/test/crescendo-text.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/crescendo-text.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,11 +1,11 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 fragment = \notes {
   \context Voice {
     \property Voice.crescendoText = "cresc."
     \property Voice.crescendoSpanner = #'dashed-line
-    a''2\mf\< a a \!a
+    a''2-\mf\< a a \!a
   }
 }
 
@@ -15,3 +15,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ct-jazz.ly ./input/test/ct-jazz.ly
--- ../lilypond-1.7.7/input/test/ct-jazz.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/ct-jazz.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
   title="Chord Taxomony of LilyPond -- jazz"
   subtitle="Amy's chord tests"
@@ -20,3 +20,4 @@ scheme = \chords {
     \context Staff \notes \transpose c c' \scheme
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/cue-notes.ly ./input/test/cue-notes.ly
--- ../lilypond-1.7.7/input/test/cue-notes.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/cue-notes.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
     texidoc = "Cue notes should be set in smaller type. Cue clefs are
@@ -39,4 +39,4 @@ usually not restored explicitly."
    eis'4 fis'4
  }
  \paper { linewidth = -1 }
-}
\ No newline at end of file
+}%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/custos.ly ./input/test/custos.ly
--- ../lilypond-1.7.7/input/test/custos.ly	2002-09-20 11:21:07.000000000 +0200
+++ ./input/test/custos.ly	1970-01-01 01:00:00.000000000 +0100
@@ -1,34 +0,0 @@
-\version "1.5.68"
-\header {
-    texidoc = "custodes in various styles."
-}
-
-\score {
-    \notes {
-	\property Staff.Custos \set #'neutral-position = #4
-	\property Staff.Custos \set #'neutral-direction = #-1
-	\property Staff.Custos \set #'adjust-if-on-staffline = ##t
-
-	\property Staff.Custos \set #'style = #'hufnagel
-	c'1^"Custos style = \#'hufnagel"
-	\break < d'1 a' f''>
-
-	\property Staff.Custos \set #'style = #'medicaea
-	c'1^"Custos style = \#'medicaea"
-	\break < d'1 a' f''>
-
-	\property Staff.Custos \set #'style = #'vaticana
-	c'1^"Custos style = \#'vaticana"
-	\break < d'1 a' f''>
-
-	\property Staff.Custos \set #'style = #'mensural
-	c'1^"Custos style = \#'mensural"
-	\break < d'1 a' f''>
-    }
-    \paper {
-	\translator {
-	    \StaffContext
-	    \consists Custos_engraver
-	}
-    }
-}
diff -purN ../lilypond-1.7.7/input/test/defaultbars.ly ./input/test/defaultbars.ly
--- ../lilypond-1.7.7/input/test/defaultbars.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/defaultbars.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \header {
@@ -14,3 +14,4 @@
 		\property Score.defaultBarType = ":|:"
 		c4 c4 c4 c4 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/default-neutral-dir.ly ./input/test/default-neutral-dir.ly
--- ../lilypond-1.7.7/input/test/default-neutral-dir.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/default-neutral-dir.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header { texidoc = "
 The direction of a perfectly centred beams can be
 controlled through @code{Voice.Beam}'s grob-property
@@ -11,3 +11,4 @@ directly@code{neutral-direction}
   \property Voice.Beam \set #'neutral-direction = #-1
   [b b]
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/different-time-signatures.ly ./input/test/different-time-signatures.ly
--- ../lilypond-1.7.7/input/test/different-time-signatures.ly	2002-07-21 21:27:39.000000000 +0200
+++ ./input/test/different-time-signatures.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 % barline spacing  disrupts visual rhythm.
@@ -37,3 +37,4 @@
 	}
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/diverse-spacing.ly ./input/test/diverse-spacing.ly
--- ../lilypond-1.7.7/input/test/diverse-spacing.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/diverse-spacing.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 % a few 32nds shouldn't stretch spacing enormously.
@@ -14,3 +14,4 @@
 }
 \paper  { linewidth = -1.0 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/drarn.ly ./input/test/drarn.ly
--- ../lilypond-1.7.7/input/test/drarn.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/drarn.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
   \context Staff \notes <
@@ -20,3 +20,4 @@
   >
   \paper { linewidth = 40*\staffspace } 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/drarn-slurs.ly ./input/test/drarn-slurs.ly
--- ../lilypond-1.7.7/input/test/drarn-slurs.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/drarn-slurs.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -18,3 +18,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/duration-check.ly ./input/test/duration-check.ly
--- ../lilypond-1.7.7/input/test/duration-check.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/duration-check.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 #(define (duration-check music)
   "Check all rest durations in MUSIC"
 
@@ -35,10 +35,11 @@
   \apply #duration-check
   <
       \notes\relative c'' {
-	  a b8 c16 <d e4.>
+	  a b8 c16 <<d e>>4.
       }
       \notes\relative c'' {
 	  a b8 c16 d a2 r
       }
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/dynamic-extra.ly ./input/test/dynamic-extra.ly
--- ../lilypond-1.7.7/input/test/dynamic-extra.ly	2002-10-07 14:23:19.000000000 +0200
+++ ./input/test/dynamic-extra.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.7"
 \header{
     texidoc = "Additional tricks for dynamics.  Pi`u forte dynamic script"
 }
@@ -14,4 +15,6 @@ piuf = #'(columns (italic "pi\\`u") " " 
 	
 	c2\< \! c2
 	}
-    }
\ No newline at end of file
+    }
+
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/embedded-postscript.ly ./input/test/embedded-postscript.ly
--- ../lilypond-1.7.7/input/test/embedded-postscript.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/embedded-postscript.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   texidoc = "By inserting the @TeX{} command \embeddedps, you can
 insert postscript directly into the output.
@@ -17,3 +17,4 @@ TODO: make molecule-callback to do this.
   }
   \paper { linewidth = 70 * \staffspace }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/embedded-scm.ly ./input/test/embedded-scm.ly
--- ../lilypond-1.7.7/input/test/embedded-scm.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/embedded-scm.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,6 +1,7 @@
-\version "1.5.68"
+\version "1.7.6"
 
 #(begin (newline)(display "hello world")(newline))\score{
 	\notes\relative c'{ c }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/embedded-tex.ly ./input/test/embedded-tex.ly
--- ../lilypond-1.7.7/input/test/embedded-tex.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/embedded-tex.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 fragment = \notes {
@@ -11,3 +11,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/empty-staffs.ly ./input/test/empty-staffs.ly
--- ../lilypond-1.7.7/input/test/empty-staffs.ly	2002-09-15 23:35:05.000000000 +0200
+++ ./input/test/empty-staffs.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.7"
 \header {
     
 texidoc = "Blank music paper, another example: empty staffs and a
@@ -21,3 +22,4 @@ emptymusic = \notes { \repeat unfold 4  
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/equaliser.ly ./input/test/equaliser.ly
--- ../lilypond-1.7.7/input/test/equaliser.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/equaliser.ly	2002-11-19 11:51:38.000000000 +0100
@@ -2,7 +2,7 @@
 \header {
 texidoc = "The full orchestra plays a notes, where groups stop one after another. USe this to tune equalizer settings. "
 }
-\version "1.5.68"
+\version "1.7.6"
 
 flauti = \notes \relative c' {
   \property Staff.midiInstrument = #"flute"
@@ -150,3 +150,4 @@ violoncello = \notes \relative c' {
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/explicit.ly ./input/test/explicit.ly
--- ../lilypond-1.7.7/input/test/explicit.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/explicit.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \header{
 texidoc="Explicit pitches and durations."
@@ -10,3 +10,4 @@ texidoc="Explicit pitches and durations.
 
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/extra-staff.ly ./input/test/extra-staff.ly
--- ../lilypond-1.7.7/input/test/extra-staff.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/extra-staff.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,14 +1,14 @@
-\version "1.7.3"
+\version "1.7.6"
 %{
 (Message vers:9)
-To: Adrian Mariano <adrian@cam.cornell.edu>
+To: Adrian Mariano <<adrian@camcornelledu>>.
 cc: gnu-music-discuss@gnu.org
 Subject: Re: Switching from one staff to two staves 
 Reply-To: janneke@gnu.org
 In-reply-to: Your message of "Tue, 19 Jan 1999 12:27:10 EST."
-             <199901191727.MAA29757@avalanche.cam.cornell.edu> 
+             <<199901191727.MAA29757@avalanchecamcornelledu>>. 
 Date: Wed, 20 Jan 1999 09:39:22 +0100
-From: Jan Nieuwenhuizen <jan@beavis-nt>
+From: Jan Nieuwenhuizen <<jan@beavis-nt>>
 
 On Tuesday, 19 January 1999, Adrian Mariano writes:
 
@@ -44,3 +44,4 @@ extra-staff.ly:
 
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/fake-grace.ly ./input/test/fake-grace.ly
--- ../lilypond-1.7.7/input/test/fake-grace.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/fake-grace.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score { 
   \context Voice \notes\relative c {
     % to see the magic: uncomment size stuff in init/paper20.ly
@@ -17,3 +17,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/figured-bass.ly ./input/test/figured-bass.ly
--- ../lilypond-1.7.7/input/test/figured-bass.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/figured-bass.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,18 +1,18 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
 texidoc = "Test figured bass.
 
 Figured bass is created by the FiguredBass context which eats
 note-requests and rest-requests.  You can enter these either using
-standard @code{< >} notation, or using the special @code{\figures @{ @}}
-mode, which allows you to type numbers, like @code{<4 6+>}.
+standard @code{<< >>} notation, or using the special @code{\figures @{ @}}
+mode, which allows you to type numbers, like @code{<<4 6+>>}.
  
 " }
 
 \score { \notes  <
 \context FiguredBass \transpose c c' {
-   <e! g >
-   <f8 ais >
+   <<e! g >>
+   <<f ais >>8
    \figures {
      r8
      <1 3 5>4 <3- 5+ 6!> <5>
@@ -28,3 +28,4 @@ mode, which allows you to type numbers, 
  
 >
  }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/fill-a4.ly ./input/test/fill-a4.ly
--- ../lilypond-1.7.7/input/test/fill-a4.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/fill-a4.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 %
 % test file to get a4 paper really filled,
@@ -37,3 +37,4 @@ tagline="Ligly"
 		}
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/fingering.ly ./input/test/fingering.ly
--- ../lilypond-1.7.7/input/test/fingering.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/fingering.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 
@@ -7,3 +7,4 @@
 	\grace {[b8^1 c^2]} d4^3
 }
 \paper {linewidth = -1.  }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/follow-thread.ly ./input/test/follow-thread.ly
--- ../lilypond-1.7.7/input/test/follow-thread.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/follow-thread.ly	2002-11-19 11:51:38.000000000 +0100
@@ -6,7 +6,7 @@ property @code{followVoice}.
 "
 }
 
-\version "1.5.68"
+\version "1.7.6"
 % followVoice: connect note heads with line when thread switches staff 
 
 fragment = \notes {
@@ -28,3 +28,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/force-hshift.ly ./input/test/force-hshift.ly
--- ../lilypond-1.7.7/input/test/force-hshift.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/force-hshift.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc="Force hshift to override collisions"
     }
@@ -11,13 +11,13 @@
 			\property Voice.NoteColumn \override #'force-hshift = #0.1
 			\stemUp
 	       		\property Voice.NoteColumn \override #'horizontal-shift = #1
-			<g' d'>
+			<<g' d'>>
 		}
 		\context Voice = VB {
 			\stemDown
 	       		\property Voice.NoteColumn \override #'horizontal-shift = #1
 			\property Voice.NoteColumn \override #'force-hshift = #-0.1
-			<bes f'>
+			<<bes f'>>
 		}
 	>
   }
@@ -26,3 +26,4 @@
   }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/gmsusd.ly ./input/test/gmsusd.ly
--- ../lilypond-1.7.7/input/test/gmsusd.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/gmsusd.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % the Gm7sus4/D chord prints as Gm/4/7/D
 % it took me quite a while by experiment to work out how to enter it -- PC
 
@@ -12,7 +12,7 @@ gmsus=\notes\relative c \chords{ 
 	g1:3-.4.7
 
 	% another hard way:
-	\notes< g'1 bes c d f >
+	\notes { << g' bes c d f >>1 }
 
 	% bit easier:
 	g1:m.4.7
@@ -30,3 +30,4 @@ gmsus=\notes\relative c \chords{ 
 		\context Staff \gmsus
 	>
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/gourlay.ly ./input/test/gourlay.ly
--- ../lilypond-1.7.7/input/test/gourlay.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/gourlay.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 %{
@@ -17,3 +17,4 @@ This is taken from [Gourlay]'s paper on 
        }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/grace-end.ly ./input/test/grace-end.ly
--- ../lilypond-1.7.7/input/test/grace-end.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/grace-end.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -9,3 +9,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/hara-kiri.ly ./input/test/hara-kiri.ly
--- ../lilypond-1.7.7/input/test/hara-kiri.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/hara-kiri.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc = "Hara kiri staves disappear when empty "
@@ -98,3 +98,4 @@ zagers =  \context GrandStaff <
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/hara-kiri-switch.ly ./input/test/hara-kiri-switch.ly
--- ../lilypond-1.7.7/input/test/hara-kiri-switch.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/hara-kiri-switch.ly	2002-11-19 11:51:38.000000000 +0100
@@ -2,7 +2,7 @@
 \header {
 texidoc = "some instruments (notably: cello and double bass) are alternatively written on one and two staves. This is the way to do it:"
 }
-\version "1.5.68"
+\version "1.7.6"
 
 
 voiceOne =  \notes \relative c'' {
@@ -55,3 +55,4 @@ grandstaff =  \context GrandStaff = one 
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/harmonic.ly ./input/test/harmonic.ly
--- ../lilypond-1.7.7/input/test/harmonic.ly	2002-08-18 13:51:19.000000000 +0200
+++ ./input/test/harmonic.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.7"
 \header {
     texidoc =" Harmonic notes: a different style on the same stem. "
 }
@@ -11,3 +12,4 @@
 	     
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/header-ifelse.ly ./input/test/header-ifelse.ly
--- ../lilypond-1.7.7/input/test/header-ifelse.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/header-ifelse.ly	2002-11-19 11:51:38.000000000 +0100
@@ -14,3 +14,4 @@ texidoc = "High level functionality can 
 }
 
 \score{ \notes{ c4 } }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/hshift.ly ./input/test/hshift.ly
--- ../lilypond-1.7.7/input/test/hshift.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/hshift.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 
@@ -23,3 +23,4 @@ shiftV = \property Voice.NoteColumn \ove
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/hymn.ly ./input/test/hymn.ly
--- ../lilypond-1.7.7/input/test/hymn.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/hymn.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\context Staff <
@@ -24,3 +24,4 @@
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/improv.ly ./input/test/improv.ly
--- ../lilypond-1.7.7/input/test/improv.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/improv.ly	2002-11-19 11:51:38.000000000 +0100
@@ -6,7 +6,7 @@ texidoc = "note heads for improvisation 
 %{ TODO: the construct with separet SquashVoice context is a little
  gory. FIXME.  %}
 
-\version "1.7.5"
+\version "1.7.6"
 
 improOn = \notes {\translator Voice = impro }
 improOff = \notes {\translator SquashVoice = melo }
@@ -53,3 +53,4 @@ global = \notes { s1*3 \bar "|." }
     linewidth = -1
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/incipit.ly ./input/test/incipit.ly
--- ../lilypond-1.7.7/input/test/incipit.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/incipit.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 %{
  Test of how to make an ``incipit'' to indicate scordatora 
  tuning of a violin part, using the clefStyle property.
@@ -14,7 +14,7 @@ violinincipit =  \notes\relative c''{
   \time 2/2
   \property Staff.TimeSignature \override #'style = #'old
   a4. b8 c4 fis |
-%  <b1 fis' b d>
+%  <<b fis' b d>>1
   \property Staff.TimeSignature \override #'style = #'C
 }
 
@@ -66,3 +66,4 @@ BC  = \notes\relative c{
   >
 }  
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/instrument-name-grandstaff.ly ./input/test/instrument-name-grandstaff.ly
--- ../lilypond-1.7.7/input/test/instrument-name-grandstaff.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/instrument-name-grandstaff.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score {
@@ -17,3 +17,4 @@ linewidth=-1.0
   }
 \translator { \GrandStaffContext \consists "Instrument_name_engraver" }
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/instrument-name.ly ./input/test/instrument-name.ly
--- ../lilypond-1.7.7/input/test/instrument-name.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/instrument-name.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score {
@@ -11,3 +11,4 @@ linewidth=-1.0
 \translator { \StaffContext \consists "Instrument_name_engraver" }
 }}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/instrument-name-mmrest.ly ./input/test/instrument-name-mmrest.ly
--- ../lilypond-1.7.7/input/test/instrument-name-mmrest.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/instrument-name-mmrest.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 %{
 
@@ -22,3 +22,4 @@ interesting bug in 1.3.98)
 	  }
 	}
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/jazz-chords.ly ./input/test/jazz-chords.ly
--- ../lilypond-1.7.7/input/test/jazz-chords.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/jazz-chords.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 
 
@@ -66,3 +66,4 @@ scheme = \chords {
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/key-clefs.ly ./input/test/key-clefs.ly
--- ../lilypond-1.7.7/input/test/key-clefs.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/key-clefs.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \include "paper16.ly"
 
@@ -25,3 +25,4 @@
 	\paper{\paperSixteen}
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/knee.ly ./input/test/knee.ly
--- ../lilypond-1.7.7/input/test/knee.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/knee.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes\relative c'{
@@ -8,3 +8,4 @@
 		\stemUp [g c' \stemBoth a'' d']
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/knee-mult.ly ./input/test/knee-mult.ly
--- ../lilypond-1.7.7/input/test/knee-mult.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/knee-mult.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score{
 	\context PianoStaff <
 	\context Staff=one \notes\relative c'{
@@ -18,3 +18,4 @@
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/knee-sym.ly ./input/test/knee-sym.ly
--- ../lilypond-1.7.7/input/test/knee-sym.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/knee-sym.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score{
     \notes\relative c'{
 	[a8 b'' a,, b'']
@@ -8,4 +8,4 @@
     \paper{
 	linewidth = 0.0
     }
-}
\ No newline at end of file
+}%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/lines.ly ./input/test/lines.ly
--- ../lilypond-1.7.7/input/test/lines.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/lines.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc="
@@ -21,3 +21,4 @@ Draw abritrary lines.  This brings LilyP
     linewidth = 70.0*\staffspace
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/+.ly ./input/test/+.ly
--- ../lilypond-1.7.7/input/test/+.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/+.ly	2002-11-19 11:51:37.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 %% +.ly: Be the first .ly file for lys-to-tely.py.
 %% Better to make lys-to-tely.py include "introduction.texi" or
 %% other .texi documents too?
@@ -24,3 +24,4 @@ foollilypondbook = "
 \score{
 \context Lyrics \lyrics { "." }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ly2dvi-testpage.ly ./input/test/ly2dvi-testpage.ly
--- ../lilypond-1.7.7/input/test/ly2dvi-testpage.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/ly2dvi-testpage.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 %{
@@ -40,3 +40,4 @@ poet = "poet"
 	copyright = "localcopyright"
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/lyric-extender.ly ./input/test/lyric-extender.ly
--- ../lilypond-1.7.7/input/test/lyric-extender.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/lyric-extender.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score{
 	<
 	\context Staff \notes { c () c () c c }
@@ -7,3 +7,4 @@
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/lyric-hyphen.ly ./input/test/lyric-hyphen.ly
--- ../lilypond-1.7.7/input/test/lyric-hyphen.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/lyric-hyphen.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score{
 	<
 	\context Staff \notes { c' () c' () c' c' }
@@ -10,3 +10,4 @@
 
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/lyric-phrasing.ly ./input/test/lyric-phrasing.ly
--- ../lilypond-1.7.7/input/test/lyric-phrasing.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/lyric-phrasing.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 filename = 	 "twinkle-pop.ly"
 xtitle = 	 "Ah, vous dirais-je, maman "
@@ -42,3 +42,4 @@ textIII =   \lyrics  { la -- da __ doo d
   }
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/lyrics.ly ./input/test/lyrics.ly
--- ../lilypond-1.7.7/input/test/lyrics.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/lyrics.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 
 somewhatLong =  \lyrics{
@@ -65,3 +65,4 @@ melodicStaff =  \context Staff = mel <
 
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/manual-clef.ly ./input/test/manual-clef.ly
--- ../lilypond-1.7.7/input/test/manual-clef.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/manual-clef.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 %{
@@ -25,3 +25,4 @@ Test clef engraver by setting \property 
   c'4
 
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/mark.ly ./input/test/mark.ly
--- ../lilypond-1.7.7/input/test/mark.ly	2002-07-22 00:58:43.000000000 +0200
+++ ./input/test/mark.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 global =  \notes {
@@ -20,3 +20,4 @@ one =  \notes \relative c {
 \score{
 \context Staff	< \global \one >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/markup.ly ./input/test/markup.ly
--- ../lilypond-1.7.7/input/test/markup.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/markup.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
   texidoc ="Test font selection and scm text markup"
@@ -77,3 +77,4 @@
 %%% Local variables:
 %%% LilyPond-indent-level:2
 %%% End:
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/maximum-rest-count.ly ./input/test/maximum-rest-count.ly
--- ../lilypond-1.7.7/input/test/maximum-rest-count.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/maximum-rest-count.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Control the number of rests in a collision   with maximum-rest-count."
 }
@@ -42,3 +42,4 @@
 \tempo 1 = 60
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/mensural-ligatures.ly ./input/test/mensural-ligatures.ly
--- ../lilypond-1.7.7/input/test/mensural-ligatures.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/mensural-ligatures.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
     title	= "mensural ligature test"
     date	= "2002"
@@ -79,3 +79,4 @@ voice = \notes \transpose c c' {
 	}
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/metronome.ly ./input/test/metronome.ly
--- ../lilypond-1.7.7/input/test/metronome.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/metronome.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 
@@ -29,3 +29,4 @@
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/midi-scales.ly ./input/test/midi-scales.ly
--- ../lilypond-1.7.7/input/test/midi-scales.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/midi-scales.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc="MIDI and midi2ly test file.  Diff between this and midi2ly.py (experimental, 1.5.17) should be minimal"
 }
@@ -102,3 +102,4 @@ scales = \notes \relative c {
   \paper { }
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/midi-tuplets.ly ./input/test/midi-tuplets.ly
--- ../lilypond-1.7.7/input/test/midi-tuplets.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/midi-tuplets.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 texidoc = "
@@ -33,3 +33,4 @@ Midi2ly tuplet test.
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/mmrest-collision.ly ./input/test/mmrest-collision.ly
--- ../lilypond-1.7.7/input/test/mmrest-collision.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/mmrest-collision.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
   \context Staff \notes <
@@ -24,3 +24,4 @@
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/monstrous.ly ./input/test/monstrous.ly
--- ../lilypond-1.7.7/input/test/monstrous.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/monstrous.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
     texidoc ="FIXME"
@@ -26,3 +26,4 @@ monstrous= \chords{
 	linelength=-1.0\mm
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/move-accidentals.ly ./input/test/move-accidentals.ly
--- ../lilypond-1.7.7/input/test/move-accidentals.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/move-accidentals.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 \header {
 
 	 texidoc= "Positions of accidentals may be manually set. This
@@ -36,3 +36,4 @@ involves some scheme code."
     linewidth = -1
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/move-mark.ly ./input/test/move-mark.ly
--- ../lilypond-1.7.7/input/test/move-mark.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/move-mark.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 \context Staff \notes\relative c''{
@@ -20,3 +20,4 @@
 	}
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/move-notehead.ly ./input/test/move-notehead.ly
--- ../lilypond-1.7.7/input/test/move-notehead.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/move-notehead.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 fragment = \notes {
@@ -13,3 +13,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/move-specific-text.ly ./input/test/move-specific-text.ly
--- ../lilypond-1.7.7/input/test/move-specific-text.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/move-specific-text.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 #(define (make-text-checker text)
    (lambda (grob) (equal? text (ly:get-grob-property grob 'text))))
@@ -12,3 +12,4 @@
   }
   \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/multi-slope.ly ./input/test/multi-slope.ly
--- ../lilypond-1.7.7/input/test/multi-slope.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/multi-slope.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -8,3 +8,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/music-box.ly ./input/test/music-box.ly
--- ../lilypond-1.7.7/input/test/music-box.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/music-box.ly	2002-11-19 11:51:38.000000000 +0100
@@ -22,7 +22,7 @@ using Scheme functions to save typing wo
 }
 
 \include "deutsch.ly"
-\version "1.7.5"
+\version "1.7.6"
 
 #(define (transform music)
   (let* ((es (ly:get-mus-property music 'elements))
@@ -79,7 +79,7 @@ using Scheme functions to save typing wo
 
 
 
-\version "1.7.5"
+\version "1.7.6"
 
 pat = \notes \transpose c c' \repeat unfold 2 {
   < { \context Staff=up {r8 e16 f g e f g } }
@@ -92,7 +92,7 @@ pat = \notes \transpose c c' \repeat unf
 
 enda = \notes { r8 f,16 a, c f c a, \stemUp c \translator Staff = down
       a, f, a, f, d, f, d, \translator Staff = up \stemBoth
-      r8 g16 h d' f' d' h d' h g h d f e-\prall d <e1 g c'^\fermata> \bar "|."
+      r8 g16 h d' f' d' h d' h g h d f e-\prall d <<e g c'>>1^\fermata \bar "|."
 }
 endb = \notes {\stemUp \tieUp r16 c,8.~c,4~c,2 r16 h,,8.~h,,4~h,,2 c,1 \bar "|."}
 endc = \notes {\stemDown \tieDown c,,2~c,, c,,~c,, c,,1_\fermata }
@@ -151,3 +151,4 @@ endc = \notes {\stemDown \tieDown c,,2~c
       \tempo 4 = 80
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/music-creation.ly ./input/test/music-creation.ly
--- ../lilypond-1.7.7/input/test/music-creation.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/music-creation.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"  %% or actually: 1.7.1 ...
+\version "1.7.6"  %% or actually: 1.7.1 ...
 \header {
 
  texidoc = "You can create music expressions from Scheme.  The
@@ -29,3 +29,4 @@ fooMusic  = #(seq-music-list
      )
      
 \score { \fooMusic }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/nested-groups.ly ./input/test/nested-groups.ly
--- ../lilypond-1.7.7/input/test/nested-groups.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/nested-groups.ly	2002-11-19 11:51:38.000000000 +0100
@@ -9,7 +9,7 @@ copyright = 	 "public domain"
 Tested = 	 "Nested StaffGroups"
 }
 
-\version "1.5.68" % rz1
+\version "1.7.6" % rz1
 
 \score { \notes
 <
@@ -44,3 +44,4 @@ Tested = 	 "Nested StaffGroups"
 
  \paper { linewidth = -1 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/new-markup.ly ./input/test/new-markup.ly
--- ../lilypond-1.7.7/input/test/new-markup.ly	1970-01-01 01:00:00.000000000 +0100
+++ ./input/test/new-markup.ly	2002-11-19 00:36:41.000000000 +0100
@@ -0,0 +1,15 @@
+\version "1.7.7"
+\header {
+    texidoc =" New markup scheme. Semantically more sane. We haven't
+    invented a nice syntax yet."
+}
+
+\score {
+  \notes \context Voice {
+     \property Voice.TextScript \set #'molecule-callback = #brew-new-markup-molecule
+     c4^#`(,simple-markup "foo")
+     c4^#`(,column-markup (
+			   (,bold-markup (,simple-markup "foo"))
+			   (,simple-markup "bar")))
+     }
+}
diff -purN ../lilypond-1.7.7/input/test/no-bar-lines.ly ./input/test/no-bar-lines.ly
--- ../lilypond-1.7.7/input/test/no-bar-lines.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/no-bar-lines.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
   \notes \relative c'' {
@@ -15,3 +15,4 @@
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/no-staff.ly ./input/test/no-staff.ly
--- ../lilypond-1.7.7/input/test/no-staff.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/no-staff.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
   \notes { c4 c4 c8 c8 }
@@ -13,3 +13,4 @@
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/no-stem-extend.ly ./input/test/no-stem-extend.ly
--- ../lilypond-1.7.7/input/test/no-stem-extend.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/no-stem-extend.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
  texidoc = "Don't extend stems to cetner line."
 }
@@ -22,3 +22,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/note-chords.ly ./input/test/note-chords.ly
--- ../lilypond-1.7.7/input/test/note-chords.ly	2002-10-06 15:59:38.000000000 +0200
+++ ./input/test/note-chords.ly	2002-11-19 11:51:38.000000000 +0100
@@ -3,12 +3,12 @@
     texidoc= "Chord names don't attempt to find inversions and
 bass notes."  }
 
-\version "1.5.68"
+\version "1.7.6"
 
 scheme = \notes {
-  <c'1 e' g'>
-  <e' g' c''>
-  <e e' g' c''>
+  <<c' e' g'>>1
+  <<e' g' c''>>
+  <<e e' g' c''>>
 }
 
 \score {
@@ -18,3 +18,4 @@ scheme = \notes {
   >
   \paper { linewidth = -1. }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/notemode-chords.ly ./input/test/notemode-chords.ly
--- ../lilypond-1.7.7/input/test/notemode-chords.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/notemode-chords.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,12 +1,13 @@
-\version "1.7.5"
+\version "1.7.6"
 
 
 \score{
 	\notes \transpose c c'{
 % 1.1.53: @x@ syntax dropped
-% if you want fingering, write chord explicitily eg < c1-1 e-2 g-3 >
+% if you want fingering, write chord explicitily eg << c-1 e-2 g-3 >>1
 %		@c1@ @c-7@ @c-7^5@-1-3
 		\chords { c1 c:7 c:7^5 }
 	}
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/note-shift.ly ./input/test/note-shift.ly
--- ../lilypond-1.7.7/input/test/note-shift.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/note-shift.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -32,3 +32,4 @@
   }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/octave-duplicate.ly ./input/test/octave-duplicate.ly
--- ../lilypond-1.7.7/input/test/octave-duplicate.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/octave-duplicate.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header {
 texidoc="Octave duplicate parts of music"
 }
@@ -57,3 +57,4 @@ lowerOctave = \notes <
   >  
   \paper { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/orchestalpart.ly ./input/test/orchestalpart.ly
--- ../lilypond-1.7.7/input/test/orchestalpart.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/orchestalpart.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score
@@ -9,3 +9,4 @@
 
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/orchestscore.ly ./input/test/orchestscore.ly
--- ../lilypond-1.7.7/input/test/orchestscore.ly	2002-08-19 02:02:14.000000000 +0200
+++ ./input/test/orchestscore.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
   latexpackages="graphicx"
 }
@@ -113,3 +113,4 @@ c1 | c2 c | c c | R1*5 
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ossia.ly ./input/test/ossia.ly
--- ../lilypond-1.7.7/input/test/ossia.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/ossia.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,7 +1,8 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score {
 
 \notes { c1 c1 < {\clef "treble" c1 c1 } \context Staff=stb{ c1 c1}>}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/ottava.ly ./input/test/ottava.ly
--- ../lilypond-1.7.7/input/test/ottava.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/ottava.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 
 fragment = \notes {
@@ -16,3 +16,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/part-combine.ly ./input/test/part-combine.ly
--- ../lilypond-1.7.7/input/test/part-combine.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/part-combine.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -37,3 +37,4 @@ voices according to actual rhythm and pi
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/part-combine-moments.ly ./input/test/part-combine-moments.ly
--- ../lilypond-1.7.7/input/test/part-combine-moments.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/part-combine-moments.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \score{
 	\context PianoStaff <
@@ -94,3 +94,4 @@
 		}
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/part-combine-score.ly ./input/test/part-combine-score.ly
--- ../lilypond-1.7.7/input/test/part-combine-score.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/part-combine-score.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 \header {
 texidoc="Template for part-combining orchestral scores"
@@ -12,7 +12,7 @@ texidoc="Template for part-combining orc
 End = { \skip 1*9 \bar "|." }
 
 flautoI = \notes\relative c'' {
-  c4\pp d e f
+  c4-\pp d e f
   b,4 d c d
   r2 e4 f
   \break
@@ -29,7 +29,7 @@ flautoI = \notes\relative c'' {
 }
 
 flautoII = \notes\relative c'' {
-  g4\ff b d f
+  g4-\ff b d f
   r2 c4 d
   a c c d
   a4. b8 c4 d
@@ -101,7 +101,7 @@ violinoIIStaff =  \context Staff = twoVi
   % eerste en tweede viool -)
   \property Staff.midiInstrument = #"violin"
   \property Staff.instrument = #"Violino II"
-  \property Staff.instr = #"Vl. II"
+  \property Staff.instr = #"Vl II"
   \violinoII
   \End
 >
@@ -127,11 +127,11 @@ violeGroup =  \notes \context VoiceCombi
 >
 
 violoncello = \notes\relative c {
-  c1\ff d e f c d e f c
+  c1-\ff d e f c d e f c
 }
 
 contrabasso = \notes\relative c {
-  c1\pp
+  c1-\pp
   d4 e d e
   e1
   f4 g f g
@@ -286,3 +286,4 @@ archiGroup =  \context StaffGroup = arch
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/part-combine-staff.ly ./input/test/part-combine-staff.ly
--- ../lilypond-1.7.7/input/test/part-combine-staff.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/part-combine-staff.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \score{
 	\context PianoStaff <
@@ -107,3 +107,4 @@
 		}
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/partial-blank.ly ./input/test/partial-blank.ly
--- ../lilypond-1.7.7/input/test/partial-blank.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/partial-blank.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 %{  When entering half music (I.e. for students to complete by hand)
     you need the spacing to correspond to the timing - all measures same length, etc.
@@ -27,3 +27,4 @@ mel = \notes \relative c' {c16 d16 e8 a4
 >
 \paper {}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/pedal.ly ./input/test/pedal.ly
--- ../lilypond-1.7.7/input/test/pedal.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/pedal.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
     texidoc = "Piano pedal symbols merge stop and start.  The strings are configurable. 
 Text style, bracket style, and a mixture of both are supported.  "
@@ -11,18 +11,18 @@ Text style, bracket style, and a mixture
     \context Staff \notes\relative c'{
 
 	c4 d e f g
-	\sustainDown b c
-	c, [d16  c  c c] [e e \sustainUp \sustainDown e e ] f4 \sustainUp 
-	g\sustainDown  b \sustainUp c 
+	-\sustainDown b c
+	c, [d16  c  c c] [e e -\sustainUp -\sustainDown e e ] f4 -\sustainUp 
+	g-\sustainDown  b -\sustainUp c 
 	\property Staff.pedalSustainStrings = #'("-" "-P" "P")
 	\property Staff.SustainPedal \override #'padding = #-2
-	c, \sustainDown d e \sustainUp \sustainDown f
-	\sustainUp g b c
+	c, -\sustainDown d e -\sustainUp -\sustainDown f
+	-\sustainUp g b c
 
 	\property Staff.SustainPedal \override #'pedal-type = #'bracket
 
-	c4 d e \sustainDown b c c, \sustainUp \sustainDown [d8 c] [e8 e \sustainUp \sustainDown] f4 d
-	\sustainUp g \sustainDown b b, \sustainUp c'
+	c4 d e -\sustainDown b c c, -\sustainUp -\sustainDown [d8 c] [e8 e -\sustainUp -\sustainDown] f4 d
+	-\sustainUp g -\sustainDown b b, -\sustainUp c'
 
 	\property Staff.UnaCordaPedal \override #'pedal-type = #'mixed
 
@@ -37,3 +37,4 @@ Text style, bracket style, and a mixture
 	\tempo 4 = 60
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/perform-grace.ly ./input/test/perform-grace.ly
--- ../lilypond-1.7.7/input/test/perform-grace.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/perform-grace.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -10,3 +10,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/perform-tie.ly ./input/test/perform-tie.ly
--- ../lilypond-1.7.7/input/test/perform-tie.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/perform-tie.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -9,3 +9,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/phrasing-slur-height.ly ./input/test/phrasing-slur-height.ly
--- ../lilypond-1.7.7/input/test/phrasing-slur-height.ly	2002-08-15 23:20:09.000000000 +0200
+++ ./input/test/phrasing-slur-height.ly	2002-11-19 11:51:38.000000000 +0100
@@ -2,7 +2,7 @@
     texidoc="Make PhrasingSlur higher, to avoid colission from other slurs"
     }
 
-\version "1.5.72"
+\version "1.7.6"
 
 \score {
     \context Staff = melody \notes\relative c''{
@@ -13,3 +13,4 @@
     \paper {
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/poly-metric.ly ./input/test/poly-metric.ly
--- ../lilypond-1.7.7/input/test/poly-metric.ly	2002-09-15 23:35:05.000000000 +0200
+++ ./input/test/poly-metric.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.7"
 \header {
     texidoc = "Polymetric music with aligned note values can be written
  by moving the timing engraver to staff context."
@@ -30,3 +31,4 @@
 }
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/preset-extent.ly ./input/test/preset-extent.ly
--- ../lilypond-1.7.7/input/test/preset-extent.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/preset-extent.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "Grob extents may be hard coded using grob
@@ -17,3 +17,4 @@ texidoc = "Grob extents may be hard code
     \paper { linewidth = -1.0 }
 }
     
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/repeat.ly ./input/test/repeat.ly
--- ../lilypond-1.7.7/input/test/repeat.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/repeat.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	<
@@ -18,3 +18,4 @@
 		  }
 	>
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/repeat-manual.ly ./input/test/repeat-manual.ly
--- ../lilypond-1.7.7/input/test/repeat-manual.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/repeat-manual.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,5 +1,5 @@
 
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score { \notes {
@@ -18,3 +18,4 @@
  c c
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/rest-dot-positions.ly ./input/test/rest-dot-positions.ly
--- ../lilypond-1.7.7/input/test/rest-dot-positions.ly	2002-10-14 16:32:45.000000000 +0200
+++ ./input/test/rest-dot-positions.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,3 +1,4 @@
+\version "1.7.7"
 \include "paper16.ly"
 \paper  {
 }
@@ -53,3 +54,4 @@ muz = \notes \relative c'' {
       >
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/rests.ly ./input/test/rests.ly
--- ../lilypond-1.7.7/input/test/rests.ly	2002-09-20 11:21:07.000000000 +0200
+++ ./input/test/rests.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "rests in various styles."
 }
@@ -42,3 +42,4 @@
 	}
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/reverse-music.ly ./input/test/reverse-music.ly
--- ../lilypond-1.7.7/input/test/reverse-music.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/reverse-music.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \header {
 texidoc="
@@ -36,3 +36,4 @@ music = \notes \relative c'' { c4 d4( e4
   \paper { linewidth = -1. }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/rhythm-excercise.ly ./input/test/rhythm-excercise.ly
--- ../lilypond-1.7.7/input/test/rhythm-excercise.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/rhythm-excercise.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
     texidoc = " a way to generate rhythm exercises with lilypond
@@ -17,3 +17,4 @@
 		       }
 	 }
      }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/rhythmic-staff.ly ./input/test/rhythmic-staff.ly
--- ../lilypond-1.7.7/input/test/rhythmic-staff.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/rhythmic-staff.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score{
@@ -16,3 +16,4 @@
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/scales-greek.ly ./input/test/scales-greek.ly
--- ../lilypond-1.7.7/input/test/scales-greek.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/scales-greek.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
 	crossRefNumber = "1"
@@ -42,3 +42,4 @@ e'8    f'8    g'8    a'8    bes'8    c''
 	}
 	\midi {}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/scales.ly ./input/test/scales.ly
--- ../lilypond-1.7.7/input/test/scales.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/scales.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -108,3 +108,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/scheme-interactions.ly ./input/test/scheme-interactions.ly
--- ../lilypond-1.7.7/input/test/scheme-interactions.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/scheme-interactions.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 \header {
 
@@ -23,3 +23,4 @@ bra = \notes \transpose c c { e'4-. }
       c4
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/script-horizontal.ly ./input/test/script-horizontal.ly
--- ../lilypond-1.7.7/input/test/script-horizontal.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/script-horizontal.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 %{
 
 Please don't use this Scheme hacking unless you have a good reason.
@@ -28,3 +28,4 @@ Please don't use this Scheme hacking unl
 		}
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/script-priority.ly ./input/test/script-priority.ly
--- ../lilypond-1.7.7/input/test/script-priority.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/script-priority.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc = "Relative placements of different script types can be controlled
 by overriding script-priority."
@@ -17,3 +17,4 @@ by overriding script-priority."
 	a4^\prall^#'((music (font-relative-size . -2)) "accidentals-1")
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/scripts.ly ./input/test/scripts.ly
--- ../lilypond-1.7.7/input/test/scripts.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/scripts.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 	
 
 
@@ -67,3 +67,4 @@ blah =  	\notes{ \transpose c c' {
 	\blah
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/separate-staccato.ly ./input/test/separate-staccato.ly
--- ../lilypond-1.7.7/input/test/separate-staccato.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/separate-staccato.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc="You can enter notes and articulations separately, and merge
@@ -16,3 +16,4 @@ music = \notes\relative c' { c4 d e f g 
      \repeat unfold 2 \staccatos
    >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/short-part-combine.ly ./input/test/short-part-combine.ly
--- ../lilypond-1.7.7/input/test/short-part-combine.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/short-part-combine.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\context Staff <
@@ -13,3 +13,4 @@
 				}
 		>
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/simple-slur-endings.ly ./input/test/simple-slur-endings.ly
--- ../lilypond-1.7.7/input/test/simple-slur-endings.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/simple-slur-endings.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes \relative c''{
@@ -13,3 +13,4 @@
 		linewidth = 60.0\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/sketch.ly ./input/test/sketch.ly
--- ../lilypond-1.7.7/input/test/sketch.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/sketch.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc="sketch output supported features"
 }
@@ -13,3 +13,4 @@ texidoc="sketch output supported feature
     \slurDown d16( c b )a
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/sleur.ly ./input/test/sleur.ly
--- ../lilypond-1.7.7/input/test/sleur.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/sleur.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 enteredby = 	 "jcn"
 copyright = 	 "public domain"
@@ -185,3 +185,4 @@ clipping =  \notes\transpose c c{
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-area.ly ./input/test/slur-area.ly
--- ../lilypond-1.7.7/input/test/slur-area.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-area.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 \notes\relative c''{
@@ -26,3 +26,4 @@ a8(a a a a a a)a
 indent=0.0\mm
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-attachment.ly ./input/test/slur-attachment.ly
--- ../lilypond-1.7.7/input/test/slur-attachment.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-attachment.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 fragment = \notes {
@@ -17,3 +17,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-attachment-override.ly ./input/test/slur-attachment-override.ly
--- ../lilypond-1.7.7/input/test/slur-attachment-override.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-attachment-override.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 texidoc="
@@ -22,3 +22,4 @@ fragment = \notes {
   \notes\relative c \fragment
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-broken-cross-staff.ly ./input/test/slur-broken-cross-staff.ly
--- ../lilypond-1.7.7/input/test/slur-broken-cross-staff.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-broken-cross-staff.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 texidoc="
 The same goes for slurs. They behave decently when broken across
@@ -51,3 +51,4 @@ linebreak.
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-broken.ly ./input/test/slur-broken.ly
--- ../lilypond-1.7.7/input/test/slur-broken.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-broken.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes\relative c''{
@@ -14,3 +14,4 @@
 		linewidth = 60.\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-damping.ly ./input/test/slur-damping.ly
--- ../lilypond-1.7.7/input/test/slur-damping.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-damping.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % test damping
 
 
@@ -11,3 +11,4 @@
 		c c c c
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-dash.ly ./input/test/slur-dash.ly
--- ../lilypond-1.7.7/input/test/slur-dash.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-dash.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score{
@@ -22,3 +22,4 @@
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-follow-music.ly ./input/test/slur-follow-music.ly
--- ../lilypond-1.7.7/input/test/slur-follow-music.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-follow-music.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -24,3 +24,4 @@
   }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-mininum.ly ./input/test/slur-mininum.ly
--- ../lilypond-1.7.7/input/test/slur-mininum.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-mininum.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "" 
 }
@@ -11,3 +11,4 @@ texidoc = "" 
 		c~c\break
 		}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-positions.ly ./input/test/slur-positions.ly
--- ../lilypond-1.7.7/input/test/slur-positions.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-positions.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes\relative c''{
@@ -17,3 +17,4 @@
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-proof.ly ./input/test/slur-proof.ly
--- ../lilypond-1.7.7/input/test/slur-proof.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-proof.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 x = {
@@ -46,3 +46,4 @@ x = {
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-symmetry-2.ly ./input/test/slur-symmetry-2.ly
--- ../lilypond-1.7.7/input/test/slur-symmetry-2.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-symmetry-2.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 % should look the same
@@ -16,3 +16,4 @@ title="symmetry"
 		linewidth = 50.0\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-symmetry-3.ly ./input/test/slur-symmetry-3.ly
--- ../lilypond-1.7.7/input/test/slur-symmetry-3.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/slur-symmetry-3.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 % should look the same
@@ -15,3 +15,4 @@ title="symmetry"
 		linewidth = 50.0\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/slur-ugly.ly ./input/test/slur-ugly.ly
--- ../lilypond-1.7.7/input/test/slur-ugly.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/slur-ugly.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \header {
 texidoc="You can get ugly slurs, if you want.
@@ -35,3 +35,4 @@ baseWalk = \notes \relative c {
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/smart-transpose.ly ./input/test/smart-transpose.ly
--- ../lilypond-1.7.7/input/test/smart-transpose.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/smart-transpose.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 \header {
 texidoc="
@@ -71,3 +71,4 @@ music = \notes \relative c' { c4 d  e f 
   \paper { linewidth = -1. }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/solo-a2.ly ./input/test/solo-a2.ly
--- ../lilypond-1.7.7/input/test/solo-a2.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/solo-a2.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\context Staff = one <
@@ -19,3 +19,4 @@
 		linewidth = 100.\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/spacing-2.ly ./input/test/spacing-2.ly
--- ../lilypond-1.7.7/input/test/spacing-2.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/spacing-2.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 opus =  "BWV 937 (prelude)"
 composer =  "J. S. Bach"
@@ -35,3 +35,4 @@ source =  "Petits Preludes et Fugues.  U
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/spacing.ly ./input/test/spacing.ly
--- ../lilypond-1.7.7/input/test/spacing.ly	2002-08-13 18:14:29.000000000 +0200
+++ ./input/test/spacing.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 title= "Spacing"
 subtitle =  "proofsheet" 
@@ -95,3 +95,4 @@ singlepart =  \notes{ 
       linewidth= 20.0\cm
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/span-bars.ly ./input/test/span-bars.ly
--- ../lilypond-1.7.7/input/test/span-bars.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/span-bars.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 nt =  \notes { c1 \break c1 c1 } 
@@ -22,3 +22,4 @@ stuff =  \notes \relative c'' <
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/stacked-scripts.ly ./input/test/stacked-scripts.ly
--- ../lilypond-1.7.7/input/test/stacked-scripts.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/stacked-scripts.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
 	\notes {
@@ -7,3 +7,4 @@
 	 }
 	\paper { linewidth = -1.  }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/staff-bracket.ly ./input/test/staff-bracket.ly
--- ../lilypond-1.7.7/input/test/staff-bracket.ly	2002-08-19 02:02:14.000000000 +0200
+++ ./input/test/staff-bracket.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score
 {
@@ -23,3 +23,4 @@
     }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/staff-container.ly ./input/test/staff-container.ly
--- ../lilypond-1.7.7/input/test/staff-container.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/staff-container.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \header {
@@ -38,3 +38,4 @@ interesting things. You can also drop th
 }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/staff-line-leading.ly ./input/test/staff-line-leading.ly
--- ../lilypond-1.7.7/input/test/staff-line-leading.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/staff-line-leading.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 
     texidoc ="Setting staff space on a staff "
@@ -7,7 +7,7 @@
   \notes \relative c'' \context GrandStaff <
 	\context Staff = up { c4 c4  }
 	\context Staff = down {  c4
-	  [<c8 d f g>
+	  [<<c d f g>>8
 	   e]
 	  [f c']
 	 }
@@ -17,3 +17,4 @@
       StaffSymbol \set #'staff-space = #5.5
       }}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/staff-lines.ly ./input/test/staff-lines.ly
--- ../lilypond-1.7.7/input/test/staff-lines.ly	2002-07-17 01:57:07.000000000 +0200
+++ ./input/test/staff-lines.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc="staff symbol property set workaround"
 }
@@ -29,4 +29,4 @@ lower = \notes\relative c {
   >
   \paper { }  
   \midi { }  
-}
\ No newline at end of file
+}%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/staff-margin-partial.ly ./input/test/staff-margin-partial.ly
--- ../lilypond-1.7.7/input/test/staff-margin-partial.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/staff-margin-partial.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % test staff margin with partial measure.
 
 
@@ -9,3 +9,4 @@
     \translator { \StaffContext \consists Instrument_name_engraver }
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/staff-size.ly ./input/test/staff-size.ly
--- ../lilypond-1.7.7/input/test/staff-size.ly	2002-08-02 11:53:29.000000000 +0200
+++ ./input/test/staff-size.ly	2002-11-19 11:51:38.000000000 +0100
@@ -4,7 +4,7 @@ are two options: using StaffContainer an
 \outputproperty. Both methods are shown in this example."
 }
 
-\version "1.5.70"
+\version "1.7.6"
 \score {
   \notes \relative c' < \context StaffContainer = SA{
      \property StaffContainer.StaffSymbol \set #'staff-space = #(/ 16 20)
@@ -15,10 +15,10 @@ are two options: using StaffContainer an
 	\dynamicUp\stemDown
 
 	%\key gis \major
-	c8 d [e f g a] b c \ff
+	c8 d [e f g a] b c -\ff
   }
 
-\context Staff = SB { \dynamicDown c,,4 \ff c c c  }
+\context Staff = SB { \dynamicDown c,,4 -\ff c c c  }
 \context Staff = SC {
   \context Staff \outputproperty #(make-type-checker 'staff-symbol-interface)
     #'staff-space =  #0.8
@@ -30,3 +30,4 @@ are two options: using StaffContainer an
 \paper { linewidth = -1. }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/stem-centered.ly ./input/test/stem-centered.ly
--- ../lilypond-1.7.7/input/test/stem-centered.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/stem-centered.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
     texidoc ="mensural note heads."
     }
@@ -12,3 +12,4 @@ c\longa*1/4 c\breve*1/2 c1 c2 c4 c8 
 }
 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/stem-cross-staff.ly ./input/test/stem-cross-staff.ly
--- ../lilypond-1.7.7/input/test/stem-cross-staff.ly	2002-10-05 03:46:23.000000000 +0200
+++ ./input/test/stem-cross-staff.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,3 +1,5 @@
+\version "1.7.7"
+
 \header {
     texidoc = "Cross staff stems
 
@@ -33,3 +35,4 @@ noFlag = \once \property Voice.Stem \ove
 
     \paper { linewidth = -1.0 }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/stem-extend.ly ./input/test/stem-extend.ly
--- ../lilypond-1.7.7/input/test/stem-extend.ly	2002-09-20 11:21:07.000000000 +0200
+++ ./input/test/stem-extend.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header { texidoc = "
 Conventionally, stems and beams extend to the middle staff line.  This
 extension can be controlled through @code{Voice.Stem}'s grob-property
@@ -11,3 +11,4 @@ extension can be controlled through @cod
   \property Voice.Stem \set #'no-stem-extend = ##t
   \grace g8 g4 [g8 g]
 }}
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/stem-length.ly ./input/test/stem-length.ly
--- ../lilypond-1.7.7/input/test/stem-length.ly	2002-08-18 03:11:16.000000000 +0200
+++ ./input/test/stem-length.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -8,3 +8,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/stem.ly ./input/test/stem.ly
--- ../lilypond-1.7.7/input/test/stem.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/stem.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
   title= "Stems and Beams"
   subtitle =  "proofsheet" 
@@ -65,3 +65,4 @@ beamintervals = \notes{
 %%% Local variables:
 %%% LilyPond-indent-level:2
 %%% End:
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/super-sub.ly ./input/test/super-sub.ly
--- ../lilypond-1.7.7/input/test/super-sub.ly	2002-08-13 18:14:29.000000000 +0200
+++ ./input/test/super-sub.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc="Test super/sub, raise and overstrike."
 }
@@ -29,4 +29,4 @@ texidoc="Test super/sub, raise and overs
     c^#`(columns (lines "" ";" "") (lines "1" ((bold) "2") "3"))
     c^#`(columns (lines "" ";" "") (lines "1" (columns (bold "2")) "3"))
   }
-}
\ No newline at end of file
+}%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/system-start-brace.ly ./input/test/system-start-brace.ly
--- ../lilypond-1.7.7/input/test/system-start-brace.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/system-start-brace.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,7 +1,8 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score {
 	\notes	\context PianoStaff < \context Staff = SA { s1 }
 		\context Staff = SB { s1 }>
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/system-start-bracket.ly ./input/test/system-start-bracket.ly
--- ../lilypond-1.7.7/input/test/system-start-bracket.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/system-start-bracket.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,7 +1,8 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 \score {
 	\notes	\context StaffGroup < \context Staff = SA { s1 }
 		\context Staff = SB { s1 }>
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/tablature-hammer.ly ./input/test/tablature-hammer.ly
--- ../lilypond-1.7.7/input/test/tablature-hammer.ly	2002-08-14 14:38:06.000000000 +0200
+++ ./input/test/tablature-hammer.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 texidoc = "" 
 }
@@ -12,3 +12,4 @@ texidoc = "" 
   }
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/tablature.ly ./input/test/tablature.ly
--- ../lilypond-1.7.7/input/test/tablature.ly	2002-09-20 11:21:07.000000000 +0200
+++ ./input/test/tablature.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.6.2"
+\version "1.7.6"
 
 %{
 
@@ -30,3 +30,4 @@ partition = \notes {
     >
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/tchaikovsky.ly ./input/test/tchaikovsky.ly
--- ../lilypond-1.7.7/input/test/tchaikovsky.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/tchaikovsky.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 filename = 	"tchaikovsky.ly"
 title = 		"Extracts from 6th symphony"
@@ -18,8 +18,8 @@ instrument=	"Violoncello"
 	  \relative c{
 	 	\clef "bass"
 		\key d \major
-		<a2\ppp\cr d> <gis\rc\p\decr d'> | <a2\rced d> ~ <a8 d> r8 r4 |
-		a2\ppp\cr a2\rc\p\decr | <a2\rced d> ~ <a8 d> r8 r4 |
+		<<a\cr d>>2-\ppp <<gis\rc\decr d'>>-\p | <<a\rced d>>2 ~ <<a d>>8 r8 r4 |
+		a2-\ppp\cr a2\rc-\p\decr | <<a\rced d>>2 ~ <<a d>>8 r8 r4 |
 		a2\pppp ~ a8 r8 r4 | a2\ppppp ~ a8 r8 r4 | r4 a8_"pizz"
 		r8 r2^\fermata     
 	}
@@ -34,11 +34,12 @@ instrument=	"Violoncello"
 	\relative c{
 		\clef "bass"
 		\key c \major
-		<e1\sff cis'^\downbow> | <cis\sff a'^\downbow> | 
-		<d,\ffff\decr g> | ~ <d2 g> ~ <d8\p\rced g> 
+		<<e\sff cis'>>1^\downbow | <<cis\sff a'>>^\downbow | 
+		<<d,\ffff\decr g>> | ~ <<d g>>2 ~ <<d\rced g>>8-\p 
 	}
 	\header{ 
 	piece="example 2"
 	}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/test-german-chords.ly ./input/test/test-german-chords.ly
--- ../lilypond-1.7.7/input/test/test-german-chords.ly	2002-07-21 21:27:39.000000000 +0200
+++ ./input/test/test-german-chords.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \include "german-chords-init.ly"
 
 % #(set! german-Bb #t)
@@ -13,3 +13,4 @@ ch = \chords { beses1/+beses bes/+bes b/
    \paper {}
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/textscript.ly ./input/test/textscript.ly
--- ../lilypond-1.7.7/input/test/textscript.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/textscript.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 %
@@ -20,3 +20,4 @@
     c^#'(Large "ABCD")
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/text-spanner.ly ./input/test/text-spanner.ly
--- ../lilypond-1.7.7/input/test/text-spanner.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/text-spanner.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \header {
 texidoc = "ottava spanners."
@@ -35,3 +35,4 @@ texidoc = "ottava spanners."
         \property Staff.centralCPosition = #-6
     }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/thumb.ly ./input/test/thumb.ly
--- ../lilypond-1.7.7/input/test/thumb.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/thumb.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 	title="CELLO-THUMBS"
 	enteredby="Maarten Storm"
@@ -11,8 +11,8 @@
 
 
 \score { \notes \relative c'' {
-		[<a8_\thumb a'8-3(> <)b_\thumb b'-3>
-		<c_\thumb c'-3(> <)d_\thumb d'-3>]
+		[<<a a'-3(>>8_\thumb <<b b'-3>>-)_\thumb
+		<<c c'-3(>>_\thumb <<d d'-3>>-)_\thumb]
 	}
 	\paper{ 
 		linewidth = 80.\mm 
@@ -21,3 +21,4 @@
 }
 
 	
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/tie-broken.ly ./input/test/tie-broken.ly
--- ../lilypond-1.7.7/input/test/tie-broken.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/tie-broken.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\notes \relative c''{
@@ -17,3 +17,4 @@
 		indent=0.
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/tie-sparse.ly ./input/test/tie-sparse.ly
--- ../lilypond-1.7.7/input/test/tie-sparse.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/tie-sparse.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "setting sparseTies causes only one tie to be
@@ -10,10 +10,11 @@ generated per chord pair."
 \score { 
   \context Voice \notes\relative c {
 	\property Voice.sparseTies = ##t
-	c''  <c e g> ~ <c e g> 
+	c''  <<c e g>> ~ <<c e g>> 
   }
   \paper {
     linewidth=-1.0
   }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/time.ly ./input/test/time.ly
--- ../lilypond-1.7.7/input/test/time.ly	2002-08-10 01:14:27.000000000 +0200
+++ ./input/test/time.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header
 {
     texidoc =  "
@@ -177,3 +177,4 @@ right side of the nominator).  -- jr
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/timing.ly ./input/test/timing.ly
--- ../lilypond-1.7.7/input/test/timing.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/timing.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -23,3 +23,4 @@
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/title.ly ./input/test/title.ly
--- ../lilypond-1.7.7/input/test/title.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/title.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
   filename =  "title.ly"
   dedication = "dedication"
@@ -41,3 +41,4 @@
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/to-xml.ly ./input/test/to-xml.ly
--- ../lilypond-1.7.7/input/test/to-xml.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/to-xml.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 fooBar = \notes { < c''4 \\ g'4 > }
 
@@ -25,3 +25,4 @@ fooBar = \notes { < c''4 \\ g'4 > }
 \score {
 \fooBar
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/transposing.ly ./input/test/transposing.ly
--- ../lilypond-1.7.7/input/test/transposing.ly	2002-07-22 02:41:17.000000000 +0200
+++ ./input/test/transposing.ly	2002-11-19 11:51:38.000000000 +0100
@@ -2,7 +2,7 @@
 texidoc = " the transposing property leaves output invariant, but has effect on MIDI."
 
 }
-\version "1.5.68"
+\version "1.7.6"
 
 \score { 
   \context Voice \notes\relative c {
@@ -21,3 +21,4 @@ texidoc = " the transposing property lea
   \paper { }  
   \midi { }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/transposition.ly ./input/test/transposition.ly
--- ../lilypond-1.7.7/input/test/transposition.ly	2002-11-06 13:34:01.000000000 +0100
+++ ./input/test/transposition.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 %{
 Hi all,
 
@@ -72,3 +72,4 @@ vFour =  \notes \transpose c d \vThree
 
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/trill.ly ./input/test/trill.ly
--- ../lilypond-1.7.7/input/test/trill.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/trill.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \header {
 texidoc="show trill line type"
@@ -23,3 +23,4 @@ texidoc="show trill line type"
   }
   \paper { }  
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/trills.ly ./input/test/trills.ly
--- ../lilypond-1.7.7/input/test/trills.ly	2002-08-19 02:02:14.000000000 +0200
+++ ./input/test/trills.ly	2002-11-19 11:51:38.000000000 +0100
@@ -6,7 +6,7 @@
   linewidth = 433.619940\pt
   
 } 
-\version "1.5.68"
+\version "1.7.6"
 \header {
   texidoc="Document trills, pralls and turns"
   title="Marques des agr\\'ements et leur signification"
@@ -111,3 +111,4 @@ endHorizScript = {
     >
   >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/tuplet-rest.ly ./input/test/tuplet-rest.ly
--- ../lilypond-1.7.7/input/test/tuplet-rest.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/tuplet-rest.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 
@@ -16,3 +16,4 @@
   }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/tuplet-spanner-duration.ly ./input/test/tuplet-spanner-duration.ly
--- ../lilypond-1.7.7/input/test/tuplet-spanner-duration.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/tuplet-spanner-duration.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 
 \score
@@ -12,3 +12,4 @@
 }
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/two-key.ly ./input/test/two-key.ly
--- ../lilypond-1.7.7/input/test/two-key.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/two-key.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header {
 
 texidoc = "If you specify two different key sigs at one point, a
@@ -12,3 +12,4 @@ texidoc = "If you specify two different 
  { \key cis \major fis4 \key es \major g4 }  
 >
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/two-slurs.ly ./input/test/two-slurs.ly
--- ../lilypond-1.7.7/input/test/two-slurs.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/two-slurs.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 %
 % We'd want to combine the stems, but have two slurs too...
@@ -19,3 +19,4 @@
 		linewidth=60.\mm
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/unfold-all-repeats.ly ./input/test/unfold-all-repeats.ly
--- ../lilypond-1.7.7/input/test/unfold-all-repeats.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/test/unfold-all-repeats.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header { 
 texidoc = "The standard function unfold-repeats will recursively unfold
@@ -24,3 +24,4 @@ mel = \notes \context Staff {
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/uniform-breaking.ly ./input/test/uniform-breaking.ly
--- ../lilypond-1.7.7/input/test/uniform-breaking.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/uniform-breaking.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 %{
 Hmm, ik vraag me af of dit al helemaal koel is.
@@ -112,3 +112,4 @@ Heb niet zomaar beter idee, nog.
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/vertical-align.ly ./input/test/vertical-align.ly
--- ../lilypond-1.7.7/input/test/vertical-align.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/vertical-align.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 
@@ -19,3 +19,4 @@
 }
 
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/vertical-extent.ly ./input/test/vertical-extent.ly
--- ../lilypond-1.7.7/input/test/vertical-extent.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/vertical-extent.ly	2002-11-19 11:51:38.000000000 +0100
@@ -5,7 +5,7 @@ normal property values, and are written 
 associated context finishes, so using it in \property works.
 
  " }
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
   \notes  <
@@ -27,3 +27,4 @@ associated context finishes, so using it
     \translator{\StaffContext minimumVerticalExtent = #'(-2.0 . 2.0)}
   }
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/vertical-text.ly ./input/test/vertical-text.ly
--- ../lilypond-1.7.7/input/test/vertical-text.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/vertical-text.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score{
 	<
 		\context Staff = o \notes\relative c,,, { 
@@ -17,3 +17,4 @@
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/voice-switch.ly ./input/test/voice-switch.ly
--- ../lilypond-1.7.7/input/test/voice-switch.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/voice-switch.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score{
 	\context Staff <
@@ -21,3 +21,4 @@
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/voicify-chords.ly ./input/test/voicify-chords.ly
--- ../lilypond-1.7.7/input/test/voicify-chords.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/test/voicify-chords.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
   
 #(define (voicify-list lst number)
    "Make a list of Musics.
@@ -63,3 +63,4 @@
 }
 
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/volta.ly ./input/test/volta.ly
--- ../lilypond-1.7.7/input/test/volta.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/volta.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,6 +1,6 @@
 % DOCUMENTME!
 
-\version "1.5.68"
+\version "1.7.6"
 
 
 
@@ -47,3 +47,4 @@ voicedefault =  \notes {
         }
 }
 
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/test/volta-start.ly ./input/test/volta-start.ly
--- ../lilypond-1.7.7/input/test/volta-start.ly	2002-07-17 01:57:08.000000000 +0200
+++ ./input/test/volta-start.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header{
 
@@ -106,3 +106,4 @@ voiceE =  \notes {
 	    }
 	}
 }
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/trip.ly ./input/trip.ly
--- ../lilypond-1.7.7/input/trip.ly	2002-09-28 17:55:35.000000000 +0200
+++ ./input/trip.ly	2002-11-19 11:51:36.000000000 +0100
@@ -7,7 +7,7 @@
 }
 
 
-\version "1.5.68"
+\version "1.7.6"
 
 %{
 
diff -purN ../lilypond-1.7.7/input/tutorial/brahms-original.ly ./input/tutorial/brahms-original.ly
--- ../lilypond-1.7.7/input/tutorial/brahms-original.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/brahms-original.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score {
     \notes\context PianoStaff <
     \context Staff = up
@@ -20,3 +20,5 @@
     \paper { linewidth = -1. }
 }
 
+%% new-chords-done %%
+
diff -purN ../lilypond-1.7.7/input/tutorial/brahms-tweaked.ly ./input/tutorial/brahms-tweaked.ly
--- ../lilypond-1.7.7/input/tutorial/brahms-tweaked.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/brahms-tweaked.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score {
     \notes\context PianoStaff <
     \context Staff = up
@@ -32,3 +32,5 @@
     \paper { linewidth = -1. }
 }
 
+
+%% new-chords-done %%
diff -purN ../lilypond-1.7.7/input/tutorial/flowing.ly ./input/tutorial/flowing.ly
--- ../lilypond-1.7.7/input/tutorial/flowing.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/flowing.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \header {
         title = "The river is flowing"
diff -purN ../lilypond-1.7.7/input/tutorial/galuppi.ly ./input/tutorial/galuppi.ly
--- ../lilypond-1.7.7/input/tutorial/galuppi.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/galuppi.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 soprano = \notes \relative c''  {
diff -purN ../lilypond-1.7.7/input/tutorial/miniatures.ly ./input/tutorial/miniatures.ly
--- ../lilypond-1.7.7/input/tutorial/miniatures.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/tutorial/miniatures.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 \header {
   title = "Two miniatures"
   tagline = "Small is beatiful"
diff -purN ../lilypond-1.7.7/input/tutorial/minuet.ly ./input/tutorial/minuet.ly
--- ../lilypond-1.7.7/input/tutorial/minuet.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/minuet.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 % lines preceded by a percent sign are comments.
 \include "paper16.ly"
diff -purN ../lilypond-1.7.7/input/tutorial/os-flute-2.ly ./input/tutorial/os-flute-2.ly
--- ../lilypond-1.7.7/input/tutorial/os-flute-2.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/tutorial/os-flute-2.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.3"
+\version "1.7.6"
 
 \include "os-music.ly"
 \include "paper16.ly"
diff -purN ../lilypond-1.7.7/input/tutorial/os-music.ly ./input/tutorial/os-music.ly
--- ../lilypond-1.7.7/input/tutorial/os-music.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/os-music.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 % include file for tutorial
 
 \header {
diff -purN ../lilypond-1.7.7/input/tutorial/os-score.ly ./input/tutorial/os-score.ly
--- ../lilypond-1.7.7/input/tutorial/os-score.ly	2002-10-21 00:44:15.000000000 +0200
+++ ./input/tutorial/os-score.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,5 +1,5 @@
 
-\version "1.7.3"
+\version "1.7.6"
 
 \include "os-music.ly"
 \include "paper13.ly"
diff -purN ../lilypond-1.7.7/input/tutorial/sammartini.ly ./input/tutorial/sammartini.ly
--- ../lilypond-1.7.7/input/tutorial/sammartini.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/sammartini.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 
 \include "paper16.ly"
  
@@ -64,3 +64,4 @@ bassvoices = \notes \relative c' {
 }
 %% new-chords-done %%
 
+
diff -purN ../lilypond-1.7.7/input/tutorial/singing-saw.ly ./input/tutorial/singing-saw.ly
--- ../lilypond-1.7.7/input/tutorial/singing-saw.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/tutorial/singing-saw.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 
 accompMotif = \notes \relative c {
diff -purN ../lilypond-1.7.7/input/tutorial/solar.ly ./input/tutorial/solar.ly
--- ../lilypond-1.7.7/input/tutorial/solar.ly	2002-11-06 13:34:02.000000000 +0100
+++ ./input/tutorial/solar.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 
 \score {
   \notes {
diff -purN ../lilypond-1.7.7/input/tutorial/test.ly ./input/tutorial/test.ly
--- ../lilypond-1.7.7/input/tutorial/test.ly	2002-08-12 01:30:07.000000000 +0200
+++ ./input/tutorial/test.ly	2002-11-19 11:51:38.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \score {
   \notes { c'4 e'4 g'4 }
 } 
diff -purN ../lilypond-1.7.7/input/twinkle.ly ./input/twinkle.ly
--- ../lilypond-1.7.7/input/twinkle.ly	2002-07-17 01:57:04.000000000 +0200
+++ ./input/twinkle.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.5.68"
+\version "1.7.6"
 \header{
 filename = 	"twinkle.ly"
 title = 		"Twinkle Twinkle Little Star"
diff -purN ../lilypond-1.7.7/input/twinkle-pop.ly ./input/twinkle-pop.ly
--- ../lilypond-1.7.7/input/twinkle-pop.ly	2002-11-06 13:33:38.000000000 +0100
+++ ./input/twinkle-pop.ly	2002-11-19 11:51:36.000000000 +0100
@@ -1,4 +1,4 @@
-\version "1.7.5"
+\version "1.7.6"
 \header{
 filename = 	 "twinkle-pop.ly"
 xtitle = 	 "Ah, vous dirais-je, maman "
diff -purN ../lilypond-1.7.7/lily/apply-context-iterator.cc ./lily/apply-context-iterator.cc
--- ../lilypond-1.7.7/lily/apply-context-iterator.cc	1970-01-01 01:00:00.000000000 +0100
+++ ./lily/apply-context-iterator.cc	2002-11-19 00:36:41.000000000 +0100
@@ -0,0 +1,29 @@
+#include "simple-music-iterator.hh"
+#include "translator-group.hh"
+#include "music.hh"
+
+/**
+  Iterate a property.  
+ */
+class Apply_context_iterator : public Simple_music_iterator
+{
+public:
+  VIRTUAL_COPY_CONS (Music_iterator);
+  DECLARE_SCHEME_CALLBACK(constructor, ());
+protected:
+  virtual void process (Moment);
+};
+
+
+void
+Apply_context_iterator::process (Moment m)
+{
+  SCM proc = get_music ()->get_mus_property ("procedure");
+
+  scm_call_1 (proc, report_to()->self_scm());
+  
+  Simple_music_iterator::process(m);
+}
+
+IMPLEMENT_CTOR_CALLBACK (Apply_context_iterator);
+  
diff -purN ../lilypond-1.7.7/lily/beam.cc ./lily/beam.cc
--- ../lilypond-1.7.7/lily/beam.cc	2002-10-06 15:31:17.000000000 +0200
+++ ./lily/beam.cc	2002-11-19 11:51:39.000000000 +0100
@@ -1484,23 +1484,22 @@ Beam::get_direction_beam_count (Grob *me
 
 
 ADD_INTERFACE (Beam, "beam-interface",
-  "A beam.
-
-#'thickness= weight of beams, in staffspace
-
-
-We take the least squares line through the ideal-length stems, and
-then damp that using
-
-	damped = tanh (slope)
-
-this gives an unquantized left and right position for the beam end.
-Then we take all combinations of quantings near these left and right
-positions, and give them a score (according to how close they are to
-the ideal slope, how close the result is to the ideal stems, etc.). We
-take the best scoring combination.
-
-",
+  "A beam. \n\n"
+" "
+"#'thickness= weight of beams, in staffspace "
+" "
+" "
+"We take the least squares line through the ideal-length stems, and "
+"then damp that using "
+" \n"
+"	damped = tanh (slope) \n"
+" \n"
+"this gives an unquantized left and right position for the beam end. "
+"Then we take all combinations of quantings near these left and right "
+"positions, and give them a score (according to how close they are to "
+"the ideal slope, how close the result is to the ideal stems, etc.). We "
+"take the best scoring combination. "
+,
   "knee french-beaming position-callbacks concaveness-gap concaveness-threshold dir-function quant-score auto-knee-gap gap chord-tremolo beamed-stem-shorten shorten least-squares-dy damping flag-width-function neutral-direction positions space-function thickness");
 
 
diff -purN ../lilypond-1.7.7/lily/chord-name-engraver.cc ./lily/chord-name-engraver.cc
--- ../lilypond-1.7.7/lily/chord-name-engraver.cc	2002-09-30 11:23:42.000000000 +0200
+++ ./lily/chord-name-engraver.cc	2002-11-19 11:51:39.000000000 +0100
@@ -107,8 +107,8 @@ Chord_name_engraver::stop_translation_ti
 }
 
 ENTER_DESCRIPTION(Chord_name_engraver,
-/* descr */       "Catch note-events, Tonic_reqs, Inversion_reqs, Bass_req
-and generate the appropriate chordname.",
+/* descr */       "Catch note-events, Tonic_reqs, Inversion_reqs, Bass_req "
+"and generate the appropriate chordname.",
 /* creats*/       "ChordName",
 /* accepts */     "note-event busy-playing-event",
 /* acks  */      "",
diff -purN ../lilypond-1.7.7/lily/clef-engraver.cc ./lily/clef-engraver.cc
--- ../lilypond-1.7.7/lily/clef-engraver.cc	2002-09-28 17:55:36.000000000 +0200
+++ ./lily/clef-engraver.cc	2002-11-19 11:51:39.000000000 +0100
@@ -11,16 +11,13 @@
 #include <ctype.h>
 
 #include "translator-group.hh"
-
 #include "bar-line.hh"
 #include "staff-symbol-referencer.hh"
-
 #include "engraver.hh"
 #include "direction.hh"
 #include "side-position-interface.hh"
 #include "item.hh"
 
-
 class Clef_engraver : public  Engraver
 {
 public:
@@ -82,7 +79,6 @@ Clef_engraver::acknowledge_grob (Grob_in
       if (Bar_line::has_interface (info.grob_)
 	  && gh_string_p (get_property ("clefGlyph")))
 	create_clef ();
-
     } 
 }
 
diff -purN ../lilypond-1.7.7/lily/cluster.cc ./lily/cluster.cc
--- ../lilypond-1.7.7/lily/cluster.cc	2002-11-14 11:28:38.000000000 +0100
+++ ./lily/cluster.cc	2002-11-19 12:48:06.000000000 +0100
@@ -132,10 +132,11 @@ Cluster::brew_molecule (SCM smob)
   Grob *me = unsmob_grob (smob);
 
   Spanner *spanner = dynamic_cast<Spanner*> (me);
-  if (!spanner) {
-    me->programming_error ("Cluster::brew_molecule(): not a spanner");
-    return SCM_EOL;
-  }
+  if (!spanner)
+    {
+      me->programming_error ("Cluster::brew_molecule(): not a spanner");
+      return SCM_EOL;
+    }
 
   Item *left_bound = spanner->get_bound (LEFT);
   Item *right_bound = spanner->get_bound (RIGHT);
@@ -149,7 +150,15 @@ Cluster::brew_molecule (SCM smob)
   bottom_points.clear ();
   top_points.clear ();
   SCM column_scm = SCM_EOL;
-  for (SCM columns_scm = me->get_grob_property ("segments");
+
+  SCM columns_scm = me->get_grob_property ("segments");
+  if (columns_scm == SCM_EOL)
+    {
+      me->warning ("junking empty cluster");
+      return SCM_EOL;
+    }
+
+  for (;
        columns_scm != SCM_EOL;
        columns_scm = ly_cdr (columns_scm)) {
     column_scm = ly_car (columns_scm);
@@ -162,31 +171,26 @@ Cluster::brew_molecule (SCM smob)
 	break; // ok, we have seen all columns
     column = unsmob_grob (col_scm);
     column_scm = ly_cdr (column_scm);
-    Real y = 0.5 * gh_scm2double (ly_car (column_scm));
-    column_scm = ly_cdr (column_scm);
-    Pitch *pitch_min = unsmob_pitch (ly_car (column_scm));
+    Real y_bottom = gh_scm2double (ly_car (column_scm));
     column_scm = ly_cdr (column_scm);
-    Pitch *pitch_max = unsmob_pitch (ly_car (column_scm));
-    Real height = 0.5 * (pitch_max->steps () - pitch_min->steps ());
+    Real y_top = gh_scm2double (ly_car (column_scm));
     Real x = column->relative_coordinate (common, X_AXIS);
     if (right_broken)
       x -= left_bound->relative_coordinate (common, X_AXIS);
-    bottom_points.push (Offset (x, y));
-    top_points.push (Offset (x, y + height));
+    bottom_points.push (Offset (x, y_bottom));
+    top_points.push (Offset (x, y_top));
   }
   if (right_broken)
     {
-      Real y = 0.5 * gh_scm2double (ly_car (column_scm));
+      Real y_bottom = gh_scm2double (ly_car (column_scm));
       column_scm = ly_cdr (column_scm);
-      Pitch *pitch_min = unsmob_pitch (ly_car (column_scm));
+      Real y_top = gh_scm2double (ly_car (column_scm));
       column_scm = ly_cdr (column_scm);
-      Pitch *pitch_max = unsmob_pitch (ly_car (column_scm));
-      Real height = 0.5 * (pitch_max->steps () - pitch_min->steps ());
       Real x =
 	right_bound->relative_coordinate (common, X_AXIS) -
 	left_bound->relative_coordinate (common, X_AXIS);
-      bottom_points.push (Offset (x, y));
-      top_points.push (Offset (x, y + height));
+      bottom_points.push (Offset (x, y_bottom));
+      top_points.push (Offset (x, y_top));
     }
   Molecule out = brew_cluster_piece (me, bottom_points, top_points);
   return out.smobbed_copy ();
diff -purN ../lilypond-1.7.7/lily/cluster-engraver.cc ./lily/cluster-engraver.cc
--- ../lilypond-1.7.7/lily/cluster-engraver.cc	2002-11-13 01:53:03.000000000 +0100
+++ ./lily/cluster-engraver.cc	2002-11-19 12:48:06.000000000 +0100
@@ -8,6 +8,7 @@
 #include "item.hh"
 #include "spanner.hh"
 #include "note-head.hh"
+#include "protected-scm.hh"
 #include "warn.hh"
 
 class Cluster_engraver : public Engraver
@@ -23,9 +24,9 @@ TRANSLATOR_DECLARATIONS(Cluster_engraver
 
 private:
   Drul_array<Music*> reqs_drul_;
-  Pitch pitch_min, pitch_max;
-  Spanner *cluster;
-  SCM columns_scm;
+  Pitch pitch_min_, pitch_max_;
+  Spanner *cluster_;
+  SCM columns_scm_;
 };
 
 void reset_min_max (Pitch *pitch_min, Pitch *pitch_max)
@@ -40,8 +41,8 @@ void reset_min_max (Pitch *pitch_min, Pi
 
 Cluster_engraver::Cluster_engraver ()
 {
-  cluster = 0;
-  columns_scm = SCM_EOL;
+  cluster_ = 0;
+  columns_scm_ = SCM_EOL;
   reqs_drul_[LEFT] = reqs_drul_[RIGHT] = 0;
 }
 
@@ -52,11 +53,11 @@ Cluster_engraver::try_music (Music *m)
     {
       reqs_drul_[START] = 0;
       reqs_drul_[STOP] = 0;
-      if (cluster)
+      if (cluster_)
 	{
-	  cluster->suicide ();
-	  cluster = 0;
-	  columns_scm = SCM_EOL;
+	  cluster_->suicide ();
+	  cluster_ = 0;
+	  columns_scm_ = SCM_EOL;
 	}
     }
   else if (m->is_mus_type ("cluster-event"))
@@ -73,35 +74,30 @@ Cluster_engraver::process_music ()
 {
   if (reqs_drul_[STOP])
     {
-      if (!cluster)
+      if (!cluster_)
 	{
 	  reqs_drul_[STOP]->origin ()->warning ("can't find start of cluster");
 	}
       else
 	{
 	  Grob *bound = unsmob_grob (get_property ("currentMusicalColumn"));
-	  cluster->set_bound (RIGHT, bound);
-	  cluster->set_grob_property ("segments", columns_scm);
-	  typeset_grob (cluster);
-	  cluster = 0;
-	  columns_scm = SCM_EOL;
+	  cluster_->set_bound (RIGHT, bound);
 	}
-      reqs_drul_[STOP] = 0;
     }
   if (reqs_drul_[START])
     {
-      if (cluster)
+      if (cluster_)
 	{
 	  reqs_drul_[START]->origin ()->warning ("may not nest clusters");
 	}
       else
 	{
 	  SCM basicProperties = get_property ("Cluster");
-	  cluster = new Spanner (basicProperties);
-	  columns_scm = SCM_EOL;
+	  cluster_ = new Spanner (basicProperties);
+	  columns_scm_ = SCM_EOL;
 	  Grob *bound = unsmob_grob (get_property ("currentMusicalColumn"));
-	  cluster->set_bound (LEFT, bound);
-	  announce_grob (cluster, bound->self_scm ());
+	  cluster_->set_bound (LEFT, bound);
+	  announce_grob (cluster_, bound->self_scm ());
 	}
       reqs_drul_[START] = 0;
     }
@@ -110,40 +106,55 @@ Cluster_engraver::process_music ()
 void
 Cluster_engraver::start_translation_timestep ()
 {
-  reset_min_max (&pitch_min, &pitch_max);
+  reset_min_max (&pitch_min_, &pitch_max_);
 }
 
 void
 Cluster_engraver::stop_translation_timestep ()
 {
-  if (cluster)
+  if (cluster_)
     {
       SCM column_scm = get_property ("currentMusicalColumn");
       if (column_scm == SCM_EOL)
 	{
 	  programming_error("failed retrieving current column");
-	  return;
 	}
-
-      if (Pitch::compare (pitch_min, pitch_max) <= 0)
+      else
 	{
-	  int staff_position = pitch_min.steps ();
-	  SCM c0 = get_property ("centralCPosition");
-	  if (gh_number_p (c0))
-	    staff_position += gh_scm2int (c0);
-	  SCM segment = scm_list_n (column_scm,
-				    gh_int2scm (staff_position),
-				    pitch_min.smobbed_copy (),
-				    pitch_max.smobbed_copy (),
-				    SCM_UNDEFINED);
-	  segment = scm_list_n (segment, SCM_UNDEFINED);
-	  columns_scm = (columns_scm != SCM_EOL) ?
-	    gh_append2 (columns_scm, segment) : segment;
+	  if (Pitch::compare (pitch_min_, pitch_max_) <= 0)
+	    {
+	      Real y_bottom = 0.5 * pitch_min_.steps ();
+	      SCM c0 = get_property ("centralCPosition");
+	      if (gh_number_p (c0))
+		y_bottom += 0.5 * gh_scm2int (c0);
+	      else
+		programming_error ("Cluster_engraver: failed evaluating c0");
+	      Real y_top = y_bottom +
+		0.5 * (pitch_max_.steps () - pitch_min_.steps ());
+	      column_scm = Protected_scm (column_scm);
+	      SCM segment = scm_list_n (column_scm,
+					gh_double2scm (y_bottom),
+					gh_double2scm (y_top),
+					SCM_UNDEFINED);
+	      segment = scm_list_n (segment, SCM_UNDEFINED);
+	      columns_scm_ = (columns_scm_ != SCM_EOL) ?
+		gh_append2 (columns_scm_, segment) : segment;
+	      cluster_->set_grob_property ("segments", columns_scm_); // Urrgh!
+	    }
+	  else
+	    {
+	      /* This timestep is caused by a different voice of the
+		 same staff and hence should be ignored. */
+	    }
 	}
-      else
+
+      if (reqs_drul_[STOP])
 	{
-	  /* This timestep is caused by a different voice of the same
-	     staff and hence should be ignored. */
+	  reqs_drul_[STOP] = 0;
+	  cluster_->set_grob_property ("segments", columns_scm_);
+	  typeset_grob (cluster_);
+	  cluster_ = 0;
+	  columns_scm_ = SCM_EOL;
 	}
     }
 }
@@ -160,19 +171,19 @@ Cluster_engraver::acknowledge_grob (Grob
 	  if (nr && nr->is_mus_type ("note-event"))
 	    {
 	      Pitch pitch = *unsmob_pitch (nr->get_mus_property ("pitch"));
-	      if (Pitch::compare (pitch_min, pitch_max) > 0) // already init'd?
+	      if (Pitch::compare (pitch_min_, pitch_max_) > 0) // already init'd?
 		{
 		  // not yet init'd; use current pitch to init min/max
-		  pitch_min = pitch;
-		  pitch_max = pitch;
+		  pitch_min_ = pitch;
+		  pitch_max_ = pitch;
 		}
-	      else if (Pitch::compare (pitch, pitch_max) > 0) // new max?
+	      else if (Pitch::compare (pitch, pitch_max_) > 0) // new max?
 		{
-		  pitch_max = pitch;
+		  pitch_max_ = pitch;
 		}
-	      else if (Pitch::compare (pitch, pitch_min) < 0) // new min?
+	      else if (Pitch::compare (pitch, pitch_min_) < 0) // new min?
 		{
-		  pitch_min = pitch;
+		  pitch_min_ = pitch;
 		}
 	    }
 	}
diff -purN ../lilypond-1.7.7/lily/custos.cc ./lily/custos.cc
--- ../lilypond-1.7.7/lily/custos.cc	2002-10-06 15:31:17.000000000 +0200
+++ ./lily/custos.cc	2002-11-19 11:51:39.000000000 +0100
@@ -109,17 +109,5 @@ Custos::brew_molecule (SCM smob)
 }
 
 ADD_INTERFACE (Custos, "custos-interface",
-  "A custos is a staff context symbol that appears at the end of a
-  staff line with monophonic musical contents (i.e. with a single
-  voice).  It anticipates the pitch of the first note of the following
-  line and thus helps the player or singer to manage line breaks
-  during performance, thus enhancing readability of a score.
-
-  Custodes were frequently used in music notation until the 16th
-  century.  There were different appearences for different notation
-  styles.  Nowadays, they have survived only in special forms of
-  musical notation such as via the editio vaticana dating back to the
-  beginning of the 20th century.
-
-[TODO: add to glossary]",
+  "Engrave custodes",
   "style adjust-if-on-staffline neutral-direction neutral-position");
diff -purN ../lilypond-1.7.7/lily/dots.cc ./lily/dots.cc
--- ../lilypond-1.7.7/lily/dots.cc	2002-04-02 14:24:29.000000000 +0200
+++ ./lily/dots.cc	2002-11-19 11:51:39.000000000 +0100
@@ -76,9 +76,9 @@ Dots::brew_molecule (SCM d)
 
 
 ADD_INTERFACE (Dots, "dots-interface",
-  "The dots to go with a notehead/rest.  A separate interface, since they
-are a party in collision resolution.
-#'direction is the Direction to handle staff-line collisions in.",
+  "The dots to go with a notehead/rest.  A separate interface, since they "
+" are a party in collision resolution. "
+" #'direction is the Direction to handle staff-line collisions in.",
   "direction dot-count");
 
 
diff -purN ../lilypond-1.7.7/lily/duration.cc ./lily/duration.cc
--- ../lilypond-1.7.7/lily/duration.cc	2002-10-21 00:44:15.000000000 +0200
+++ ./lily/duration.cc	2002-11-19 11:51:39.000000000 +0100
@@ -137,19 +137,19 @@ Duration::less_p (SCM p1, SCM p2)
 LY_DEFINE(make_duration,
 	  "ly:make-duration", 2, 2, 0, (SCM length, SCM dotcount,
 				     SCM num, SCM den),
-	  "
-@var{length} is the negative logarithm (base 2) of the duration:
-1 is a half note, 2 is a quarter note, 3 is an eighth
-note, etc.  The number of dots after the note is given by
-@var{dotcount}.
-
-The duration factor is optionally given by @var{num} and @var{den}.
-
-A duration is a musical duration, i.e. a length of time described by a
-power of two (whole, half, quarter, etc.) and a number of augmentation
-dots. 
-
-")
+"	  \n"
+"@var{length} is the negative logarithm (base 2) of the duration:\n"
+"1 is a half note, 2 is a quarter note, 3 is an eighth\n"
+"note, etc.  The number of dots after the note is given by\n"
+"@var{dotcount}.\n"
+"\n"
+"The duration factor is optionally given by @var{num} and @var{den}.\n"
+"\n"
+"A duration is a musical duration, i.e. a length of time described by a\n"
+"power of two (whole, half, quarter, etc.) and a number of augmentation\n"
+"dots. \n"
+"\n"
+"")
 {
   SCM_ASSERT_TYPE(gh_number_p (length), length, SCM_ARG1, __FUNCTION__, "integer");
   SCM_ASSERT_TYPE(gh_number_p (dotcount), dotcount, SCM_ARG2, __FUNCTION__, "integer");
diff -purN ../lilypond-1.7.7/lily/font-interface.cc ./lily/font-interface.cc
--- ../lilypond-1.7.7/lily/font-interface.cc	2002-10-21 00:44:15.000000000 +0200
+++ ./lily/font-interface.cc	2002-11-19 11:51:39.000000000 +0100
@@ -44,6 +44,21 @@ Font_interface::font_alist_chain (Grob *
   return ch;
 }
 
+
+MAKE_SCHEME_CALLBACK(Font_interface, get_property_alist_chain, 1);
+SCM
+Font_interface::get_property_alist_chain (SCM grob)
+{
+
+  Grob * g = unsmob_grob (grob);
+  SCM_ASSERT_TYPE(g, grob, SCM_ARG1, __FUNCTION__, "grob");
+  return  font_alist_chain (g);
+  
+}
+  
+  
+
+
 /*
   todo: split up this func, reuse in text_item? 
  */
diff -purN ../lilypond-1.7.7/lily/font-metric.cc ./lily/font-metric.cc
--- ../lilypond-1.7.7/lily/font-metric.cc	2002-10-21 00:44:15.000000000 +0200
+++ ./lily/font-metric.cc	2002-11-19 11:51:39.000000000 +0100
@@ -146,8 +146,8 @@ Font_metric::find_by_name (String) const
 
 LY_DEFINE(ly_find_glyph_by_name, "ly:find-glyph-by-name", 2 , 0, 0,
 	  (SCM font, SCM name),
-	  "This function retrieves a Molecule for the glyph named @var{name} in
-@var{font}.  The font must be available as an AFM file.")
+	  "This function retrieves a Molecule for the glyph named @var{name} in "
+"@var{font}.  The font must be available as an AFM file.")
 {
   Font_metric *fm = unsmob_metrics (font);
   SCM_ASSERT_TYPE(fm, font, SCM_ARG1, __FUNCTION__, "font-metric");
@@ -159,9 +159,9 @@ LY_DEFINE(ly_find_glyph_by_name, "ly:fin
 
 LY_DEFINE(ly_text_dimension,"ly:text-dimension", 2 , 0, 0,
 	  (SCM font, SCM text),
-	  "Given the font metric in @var{font} and the string @var{text}, compute
-the extents of that text in that font. The return value is a pair of
-number-pairs.")
+	  "Given the font metric in @var{font} and the string @var{text}, compute "
+"the extents of that text in that font. The return value is a pair of "
+"number-pairs.")
 {
   Box b;
   Font_metric *fm = unsmob_metrics (font);
@@ -180,7 +180,6 @@ number-pairs.")
 Molecule
 Font_metric::get_char_molecule (int code)  const
 {
-  Molecule  m ;
   SCM at = scm_list_n (ly_symbol2scm ("char"), gh_int2scm (code),
 		       SCM_UNDEFINED);
   at = fontify_atom (this, at);
diff -purN ../lilypond-1.7.7/lily/function-documentation.cc ./lily/function-documentation.cc
--- ../lilypond-1.7.7/lily/function-documentation.cc	2002-10-21 00:44:15.000000000 +0200
+++ ./lily/function-documentation.cc	2002-11-19 11:51:39.000000000 +0100
@@ -1,16 +1,22 @@
 #include "lily-guile.hh"
 #include "protected-scm.hh"
+#include "string.hh"
 
 static Protected_scm doc_hash_table ;
 
-void ly_add_function_documentation (char const * fname,
+void ly_add_function_documentation (SCM func,
+				    char const * fname,
 				    char const * varlist,
 				    char const * doc)
 {
   if (!gh_vector_p (doc_hash_table ))
     doc_hash_table = scm_make_vector (gh_int2scm (59), SCM_EOL);
 
+  String s = String (" - ") + "LilyPond procedure: " + fname + " " + varlist
+    + "\n" + doc ;
 
+  scm_set_procedure_property_x (func, ly_symbol2scm ("documentation"),
+				scm_makfrom0str (s.to_str0 ()));
   SCM entry = gh_cons (scm_makfrom0str (varlist), scm_makfrom0str (doc));
   scm_hashq_set_x (doc_hash_table, ly_symbol2scm (fname), entry);
 }
diff -purN ../lilypond-1.7.7/lily/grob.cc ./lily/grob.cc
--- ../lilypond-1.7.7/lily/grob.cc	2002-11-14 11:28:38.000000000 +0100
+++ ./lily/grob.cc	2002-11-19 12:48:06.000000000 +0100
@@ -700,7 +700,7 @@ void
 Grob::warning (String s)const
 {
   SCM cause = self_scm();
-  while (cause != SCM_EOL && !unsmob_music (cause))
+  while (cause != SCM_EOL && unsmob_music (cause))
     {
       Grob * g = unsmob_grob (cause);
       cause = g->get_grob_property ("cause");
diff -purN ../lilypond-1.7.7/lily/include/font-interface.hh ./lily/include/font-interface.hh
--- ../lilypond-1.7.7/lily/include/font-interface.hh	2002-04-10 19:25:36.000000000 +0200
+++ ./lily/include/font-interface.hh	2002-11-19 11:51:40.000000000 +0100
@@ -21,6 +21,7 @@ struct Font_interface
   static SCM add_style (Grob*, SCM style, SCM alist_chain);
   static bool wild_compare (SCM field_val, SCM val);
   DECLARE_SCHEME_CALLBACK (properties_to_font_name, (SCM,SCM));
+  DECLARE_SCHEME_CALLBACK (get_property_alist_chain, (SCM));
   static bool has_interface (Grob*);
 };
 
diff -purN ../lilypond-1.7.7/lily/include/lily-guile.hh ./lily/include/lily-guile.hh
--- ../lilypond-1.7.7/lily/include/lily-guile.hh	2002-09-21 15:58:44.000000000 +0200
+++ ./lily/include/lily-guile.hh	2002-11-19 11:51:40.000000000 +0100
@@ -265,7 +265,7 @@ TYPE ## _ ## FUNC ## _init_functions ()	
 ADD_SCM_INIT_FUNC (TYPE ## _ ## FUNC ## _callback, TYPE ## _ ## FUNC ## _init_functions);	\
 
 
-void ly_add_function_documentation (char const * fname,
+void ly_add_function_documentation (SCM proc, char const * fname,
 				    char const * varlist,
 				    char const * doc);
 
@@ -286,7 +286,7 @@ INITPREFIX ## init ()\
 {\
  FNAME ## _proc \
     = scm_c_define_gsubr (PRIMNAME,REQ, OPT, VAR, (Scheme_function_unknown) FNAME);\
-  ly_add_function_documentation (PRIMNAME, #ARGLIST,  DOCSTRING);\
+  ly_add_function_documentation ( FNAME ## _proc ,PRIMNAME, #ARGLIST,  DOCSTRING);\
   scm_c_export (PRIMNAME,NULL);\
 }\
 ADD_SCM_INIT_FUNC (INITPREFIX ## init_unique_prefix, INITPREFIX ## init);\
diff -purN ../lilypond-1.7.7/lily/include/ly-smobs.icc ./lily/include/ly-smobs.icc
--- ../lilypond-1.7.7/lily/include/ly-smobs.icc	2002-09-30 11:23:43.000000000 +0200
+++ ./lily/include/ly-smobs.icc	2002-11-19 11:51:40.000000000 +0100
@@ -15,8 +15,8 @@
 #define IMPLEMENT_TYPE_P(CL, FUNCNAME)\
 void init_type_ ## CL ()\
 {\
-  scm_c_define_gsubr (FUNCNAME, 1, 0, 0, (Scheme_function_unknown) CL::smob_p);\
-  ly_add_function_documentation (FUNCNAME, "(SCM x)", "Check if @var{x} is a " #CL " object");\
+  SCM subr = scm_c_define_gsubr (FUNCNAME, 1, 0, 0, (Scheme_function_unknown) CL::smob_p);\
+  ly_add_function_documentation (subr, FUNCNAME, "(SCM x)", "Check if @var{x} is a " #CL " object");\
   scm_c_export (FUNCNAME, NULL);\
 }\
 ADD_SCM_INIT_FUNC (init_type_ ## CL, init_type_ ## CL)
diff -purN ../lilypond-1.7.7/lily/include/my-lily-lexer.hh ./lily/include/my-lily-lexer.hh
--- ../lilypond-1.7.7/lily/include/my-lily-lexer.hh	2002-10-11 11:16:37.000000000 +0200
+++ ./lily/include/my-lily-lexer.hh	2002-11-19 11:51:40.000000000 +0100
@@ -72,6 +72,7 @@ public:
 private:
   int lookup_keyword (String);
   int scan_bare_word (String);
+  SCM scan_markup_word (String);
   int scan_escaped_word (String);
   int identifier_type (SCM);
   char escaped_char (char) const;
diff -purN ../lilypond-1.7.7/lily/include/text-item.hh ./lily/include/text-item.hh
--- ../lilypond-1.7.7/lily/include/text-item.hh	2002-04-10 19:25:36.000000000 +0200
+++ ./lily/include/text-item.hh	2002-11-19 11:51:40.000000000 +0100
@@ -19,13 +19,12 @@ class Text_item
 {
 public:
   DECLARE_SCHEME_CALLBACK (brew_molecule, (SCM));
+  DECLARE_SCHEME_CALLBACK (text_to_molecule, (SCM,SCM, SCM));
   static Molecule text2molecule (Grob *me, SCM text, SCM properties);
   static Molecule string2molecule (Grob *me, SCM text, SCM properties);
   static Molecule markup_text2molecule (Grob *me, SCM markup_text, SCM properties);
-
   static bool has_interface (Grob*);
-
-
+  
 private:
   static Molecule lookup_character (Grob *me, Font_metric*, SCM char_name);
   static Molecule lookup_text (Grob *me, Font_metric*, SCM text);
diff -purN ../lilypond-1.7.7/lily/lexer.ll ./lily/lexer.ll
--- ../lilypond-1.7.7/lily/lexer.ll	2002-10-21 00:44:15.000000000 +0200
+++ ./lily/lexer.ll	2002-11-19 11:51:39.000000000 +0100
@@ -296,6 +296,7 @@ HYPHEN		--
 		return FIGURE_OPEN;
 	}
 }
+
 <notes,figures>{
 	{ALPHAWORD}	{
 		return scan_bare_word (YYText ());
@@ -427,6 +428,9 @@ HYPHEN		--
 	}
 }
 
+
+
+
 <<EOF>> {
 
 
diff -purN ../lilypond-1.7.7/lily/ligature-bracket-engraver.cc ./lily/ligature-bracket-engraver.cc
--- ../lilypond-1.7.7/lily/ligature-bracket-engraver.cc	2002-11-13 01:40:19.000000000 +0100
+++ ./lily/ligature-bracket-engraver.cc	2002-11-19 12:48:06.000000000 +0100
@@ -7,6 +7,8 @@
   
  */
 #include "ligature-engraver.hh"
+#include "note-column.hh"
+#include "tuplet-bracket.hh"
 #include "spanner.hh"
 #include "warn.hh"
 
@@ -14,6 +16,7 @@ class Ligature_bracket_engraver : public
 {
 protected:
   virtual Spanner *create_ligature_spanner ();
+  virtual void acknowledge_grob (Grob_info);
 
 public:
   TRANSLATOR_DECLARATIONS(Ligature_bracket_engraver);
@@ -33,10 +36,23 @@ Ligature_bracket_engraver::create_ligatu
   return new Spanner (get_property ("LigatureBracket"));
 }
 
+void
+Ligature_bracket_engraver::acknowledge_grob (Grob_info info)
+{
+  if (ligature_)
+    {
+      if (Note_column::has_interface (info.grob_))
+	{
+	  Tuplet_bracket::add_column (ligature_, dynamic_cast<Item*> (info.grob_));
+	}
+      else Ligature_engraver::acknowledge_grob (info);
+    }
+}
+
 ENTER_DESCRIPTION(Ligature_bracket_engraver,
 /* descr */       "Handles Ligature_events by engraving Ligature brackets.",
-/* creats*/       "LigatureBracket",
+/* creats*/       "TupletBracket",
 /* accepts */     "ligature-event abort-event",
-/* acks  */      "ligature-head-interface rest-interface",
+/* acks  */      "ligature-head-interface rest-interface note-column-interface",
 /* reads */       "",
 /* write */       "");
diff -purN ../lilypond-1.7.7/lily/my-lily-lexer.cc ./lily/my-lily-lexer.cc
--- ../lilypond-1.7.7/lily/my-lily-lexer.cc	2002-10-28 01:26:27.000000000 +0100
+++ ./lily/my-lily-lexer.cc	2002-11-19 11:51:39.000000000 +0100
@@ -28,6 +28,7 @@
 static Keyword_ent the_key_tab[]={
   {"alias", ALIAS},
   {"apply", APPLY},
+  {"applycontext", APPLYCONTEXT},
   {"autochange", AUTOCHANGE},
   {"simultaneous", SIMULTANEOUS},
   {"sequential", SEQUENTIAL},
@@ -224,3 +225,21 @@ My_lily_lexer::prepare_for_next_token ()
 {
   last_input_ = here_input();
 }
+
+#if 0
+SCM
+My_lily_lexer::scan_markup_word (String s)
+{
+  /*
+    TODO: better implementation:
+
+    - make a table of markup functions, for quicker lookup
+
+    - error handling.
+    
+   */
+  SCM s = scm_c_eval_str ((s + "-markup").to_str0());
+  yylval.scm = s;
+  return MARKUP_HEAD;
+}
+#endif
diff -purN ../lilypond-1.7.7/lily/parser.yy ./lily/parser.yy
--- ../lilypond-1.7.7/lily/parser.yy	2002-11-13 01:40:20.000000000 +0100
+++ ./lily/parser.yy	2002-11-19 11:51:39.000000000 +0100
@@ -179,6 +179,7 @@ yylex (YYSTYPE *s,  void * v)
 /* tokens which are not keywords */
 %token AUTOCHANGE
 %token ALIAS
+%token APPLYCONTEXT 
 %token APPLY
 %token ACCEPTS
 %token ALTERNATIVE
@@ -788,6 +789,13 @@ Simultaneous_music:
 
 Simple_music:
 	event_chord		{ $$ = $1; }
+	| APPLYCONTEXT embedded_scm {
+		if (!gh_procedure_p ($2))
+			THIS->parser_error (_ ("\applycontext takes function argument"));
+		$$ = MY_MAKE_MUSIC ("ApplyContext");
+		$$->set_mus_property ("procedure", $2);
+		$$->set_spot (THIS->here_input());
+	}
 	| OUTPUTPROPERTY embedded_scm embedded_scm '=' embedded_scm	{
 		SCM pred = $2;
 		if (!gh_symbol_p ($3))
@@ -2215,3 +2223,33 @@ My_lily_lexer::try_special_identifiers (
 	}
 	return -1;	
 }
+#if 0
+
+markup:
+	STRING {
+		$$ = scm_list_n (scm_c_eval_string ("simple-markup"), $1, SCM_UNDEFINED);
+	}
+	| MARKUP_HEAD0 markup
+	| MARKUP_HEAD1 SCM_T markup
+	| MARKUP_HEAD2 markup
+	| MARKUP_LIST_HEAD 
+	| MARKUP_LIST_HEAD 
+	| markup_list {
+		$$ = $1 
+	;
+
+markup_list:
+	'<' markup_list_body '>' { $$ = scm_reverse_x ($1, SCM_EOL); }
+	;
+
+markup_line:
+	'{' markup_list_body '}' { $$ = .. scm_reverse_x ($1, SCM_EOL); }
+	
+	;
+markup_list_body:
+	/**/ {  $$ = SCM_EOL; }
+	markup_list_body markup {
+		$$ = gh_cons ($2, $1) ;
+	}
+	;
+#endif
diff -purN ../lilypond-1.7.7/lily/text-item.cc ./lily/text-item.cc
--- ../lilypond-1.7.7/lily/text-item.cc	2002-11-06 13:34:06.000000000 +0100
+++ ./lily/text-item.cc	2002-11-19 11:51:40.000000000 +0100
@@ -59,7 +59,18 @@ Text_item::text2molecule (Grob *me, SCM 
     }
   return Molecule ();
 }
-	     
+
+
+MAKE_SCHEME_CALLBACK(Text_item,text_to_molecule,3);
+SCM
+Text_item::text_to_molecule (SCM grob, SCM props, SCM markup)
+{
+  Grob *me = unsmob_grob (grob);
+  
+  return Text_item::text2molecule (me, markup, props).smobbed_copy();
+}
+
+
 Molecule
 Text_item::string2molecule (Grob *me, SCM text, SCM alist_chain)
 {
diff -purN ../lilypond-1.7.7/ly/property-init.ly ./ly/property-init.ly
--- ../lilypond-1.7.7/ly/property-init.ly	2002-10-21 00:44:16.000000000 +0200
+++ ./ly/property-init.ly	2002-11-19 11:51:40.000000000 +0100
@@ -240,3 +240,6 @@ turnOff = #'()
 arpeggioBracket = #(lambda (grob) (Arpeggio::brew_chord_bracket grob))
 arpeggio = #(make-music-by-name 'ArpeggioEvent)
 glissando = #(make-music-by-name 'GlissandoEvent)
+
+setMmRestFermata =
+  \once \property Voice.MultiMeasureRestNumber \override #'text = #'(music "scripts-ufermata")
diff -purN ../lilypond-1.7.7/ly/spanners-init.ly ./ly/spanners-init.ly
--- ../lilypond-1.7.7/ly/spanners-init.ly	2002-11-13 01:40:22.000000000 +0100
+++ ./ly/spanners-init.ly	2002-11-19 11:51:41.000000000 +0100
@@ -3,6 +3,7 @@
 startCluster = #(make-span-event 'ClusterEvent START)
 stopCluster = #(make-span-event 'ClusterEvent STOP)
 
+
 groupOpen = #(make-span-event 'NoteGroupingEvent START)
 groupClose = #(make-span-event 'NoteGroupingEvent STOP)
 
diff -purN ../lilypond-1.7.7/make/lilypond-targets.make ./make/lilypond-targets.make
--- ../lilypond-1.7.7/make/lilypond-targets.make	1998-08-22 00:00:59.000000000 +0200
+++ ./make/lilypond-targets.make	2002-11-19 11:51:41.000000000 +0100
@@ -1 +1,6 @@
 #empty
+
+
+## TODO: fail dist or web if no \version present. 
+check-version:
+	grep -L version $(LY_FILES) 
diff -purN ../lilypond-1.7.7/make/lilypond-vars.make ./make/lilypond-vars.make
--- ../lilypond-1.7.7/make/lilypond-vars.make	2002-11-04 11:53:22.000000000 +0100
+++ ./make/lilypond-vars.make	2002-11-19 11:51:41.000000000 +0100
@@ -16,8 +16,6 @@ export TEXMF:={$(LILYPONDPREFIX),$(shell
 export MFINPUTS:=
 export TEXINPUTS:=
 export TFMFONTS:=
-
-
 export extra_mem_top=1000000
 export extra_mem_bottom=1000000
 export pool_size=500000
diff -purN ../lilypond-1.7.7/scm/grob-description.scm ./scm/grob-description.scm
--- ../lilypond-1.7.7/scm/grob-description.scm	2002-11-14 11:28:43.000000000 +0100
+++ ./scm/grob-description.scm	2002-11-19 12:48:06.000000000 +0100
@@ -398,7 +398,7 @@
 	(Y-offset-callbacks . (,Side_position_interface::aligned_side))
 	(padding . 0.2)
 	(direction . -1)
-	(meta . ((interfaces . (horizontal-bracket-interface spanner-interface))))
+	(meta . ((interfaces . (horizontal-bracket-interface side-position-interface spanner-interface))))
 	))
     (InstrumentName
      . (
@@ -444,11 +444,18 @@
 
     (LigatureBracket
      . (
-	(width . 0.75)
-	(height . 0.5)
 	(ligature-primitive-callback . ,Note_head::brew_molecule)
-	(molecule-callback . ,Ligature_bracket::brew_molecule)
-	(meta . ((interfaces . (ligature-bracket-interface spanner-interface))))
+	(direction . 1)
+	(gap . 0.0)
+	(padding . 2.0)
+	(thickness . 1.6)
+	(edge-widen . (0.0 . 0.0))
+	(edge-height . (0.7 . 0.7))
+	(shorten-pair . (-0.2 . -0.2))
+	(before-line-breaking-callback . ,Tuplet_bracket::before_line_breaking)
+	(after-line-breaking-callback . ,Tuplet_bracket::after_line_breaking)
+	(molecule-callback . ,Tuplet_bracket::brew_molecule)
+	(meta .  ((interfaces . (tuplet-bracket-interface spanner-interface))))
 	))
 
     (LigatureHead
@@ -576,7 +583,7 @@
 	(direction . 1)
 	(padding . 2)
 	(font-family . number)
-	(meta . ((interfaces . (side-position-interface self-alignment-interface font-interface spanner-interface))))
+	(meta . ((interfaces . (side-position-interface self-alignment-interface font-interface spanner-interface text-interface))))
 	))
 
 
diff -purN ../lilypond-1.7.7/scm/lily.scm ./scm/lily.scm
--- ../lilypond-1.7.7/scm/lily.scm	2002-10-21 00:44:17.000000000 +0200
+++ ./scm/lily.scm	2002-11-19 11:51:42.000000000 +0100
@@ -238,5 +238,6 @@ is the  first to satisfy CRIT
        "script.scm"
        "drums.scm"
        "midi.scm"
+       "new-markup.scm"
        ))
 
diff -purN ../lilypond-1.7.7/scm/music-property-description.scm ./scm/music-property-description.scm
--- ../lilypond-1.7.7/scm/music-property-description.scm	2002-10-28 01:26:30.000000000 +0100
+++ ./scm/music-property-description.scm	2002-11-19 11:51:42.000000000 +0100
@@ -61,7 +61,8 @@ TODO: consider making type into symbol "
 (music-property-description 'pitch ly:pitch? "the pitch of this note")
 (music-property-description 'pitch-alist list? "list of pitches jointly forming the scale of a key signature")
 (music-property-description 'pop-first boolean? "Do a revert before we try to do a override on some grob property.")
-
+(music-property-description 'procedure procedure?
+			    "The function to run with \\applycontext. It must take a single argument, being the context.")
 (music-property-description 'predicate procedure? "the predicate of a \outputproperty")
 (music-property-description 'type symbol? "The type of this music object. Determines iteration in some cases.")
 (music-property-description 'types list? "The types of this music object. Determines iteration in some cases.")
diff -purN ../lilypond-1.7.7/scm/music-types.scm ./scm/music-types.scm
--- ../lilypond-1.7.7/scm/music-types.scm	2002-11-13 01:40:24.000000000 +0100
+++ ./scm/music-types.scm	2002-11-19 11:51:43.000000000 +0100
@@ -15,6 +15,13 @@ where x is one of \@\{\\ppp, \\pp, \\p, 
 	(internal-class-name . "Event")
 	(types . (general-music event dynamic-event absolute-dynamic-event))
 	))
+    (ApplyContext
+     . (
+	(description . "Call the argument with the current context during interpreting phase")
+	(internal-class-name . "Music")
+	(types . (general-music apply-context))
+	(iterator-ctor . ,Apply_context_iterator::constructor)
+	))
     (ArpeggioEvent 
      . (
 	(description .  "Make an arpeggio on this note. Syntax:
@@ -455,7 +462,7 @@ c8-[ c c-] c8")
     (TempoEvent
      . (
 	(description .  "")
-
+	(length . #f)
 	(internal-class-name . "Event")
 	(types . (general-music tempo-event event))
 	)) 
diff -purN ../lilypond-1.7.7/scm/new-markup.scm ./scm/new-markup.scm
--- ../lilypond-1.7.7/scm/new-markup.scm	1970-01-01 01:00:00.000000000 +0100
+++ ./scm/new-markup.scm	2002-11-18 01:09:28.000000000 +0100
@@ -0,0 +1,65 @@
+
+
+
+(define-public (simple-markup grob props . rest)
+  (Text_item::text_to_molecule grob props (car rest))
+  )
+
+(define-public (line-markup grob props . rest)
+  (stack-molecules
+   X 1 1.0 
+   (map (lambda (x) (interpret_markup grob props x)) (car rest)))
+  )
+
+(define (combine-molecule-list lst)
+  (if (null? (cdr lst)) (car lst)
+      (ly:add-molecule (car lst) (combine-molecule-list (cdr lst)))
+      ))
+
+(define-public (combine-markup grob props . rest)
+   (combine-molecule-list (map (lambda (x) (interpret_markup grob props x)) (car rest))))
+
+(define-public (bold-markup grob props . rest)
+   (interpret_markup grob (cons '((font-series .  bold)) props) (car rest))
+  )
+
+(define-public (column-markup grob props . rest)
+  (stack-molecules
+   Y -1 0.0 
+   (map (lambda (x) (interpret_markup grob props x)) (car rest)))
+  )
+
+;; todo. Use macro?  
+(map
+ (lambda (x)
+
+   (set-object-property!
+    (eval (string->symbol (string-append (symbol->string x) "-markup")) (current-module))
+    'markup-function? #t))
+
+ '(simple column bold combine line )
+ )
+
+(define-public (brew-new-markup-molecule grob)
+  (interpret_markup grob
+		    (Font_interface::get_property_alist_chain grob)
+		    (ly:get-grob-property grob 'text)
+		    )
+  )
+
+(define (interpret_markup  grob props markup)
+  (let*
+      (
+       (func (car markup))
+       (args (cdr markup))
+       )
+    
+    (apply func (cons grob (cons props args)) )
+    ))
+
+(define (new-markup? x)
+	(markup-function? (car x))
+)
+
+(define (markup-function? x)
+	(object-property 'markup-function? x))
diff -purN ../lilypond-1.7.7/scripts/convert-ly.py ./scripts/convert-ly.py
--- ../lilypond-1.7.7/scripts/convert-ly.py	2002-11-13 02:12:33.000000000 +0100
+++ ./scripts/convert-ly.py	2002-11-19 11:51:43.000000000 +0100
@@ -1076,6 +1076,9 @@ if 1:
 
 if 1:
 	def conv(str):
+		if re.search ('new-chords-done',str):
+			return str
+		
 		str = re.sub (r'<<', '< <', str)
 		str = re.sub (r'>>', '> >', str)
 		return str
diff -purN ../lilypond-1.7.7/stepmake/aclocal.m4 ./stepmake/aclocal.m4
--- ../lilypond-1.7.7/stepmake/aclocal.m4	2002-11-12 11:48:03.000000000 +0100
+++ ./stepmake/aclocal.m4	2002-11-19 11:51:43.000000000 +0100
@@ -85,15 +85,14 @@ AC_DEFUN(STEPMAKE_CHECK_SEARCH_RESULT, [
 # add entry to missing-list ($2, one of 'OPTIONAL', 'REQUIRED').
 AC_DEFUN(STEPMAKE_CHECK_VERSION, [
     r="`eval echo '$'"$1"`"
-    AC_MSG_CHECKING("$r version")
-    #exe=`STEPMAKE_GET_EXECUTABLE($r)`
+    AC_MSG_CHECKING([$r version])
     exe=`STEPMAKE_GET_EXECUTABLE($r)`
     ver=`STEPMAKE_GET_VERSION($exe)`
     num=`STEPMAKE_NUMERIC_VERSION($ver)`
     req=`STEPMAKE_NUMERIC_VERSION($3)`
-    AC_MSG_RESULT("$ver")
+    AC_MSG_RESULT([$ver])
     if test "$num" -lt "$req"; then
-	STEPMAKE_ADD_ENTRY($2, "$r $3 (installed: $ver)")
+	STEPMAKE_ADD_ENTRY($2, ["$r $3 (installed: $ver)"])
     fi
 ])
 
@@ -204,7 +203,7 @@ AC_DEFUN(STEPMAKE_COMPILE, [
 ])
 
 AC_DEFUN(STEPMAKE_CXX, [
-    AC_LANG_CPLUSPLUS
+    AC_LANG([C++])
     AC_PROG_CXX
     STEPMAKE_OPTIONAL_REQUIRED(CXX, c++, $1)
 
@@ -222,12 +221,10 @@ AC_DEFUN(STEPMAKE_CXX, [
 AC_DEFUN(STEPMAKE_CXXTEMPLATE, [
     AC_CACHE_CHECK([whether explicit instantiation is needed],
 	lily_cv_need_explicit_instantiation,
-	AC_TRY_LINK([
+	AC_LINK_IFELSE([AC_LANG_PROGRAM([[
     template <class T> struct foo { static int baz; };
     template <class T> int foo<T>::baz = 1;
-    ], [ return foo<int>::baz; ],
-	    lily_cv_need_explicit_instantiation=no,
-	    lily_cv_need_explicit_instantiation=yes))
+    ]], [[ return foo<int>::baz; ]])],[lily_cv_need_explicit_instantiation=no],[lily_cv_need_explicit_instantiation=yes]))
     if test x"$lily_cv_need_explicit_instantiation"x = x"yes"x; then
 	AC_DEFINE(NEED_EXPLICIT_INSTANTIATION)
     fi
@@ -245,7 +242,7 @@ AC_DEFUN(STEPMAKE_DATADIR, [
     
     package_datadir=$datadir/$package
     local_package_datadir=$package_datadir/$FULL_VERSION
-    build_package_datadir=$builddir/share/$package
+    build_package_datadir=$ugh_ugh_autoconf250_builddir/share/$package
     
     DATADIR=`echo ${datadir} | sed "s!\\\${prefix}!$presome!"`
     PACKAGE_DATADIR=`echo ${package_datadir} | sed "s!\\\${prefix}!$presome!"`
@@ -256,10 +253,10 @@ AC_DEFUN(STEPMAKE_DATADIR, [
     AC_SUBST(package_datadir)
     AC_SUBST(local_package_datadir)
     AC_SUBST(build_package_datadir)
-    AC_DEFINE_UNQUOTED(DATADIR, "${DATADIR}")
-    AC_DEFINE_UNQUOTED(PACKAGE_DATADIR, "${PACKAGE_DATADIR}")
-    AC_DEFINE_UNQUOTED(LOCAL_PACKAGE_DATADIR, "${LOCAL_PACKAGE_DATADIR}")
-    AC_DEFINE_UNQUOTED(BUILD_PACKAGE_DATADIR, "${BUILD_PACKAGE_DATADIR}")
+    AC_DEFINE_UNQUOTED(DATADIR, ["${DATADIR}"])
+    AC_DEFINE_UNQUOTED(PACKAGE_DATADIR, ["${PACKAGE_DATADIR}"])
+    AC_DEFINE_UNQUOTED(LOCAL_PACKAGE_DATADIR, ["${LOCAL_PACKAGE_DATADIR}"])
+    AC_DEFINE_UNQUOTED(BUILD_PACKAGE_DATADIR, ["${BUILD_PACKAGE_DATADIR}"])
 ])
 
 
@@ -267,7 +264,8 @@ AC_DEFUN(STEPMAKE_END, [
     AC_SUBST(OPTIONAL)
     AC_SUBST(REQUIRED)
     
-    AC_OUTPUT($CONFIGFILE.make:config.make.in)
+    AC_CONFIG_FILES([$CONFIGFILE.make:config.make.in])
+AC_OUTPUT
 
     
     if test -n "$OPTIONAL"; then
@@ -310,7 +308,7 @@ AC_DEFUN(STEPMAKE_FLEX, [
     # AC_PROG_LEX
     # urg: automake 1.3: hope this doesn't break 1.2 ac_cv_pro_lex_root hack...
 
-    # AC_DECL_YYTEXT
+    # AC_PROG_LEX()
     # ugh, ugh
     ac_cv_prog_lex_root=lex.yy
     STEPMAKE_PROGS(FLEX, flex, $1)
@@ -318,7 +316,7 @@ AC_DEFUN(STEPMAKE_FLEX, [
 
 
 AC_DEFUN(STEPMAKE_FLEXLEXER, [
-    AC_HAVE_HEADERS(FlexLexer.h, true, false)
+    AC_CHECK_HEADERS([FlexLexer.h],[true],[false])
     if test $? -ne 0; then
 	warn='FlexLexer.h (flex package)'
 	STEPMAKE_ADD_ENTRY($1, $warn)
@@ -344,7 +342,7 @@ AC_DEFUN(STEPMAKE_GETTEXT, [
     LOCALEDIR=`echo ${localedir} | sed "s!\\\${prefix}!$presome!"`
     
     AC_SUBST(localedir)
-    AC_DEFINE_UNQUOTED(LOCALEDIR, "${LOCALEDIR}")
+    AC_DEFINE_UNQUOTED(LOCALEDIR, ["${LOCALEDIR}"])
     AC_CHECK_LIB(intl, gettext)
     AC_CHECK_FUNCS(gettext)
 ])
@@ -376,10 +374,10 @@ AC_DEFUN(STEPMAKE_GUILE, [
 AC_DEFUN([STEPMAKE_GUILE_FLAGS], [
     exe=`STEPMAKE_GET_EXECUTABLE($guile_config)`
     if test -x $exe; then
-	AC_MSG_CHECKING("guile compile flags")
+	AC_MSG_CHECKING([guile compile flags])
 	GUILE_CFLAGS="`$guile_config compile`"
 	AC_MSG_RESULT($GUILE_CFLAGS)
-	AC_MSG_CHECKING("guile link flags")
+	AC_MSG_CHECKING([guile link flags])
 	GUILE_LDFLAGS="`$guile_config link`"
 	AC_MSG_RESULT($GUILE_LDFLAGS)
     fi
@@ -390,12 +388,12 @@ AC_DEFUN([STEPMAKE_GUILE_FLAGS], [
 
 AC_DEFUN(STEPMAKE_GUILE_DEVEL, [
     ## First, let's just see if we can find Guile at all.
-    AC_MSG_CHECKING("for guile-config")
+    AC_MSG_CHECKING([for guile-config])
     for guile_config in guile-config $target-guile-config $build-guile-config; do
-	AC_MSG_RESULT("$guile_config")
+	AC_MSG_RESULT([$guile_config])
 	if ! $guile_config --version > /dev/null 2>&1 ; then
-	    AC_MSG_WARN("cannot execute $guile_config")
-	    AC_MSG_CHECKING("if we are cross compiling")
+	    AC_MSG_WARN([cannot execute $guile_config])
+	    AC_MSG_CHECKING([if we are cross compiling])
 	    GUILE_CONFIG='echo no guile-config'
 	else
 	    GUILE_CONFIG=$guile_config
@@ -440,6 +438,7 @@ AC_DEFUN(STEPMAKE_GXX, [
 
 AC_DEFUN(STEPMAKE_INIT, [
 
+    AC_PREREQ(2.50)
     . $srcdir/VERSION
     FULL_VERSION=$MAJOR_VERSION.$MINOR_VERSION.$PATCH_LEVEL
     if test x$MY_PATCH_LEVEL != x; then
@@ -475,32 +474,33 @@ AC_DEFUN(STEPMAKE_INIT, [
 
 	AC_MSG_CHECKING(builddir)
 
-	builddir="`pwd`"
-
+	ugh_ugh_autoconf250_builddir="`pwd`"
+	
 	if test "$srcdir" = "."; then
 	    srcdir_build=yes
 	else
 	    srcdir_build=no
-	    package_builddir="`dirname $builddir`"
+	    package_builddir="`dirname $ugh_ugh_autoconf250_builddir`"
 	    package_srcdir="`dirname  $srcdir`"
 	fi
-	AC_MSG_RESULT($builddir)
+	AC_MSG_RESULT($ugh_ugh_autoconf250_builddir)
 
 	(cd stepmake 2>/dev/null || mkdir stepmake)
 	(cd stepmake; rm -f bin; ln -s ../$srcdir/bin .)
-	AC_CONFIG_AUX_DIR(bin)
+# only possible with autoconf < 2.50 -- hardcoded in configure.in
+#	AC_CONFIG_AUX_DIR(bin)
 	stepmake=stepmake
     else
         AC_MSG_RESULT($PACKAGE)
 
 	AC_MSG_CHECKING(builddir)
-	builddir="`pwd`"
+	ugh_ugh_autoconf250_builddir="`pwd`"
 	if test "$srcdir" = "."; then
 	    srcdir_build=yes
 	else
 	    srcdir_build=no
 	fi
-	AC_MSG_RESULT($builddir)
+	AC_MSG_RESULT($ugh_ugh_autoconf250_builddir)
 
 	AC_MSG_CHECKING(for stepmake)
 	# Check for installed stepmake
@@ -508,30 +508,23 @@ AC_DEFUN(STEPMAKE_INIT, [
 	    AC_MSG_RESULT($stepmake)
 	else
 	    stepmake="`cd $srcdir/stepmake; pwd`"
-	    AC_MSG_RESULT($srcdir/stepmake  ($datadir/stepmake not found))
+	    AC_MSG_RESULT([$srcdir/stepmake  ($datadir/stepmake not found)])
 	fi
 
-	AC_CONFIG_AUX_DIR(\
-	  $HOME/usr/local/share/stepmake/bin\
-	  $HOME/usr/local/lib/stepmake/bin\
-	  $HOME/usr/share/stepmake/bin\
-	  $HOME/usr/lib/stepmake/bin\
-	  /usr/local/share/stepmake/bin\
-	  /usr/local/lib/stepmake/bin\
-	  /usr/share/stepmake/bin\
-	  /usr/lib/stepmake/bin\
-	  stepmake/bin\
-	  $srcdir/stepmake/bin\
-	)
+# only possible with autoconf < 2.50 -- hardcoded in configure.in
+# 	AC_CONFIG_AUX_DIR(\
+# 	  stepmake/bin\
+# 	  $srcdir/stepmake/bin\
+#	)
     fi
 
-    AC_SUBST(builddir)
+    AC_SUBST(ugh_ugh_autoconf250_builddir)
     AC_SUBST(stepmake)
     AC_SUBST(package)
     AC_SUBST(PACKAGE)
     AC_SUBST(PACKAGE_NAME)
-    AC_DEFINE_UNQUOTED(PACKAGE, "${PACKAGE_NAME}")
-    AC_DEFINE_UNQUOTED(TOPLEVEL_VERSION, "${FULL_VERSION}")
+    AC_DEFINE_UNQUOTED(PACKAGE, ["${PACKAGE_NAME}"])
+    AC_DEFINE_UNQUOTED(TOPLEVEL_VERSION, ["${FULL_VERSION}"])
 
     if test -z "$package_depth"; then
     	package_depth="."
@@ -609,8 +602,8 @@ AC_DEFUN(STEPMAKE_INIT, [
     AC_SUBST(LN)
     AC_SUBST(LN_S)
     AC_SUBST(INSTALL)
-    AC_DEFINE_UNQUOTED(DIRSEP, '${DIRSEP}')
-    AC_DEFINE_UNQUOTED(PATHSEP, '${PATHSEP}')
+    AC_DEFINE_UNQUOTED(DIRSEP, ['${DIRSEP}'])
+    AC_DEFINE_UNQUOTED(PATHSEP, ['${PATHSEP}'])
     AC_SUBST(DIRSEP)
     AC_SUBST(PATHSEP)
     AC_SUBST(ROOTSEP)
@@ -649,7 +642,7 @@ AC_DEFUN(STEPMAKE_KPATHSEA, [
     [kpathsea_b=$with_kpathsea])
 
     if test "$kpathsea_b" != "no"; then	
-	AC_HAVE_HEADERS(kpathsea/kpathsea.h)
+	AC_CHECK_HEADERS([kpathsea/kpathsea.h])
 	AC_CHECK_LIB(kpathsea, kpse_find_file)
 	AC_CHECK_FUNCS(kpse_find_file,,kpathsea_b=no)
 	if test "$kpathsea_b" = "no"; then
@@ -810,7 +803,7 @@ AC_DEFUN(STEPMAKE_PERL, [
 
 
 AC_DEFUN(STEPMAKE_PYTHON_DEVEL, [
-    AC_HAVE_HEADERS(python2.2/Python.h python2.1/Python.h python2.0/Python.h python2/Python.h python/Python.h python1.5/Python.h Python.h, PYTHON_HEADER=yes)
+    AC_CHECK_HEADERS([python2.2/Python.h python2.1/Python.h python2.0/Python.h python2/Python.h python/Python.h python1.5/Python.h Python.h],[PYTHON_HEADER=yes])
     if test -z "$PYTHON_HEADER"; then
 	warn='python.h (python-devel, python-dev or libpython-dev package)'
 	STEPMAKE_ADD_ENTRY($1, $warn)
diff -purN ../lilypond-1.7.7/stepmake/autogen.sh ./stepmake/autogen.sh
--- ../lilypond-1.7.7/stepmake/autogen.sh	2002-07-13 16:40:42.000000000 +0200
+++ ./stepmake/autogen.sh	2002-11-19 11:51:43.000000000 +0100
@@ -9,23 +9,23 @@ if [ stepmake/autogen.sh -nt autogen.sh 
     exec ./autogen.sh
 fi
 
-# Be paranoid: check for autoconf == 2.13
-# Some setups have both autoconf 2.13 and 2.50 available through
+# Be paranoid: check for autoconf >= 2.50
+# Some setups have both autoconf 2.13 and 2.5x available through
 # a wrapper script: /usr/bin/autoconf.
 # This wrapper may incorrectly autoselect autoconf 2.50, but it
 # advertises itself as autoconf 2.13.
 # If you have such a setup, invoke this script as:
-#   autoconf=autoconf2.13 ./autogen.sh
-for i in autoconf-2.13 autoconf2.13 autoconf  false; do
+#   autoconf=autoconf2.50 ./autogen.sh
+for i in autoconf2.50 autoconf-2.50 autoconf  false; do
   version=`$i --version 2>/dev/null | head -1 | awk '{print $NF}' | awk -F. '{print $1 * 100 + $2}'`
-  if test "0$version" -eq 213; then
+  if test "0$version" -ge 250; then
     autoconf=$i
     break
   fi
 done
 
 if test -z "$autoconf"; then
-    echo "ERROR: Please install autoconf 2.13"
+    echo "ERROR: Please install autoconf 2.50 or newer"
     exit 1
 fi
 
diff -purN ../lilypond-1.7.7/stepmake/config.make.in ./stepmake/config.make.in
--- ../lilypond-1.7.7/stepmake/config.make.in	2000-03-22 12:53:08.000000000 +0100
+++ ./stepmake/config.make.in	2002-11-19 11:51:43.000000000 +0100
@@ -21,7 +21,7 @@ CONFIGSUFFIX = @CONFIGSUFFIX@
 MAKEINFO = @MAKEINFO@
 ICFLAGS = @ICFLAGS@
 ILDFLAGS = @ILDFLAGS@
-builddir = @builddir@
+builddir = @ugh_ugh_autoconf250_builddir@
 libdir = @libdir@
 prefix = @prefix@
 srcdir = @srcdir@
diff -purN ../lilypond-1.7.7/stepmake/configure.in ./stepmake/configure.in
--- ../lilypond-1.7.7/stepmake/configure.in	2002-08-09 15:36:58.000000000 +0200
+++ ./stepmake/configure.in	2002-11-19 11:51:43.000000000 +0100
@@ -1,13 +1,21 @@
 dnl configure.in   -*-shell-script-*-
 dnl Process this file with autoconf to produce a configure script. 
 
-# Bootstrap the init proces.  List a file identifies your package.
-AC_INIT(make/stepmake.lsm.in)
-AC_CONFIG_HEADER($CONFIGFILE.h:config.hh.in)
+# Bootstrap the init proces.
+AC_INIT
 
 # Bootstrap StepMake configure
+# For user package:
+# AC_CONFIG_AUX_DIR(stepmake/bin)
+# For stepmake package:
+AC_CONFIG_AUX_DIR(bin)
 STEPMAKE_INIT
 
+# List a file that identifies your package.
+AC_CONFIG_SRCDIR([make/stepmake.lsm.in])
+# Move to aclocal.m4?
+AC_CONFIG_HEADER([$CONFIGFILE.h:config.hh.in])
+
 # For all packages except the StepMake package itself
 # AC_CONFIG_SUBDIRS(stepmake)
 
@@ -15,7 +23,7 @@ CC=echo
 AC_SUBST(CC)
 # Uncomment the configuration options your package needs.
 # STEPMAKE_COMPILE
-# AC_HAVE_HEADERS(limits.h malloc.h string.h unistd.h values.h)
+# AC_CHECK_HEADERS([limits.h malloc.h string.h unistd.h values.h])
 # STEPMAKE_CXX
 # STEPMAKE_GXX
 # STEPMAKE_CXXTEMPLATE
diff -purN ../lilypond-1.7.7/VERSION ./VERSION
--- ../lilypond-1.7.7/VERSION	2002-11-14 11:29:43.000000000 +0100
+++ ./VERSION	2002-11-19 13:09:59.000000000 +0100
@@ -1,7 +1,7 @@
 PACKAGE_NAME=LilyPond
 MAJOR_VERSION=1
 MINOR_VERSION=7
-PATCH_LEVEL=7
+PATCH_LEVEL=8
 MY_PATCH_LEVEL=
 
 # Use the above to send patches: MY_PATCH_LEVEL is always empty for a
