X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Ffile-cache.scm;h=4ca9ee056d3b1dd1b5927be28303e4f8b3fdb931;hb=d65c28e4c325cd3193c158bb92f6abf5e397aae1;hp=7deea1a28eef9a973d70c480c32ad039c9710088;hpb=1c846b2c2348b4e0ca4a3c2e8fb267047ba2d203;p=lilypond.git

diff --git a/scm/file-cache.scm b/scm/file-cache.scm
index 7deea1a28e..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--2011 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))