X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdocumentation-lib.scm;h=5dc35f25a9386b03a7922ae2b9c555f6f09d0684;hb=4bc9c027d4b4c311ba148fdf8b1058fc9c025a03;hp=5ff796557d6c7505a031e09722134b30a4f48d55;hpb=ddd8dbde27b31bca471127fc0778db2af4eb4dc7;p=lilypond.git

diff --git a/scm/documentation-lib.scm b/scm/documentation-lib.scm
index 5ff796557d..5dc35f25a9 100644
--- a/scm/documentation-lib.scm
+++ b/scm/documentation-lib.scm
@@ -3,7 +3,7 @@
 ;;;;
 ;;;; source file of the GNU LilyPond music typesetter
 ;;;; 
-;;;; (c) 2000--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+;;;; (c) 2000--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 ;;;;                 Jan Nieuwenhuizen <janneke@gnu.org>
 
 (use-modules (oop goops)
@@ -78,9 +78,13 @@
 . string-to-use)
 "
   (string-append
-   "\n@table @asis\n"
+   "\n"
+   "@quotation\n"
+   "@table @asis\n"
    (apply string-append (map one-item->texi items-alist))
-   "\n@end table\n"))
+   "\n"
+   "@end table\n"
+   "@end quotation\n"))
 
 (define (texi-menu items-alist)
   "Generate what is between @menu and @end menu."
@@ -111,7 +115,7 @@
    "\\input texinfo @c -*-texinfo-*-"
    "\n@setfilename " file-name ".info"
    "\n@settitle " name
-   "\n@dircategory GNU music project"
+   "\n@dircategory LilyPond"
    "\n@direntry"
    ;; prepend GNU for dir, must be unique
    "\n* GNU " name ": (" file-name ").          " name "."
@@ -169,7 +173,7 @@ with init values from ALIST (1st optional argument)
 	 (handle (assoc sym alist)))
 
     (if (eq? desc #f)
-	(ly:error (_ "can't find description for property ~S (~S)") sym where))
+	(ly:error (_ "cannot find description for property ~S (~S)") sym where))
     
     (cons
      (string-append "@code{" name "} "