From 1f653cf292ed1740189a5b66e080e26b50784a6c Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Fri, 21 Nov 2008 00:59:38 +0100 Subject: justify: Rename `output' to `output-justified' to avoid confusion. * src/guile/skribilo/utils/justify.scm (output): Rename to... (output-justified): this. --- src/guile/skribilo/utils/justify.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/guile') diff --git a/src/guile/skribilo/utils/justify.scm b/src/guile/skribilo/utils/justify.scm index c0b4eb8..98b7277 100644 --- a/src/guile/skribilo/utils/justify.scm +++ b/src/guile/skribilo/utils/justify.scm @@ -27,7 +27,7 @@ *text-justification* *margin* - output output-token output-center + output-justified output-token output-center output-newline justification-width with-justification with-justification/noflush)) @@ -92,7 +92,7 @@ ;*---------------------------------------------------------------------*/ ;* output ... */ ;*---------------------------------------------------------------------*/ -(define (output str) +(define (output-justified str) ((car *justifiers*) 'output str)) ;*---------------------------------------------------------------------*/ -- cgit v1.2.3