Re: [frogs] Re: What's up with the Frogs?

[Marek Klein <marek@xxxxxxxxxxxxx>]

2009/2/23 Carl D. Sorensen <c_sorensen@xxxxxxx>

Andrew W, Josh, Kieren, and Marek, can you give me an estimated completion
date for your documentation project?

Here are my patches again.
I only changed the patch_music-functions-init.ly file the way you wanted.

-- 
Marek Klein
http://gregoriana.sk

--- music-functions-init.ly.bak	2009-01-03 20:49:12.000000000 +0100
+++ music-functions-init.ly	2009-01-03 22:00:49.000000000 +0100
@@ -696,7 +696,7 @@
 tag = #(define-music-function (parser location tag arg)
    (symbol? ly:music?)
 
-   "Add @var{tag} to the @code{tags} property of @var{arg}."
+   ( _i "Add @var{tag} to the @code{tags} property of @var{arg}." )
 
    (set!
     (ly:music-property arg 'tags)
@@ -711,11 +711,11 @@
   (parser location what dir pitch-note main-music)
   (string? ly:dir? ly:music? ly:music?)
 
-  "Insert notes from the part @var{what} into a voice called @code{cue},
+  ( _i "Insert notes from the part @var{what} into a voice called @code{cue},
 using the transposition defined by @var{pitch-note}.  This happens
 simultaneously with @var{main-music}, which is usually a rest.  The
 argument @var{dir} determines whether the cue notes should be notated
-as a first or second voice."
+as a first or second voice." )
 
   (make-music 'QuoteMusic
 	      'element main-music
@@ -730,7 +730,7 @@
 
 transposition =
 #(define-music-function (parser location pitch-note) (ly:music?)
-   "Set instrument transposition"
+   ( _i "Set instrument transposition" )
 
    (context-spec-music
     (make-property-set 'instrumentTransposition
@@ -740,7 +740,7 @@
 tweak = #(define-music-function (parser location sym val arg)
 	   (symbol? scheme? ly:music?)
 
-	   "Add @code{sym . val} to the @code{tweaks} property of @var{arg}."
+	   ( _i "Add @code{sym . val} to the @code{tweaks} property of @var{arg}." )
 	   
 	   (set!
 	    (ly:music-property arg 'tweaks)
@@ -752,13 +752,14 @@
 
 unfoldRepeats =
 #(define-music-function (parser location music) (ly:music?)
+	( _i "Change all repeats to unfold repeats")
 		  (unfold-repeats music))
 
 
 
 withMusicProperty =
 #(define-music-function (parser location sym val music) (symbol? scheme? ly:music?)
-   "Set @var{sym} to @var{val} in @var{music}."
+   ( _i "Set @var{sym} to @var{val} in @var{music}.")
 
    (set! (ly:music-property music sym) val)
    music)

--- toc-init.ly.bak	2009-01-03 19:50:51.000000000 +0100
+++ toc-init.ly	2009-01-03 19:53:32.000000000 +0100
@@ -32,10 +32,10 @@
 }
 
 #(define-markup-list-command (table-of-contents layout props) ()
-  "Outputs the table of contents, using the paper variable
+  ( _i "Outputs the table of contents, using the paper variable
 @code{tocTitleMarkup} for its title, then the list of lines
 built using the @code{tocItem} music function
-Usage: @code{\\markuplines \\table-of-contents}"
+Usage: @code{\\markuplines \\table-of-contents}" )
   (cons (interpret-markup layout props
 			  (ly:output-def-lookup layout 'tocTitleMarkup))
 	(space-lines (chain-assoc-get 'baseline-skip props)