X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Ffile-cache.scm;h=4ca9ee056d3b1dd1b5927be28303e4f8b3fdb931;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=ca9cb4872bd3e31fd129627a5a604fe9dbf7e983;hpb=b7a0cffbf9d1069860368f289a5b50e9d1d90ba8;p=lilypond.git

diff --git a/scm/file-cache.scm b/scm/file-cache.scm
index ca9cb4872b..4ca9ee056d 100644
--- a/scm/file-cache.scm
+++ b/scm/file-cache.scm
@@ -1,6 +1,6 @@
 ;;;; This file is part of LilyPond, the GNU music typesetter.
 ;;;;
-;;;; Copyright (C) 2005--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
+;;;; Copyright (C) 2005--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
 ;;;;
 ;;;; LilyPond is free software: you can redistribute it and/or modify
 ;;;; it under the terms of the GNU General Public License as published by
@@ -22,7 +22,7 @@
       ((contents (hash-ref cache-hash-tab filename #f)))
 
     (if (not (string? contents))
-	(begin
-	  (set! contents (ly:gulp-file filename))
-	  (hash-set! cache-hash-tab filename contents)))
+        (begin
+          (set! contents (ly:gulp-file filename))
+          (hash-set! cache-hash-tab filename contents)))
     contents))