X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fharp-pedals.scm;h=30fd1bf94361cf4cd9627f14e4d79574a0ba43c4;hb=1c846b2c2348b4e0ca4a3c2e8fb267047ba2d203;hp=fa4ba7e77f5613ee9dac60f09cfae45b49e0bb25;hpb=b7a0cffbf9d1069860368f289a5b50e9d1d90ba8;p=lilypond.git

diff --git a/scm/harp-pedals.scm b/scm/harp-pedals.scm
index fa4ba7e77f..30fd1bf943 100644
--- a/scm/harp-pedals.scm
+++ b/scm/harp-pedals.scm
@@ -1,6 +1,6 @@
 ;;;; This file is part of LilyPond, the GNU music typesetter.
 ;;;;
-;;;; Copyright (C) 2008--2009 Reinhold Kainhofer <reinhold@kainhofer.com>
+;;;; Copyright (C) 2008--2011 Reinhold Kainhofer <reinhold@kainhofer.com>
 ;;;;
 ;;;; LilyPond is free software: you can redistribute it and/or modify
 ;;;; it under the terms of the GNU General Public License as published by
@@ -17,11 +17,11 @@
 
 
 
-(define-builtin-markup-command (harp-pedal layout props definition-string) (string?)
-  instrument-specific-markup ; markup type for the documentation!
-  ((size 1.2)
-   (harp-pedal-details '())
-   (thickness 0.5))
+(define-markup-command (harp-pedal layout props definition-string) (string?)
+  #:category instrument-specific-markup ; markup type for the documentation!
+  #:properties ((size 1.2)
+		(harp-pedal-details '())
+		(thickness 0.5))
   "Make a harp pedal diagram.
 
 Possible elements in @var{definition-string}: