From f5b7763e0a2b2ed0e504871b5f0d956dd1dd654b Mon Sep 17 00:00:00 2001
From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sun, 1 Dec 2002 18:20:47 +0000
Subject: [PATCH] update.

---
 ChangeLog        |  3 ++-
 NEWS             | 38 ++++++++++++++++++++++++++++++++++++++
 scm/c++.scm      |  3 ++-
 scm/sodipodi.scm |  7 -------
 4 files changed, 42 insertions(+), 9 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index ba427b3ca2..eea9b1ea84 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2002-12-01  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+	* NEWS: update.
+
 	* lily/font-interface.cc (get-font): take alist chain i.s.o. alist
 	argument
 	
@@ -17,7 +19,6 @@
 	format for parser.
 
 	* lily/lexer.ll: preliminary \markup syntax. 
-	
 
 2002-11-30  Heikki Junes <hjunes@cc.hut.fi>
 
diff --git a/NEWS b/NEWS
index d291fc40e2..9023c89530 100644
--- a/NEWS
+++ b/NEWS
@@ -6,6 +6,44 @@ LilyPond identifiers.
 
 * Music types cleaned up and Schemified.  
 
+* New syntax for chords:
+
+	<< PITCHES >>
+
+This is in addition to the < MUSICS > syntax for simultaneous music. Combined with this: uniform postfix syntax for articulations:
+
+	c8-[-( d8-]-) 
+
+for a beamed slurred pair of eighth notes.
+
+* Texts on multimeasure rests can be set by the user.
+
+* Zigzagged glissandi
+
+* XML music output.
+
+* Preliminary Sodipodi/SVG output
+
+* Cluster support. Syntax:
+
+	NOTE-\openCluster
+	..
+	NOTE-\closeCluster
+
+* Beat grouping indications. Syntax:
+
+	#(set-time-signature 7 8 '(3 2 2))
+
+* User code evaluation during interpreting. Syntax
+
+	\applycontext #SCHEME-FUNCTION
+
+* Nested horizontal brackets for music analysis.
+
+	NOTE-\groupOpen
+		..
+	NOTE-\groupClose
+
 New features in 1.6 since 1.4
 
 * Support for figured bass and tablature.
diff --git a/scm/c++.scm b/scm/c++.scm
index d9ac2d5339..9231f51b7c 100644
--- a/scm/c++.scm
+++ b/scm/c++.scm
@@ -31,7 +31,8 @@
   (or (number? x) (string? x)))
 
 (define-public (markup? x)
-  (or (string? x) (list? x)))
+  (or (string? x) (list? x)
+      (new-markup? x)))
 
 (define-public (scheme? x) #t)
 
diff --git a/scm/sodipodi.scm b/scm/sodipodi.scm
index 9f299d78e4..31cadb6123 100644
--- a/scm/sodipodi.scm
+++ b/scm/sodipodi.scm
@@ -17,7 +17,6 @@
 
 (debug-enable 'backtrace)
 
-
 (define-module (scm sodipodi))
 (define this-module (current-module))
 
@@ -25,9 +24,6 @@
  (guile)
  (lily))
 
-
-
-
 ;;; Lily output interface --- cleanup and docme
 
 ;;; Bare minimum interface for \score { \notes c } }
@@ -51,8 +47,6 @@
 ;;;    comment
 ;;;    stop-last-system
 
-
-
 ;; Module entry
 ;;(define-public (sodipodi-output-expression expr port)
 ;;  (display (eval expr this-module) port))
@@ -60,7 +54,6 @@
 (define-public (sodipodi-output-expression expr port)
   (display (dispatch expr) port))
 
-
 (define (dispatch expr)
   (let ((keyword (car expr)))
     (cond
-- 
2.39.5