X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scripts%2Fauxiliar%2Ffixscm.sh;fp=scripts%2Fauxiliar%2Ffixscm.sh;h=9c8f2f3f65cdec362d36f4c3b732f58bf4673575;hb=0ac07f31e0f95fc18e5916ce756b9c746af7cc58;hp=0000000000000000000000000000000000000000;hpb=2f1263e2ccdddcac2eb9f7d8ce2ed92867d3d160;p=lilypond.git

diff --git a/scripts/auxiliar/fixscm.sh b/scripts/auxiliar/fixscm.sh
new file mode 100755
index 0000000000..9c8f2f3f65
--- /dev/null
+++ b/scripts/auxiliar/fixscm.sh
@@ -0,0 +1,14 @@
+#!/bin/sh
+#
+# Indent and untabify source files (given by their
+# filenames in the command line), according to
+# LilyPond source style standards.
+
+elisp_expression='(progn
+  (delete-trailing-whitespace)
+  (indent-region (point-min) (point-max) nil)
+  (untabify (point-min) (point-max))
+  (save-buffer))'
+for f in "$@"; do
+  emacs -batch "$f" --eval "${elisp_expression}"
+done