X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fps-to-png.scm;h=f25f8cb7ff82338a4c8716a226c81cb40d18a904;hb=579274a935b22567ac15b3651a9d651474f88ec4;hp=e220d8c7ca899021f4d913464b55147ec81c6372;hpb=b3f0c2f6c352a850f03dc44a947776199eb3fa0b;p=lilypond.git diff --git a/scm/ps-to-png.scm b/scm/ps-to-png.scm index e220d8c7ca..f25f8cb7ff 100644 --- a/scm/ps-to-png.scm +++ b/scm/ps-to-png.scm @@ -1,8 +1,19 @@ -;;;; ps-to-png.scm -- +;;;; This file is part of LilyPond, the GNU music typesetter. ;;;; -;;;; source file of the GNU LilyPond music typesetter -;;;; -;;;; (c) 2005--2009 Jan Nieuwenhuizen +;;;; Copyright (C) 2005--2010 Jan Nieuwenhuizen +;;;; +;;;; LilyPond is free software: you can redistribute it and/or modify +;;;; it under the terms of the GNU General Public License as published by +;;;; the Free Software Foundation, either version 3 of the License, or +;;;; (at your option) any later version. +;;;; +;;;; LilyPond is distributed in the hope that it will be useful, +;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;;; GNU General Public License for more details. +;;;; +;;;; You should have received a copy of the GNU General Public License +;;;; along with LilyPond. If not, see . (define-module (scm ps-to-png)) @@ -16,10 +27,7 @@ (lily) ) -;; gettext wrapper for guile < 1.7.2 -(if (defined? 'gettext) - (define-public _ gettext) - (define-public (_ x) x)) +(define-public _ gettext) (define PLATFORM (string->symbol