From: fred <fred>
Date: Wed, 27 Mar 2002 02:05:44 +0000 (+0000)
Subject: lilypond-1.5.34
X-Git-Tag: release/1.5.59~321
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=07b15bd4d70cb067617dd43acb82dc3e82fcc2ae;p=lilypond.git

lilypond-1.5.34
---

diff --git a/scm/ps.scm b/scm/ps.scm
index 7f2aca9c3a..1d8f8f3f4c 100644
--- a/scm/ps.scm
+++ b/scm/ps.scm
@@ -16,8 +16,8 @@
 
 (if (or (equal? (minor-version) "4")
 	(equal? (minor-version) "3.4"))
-    (define-public (ps-output-expression expr)
-      (display (eval-in-module expr this-module)))
+    (define-public (ps-output-expression expr port)
+      (display (eval-in-module expr this-module) port))
 
     (define-public (ps-output-expression expr port)
       (display (eval expr this-module) port)))