Revert "Apply scripts/auxiliar/fixscm.sh"

[lilypond.git] / scm / c++.scm

diff --git a/scm/c++.scm b/scm/c++.scm
index 8f4986a257ba72fe1ef0cefba10f792062cb2c6f..f0c5d3aea9f546980949318d6498d1dcef483ba8 100644 (file)
--- a/scm/c++.scm
+++ b/scm/c++.scm
@@ -98,8 +98,8 @@
   (if (null? alist)
       "Unknown type"
       (if (apply (caar alist) obj)
-          (cdar alist)
-          (match-predicate obj (cdr alist)))))
+         (cdar alist)
+         (match-predicate obj (cdr alist)))))
 
 (define-public (object-type obj)
   (match-predicate obj type-p-name-alist))