]> git.donarmstrong.com Git - lilypond.git/commitdiff
Issue 3952: Automatically sort props within each grob-interface.
authorMark Polesky <markpolesky@yahoo.com>
Fri, 11 Jul 2014 07:16:46 +0000 (00:16 -0700)
committerMark Polesky <markpolesky@yahoo.com>
Fri, 18 Jul 2014 18:30:23 +0000 (11:30 -0700)
Ensures that "User settable properties" and "Internal properties"
are listed in sorted order in the "Graphical Object Interfaces"
section of the IR.

This was originally pushed with commit 84f0776,
but was accidentally reverted with commit 0ea80a5.

scm/document-backend.scm

index d9ec2b00b50afe1e7c674dcb1197dde97dc36c1a..406f09aacbbd6820b05686e072ce2806b142c81f 100644 (file)
@@ -176,6 +176,16 @@ node."
      (cons (cons key val)  prior))
    '() (ly:all-grob-interfaces)))
 
+;; sort user-settable and internal props within each grob-interface
+(set! interface-description-alist
+  (map! (lambda (iface-desc)
+          (let* ((key-name-docstr (list-head iface-desc 3))
+                 (props           (list-tail iface-desc 3))
+                 (sorted-props    (list (sort (car props) ly:symbol-ci<?))))
+            (append key-name-docstr sorted-props)))
+        interface-description-alist))
+
+;; sort list of grob interfaces
 (set! interface-description-alist
       (sort interface-description-alist ly:alist-ci<?))