X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdocument-identifiers.scm;h=838de55e558db9bad72d1fafc3972318dd2ce54a;hb=a657051a1f3be6e6b3bee3647857bdba3c0b943e;hp=b456acf334a14f6a4dc974ae9918813033259d20;hpb=7129b9a1b73c400593ccc08418b294afef1513a1;p=lilypond.git

diff --git a/scm/document-identifiers.scm b/scm/document-identifiers.scm
index b456acf334..838de55e55 100644
--- a/scm/document-identifiers.scm
+++ b/scm/document-identifiers.scm
@@ -52,13 +52,6 @@
    (else
     #f)))
 
-
-(define (identifier<? a b)
-  (ly:string-ci<?
-   (symbol->string (car a))
-   (symbol->string (car b))))
-
-
 (define-public (identifiers-doc-string)
   (format #f
    "@table @asis