X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Ffile-cache.scm;h=4ca9ee056d3b1dd1b5927be28303e4f8b3fdb931;hb=8f367da7d4611adadc083422f29703bc40e8488e;hp=70cae0b8b33f5d3a48d7f23383c81809598dc3bf;hpb=a6bd229f7fe1dc4a03478e14ccc0c0c66b225061;p=lilypond.git

diff --git a/scm/file-cache.scm b/scm/file-cache.scm
index 70cae0b8b3..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--2010 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))