[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] GNU Guile branch, master, updated. release_1-9-13-35-g8a

From: Michael Gran
Subject: [Guile-commits] GNU Guile branch, master, updated. release_1-9-13-35-g8a6b693
Date: Tue, 09 Nov 2010 02:54:07 +0000

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

The branch, master has been updated
       via  8a6b693817d396cb3e421f47edba7221f84e3759 (commit)
      from  bf61ca33025b8d75f72c41059e9f168a62d71a8f (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 8a6b693817d396cb3e421f47edba7221f84e3759
Author: Michael Gran <address@hidden>
Date:   Mon Nov 8 18:57:29 2010 -0800

    Use ellipsis character in truncated pretty-print of sequences
    * module/ice-9/pretty-print.scm (print-sequence): use ellipsis when 


Summary of changes:
 module/ice-9/pretty-print.scm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/module/ice-9/pretty-print.scm b/module/ice-9/pretty-print.scm
index c1d3b36..5ea66c7 100644
--- a/module/ice-9/pretty-print.scm
+++ b/module/ice-9/pretty-print.scm
@@ -337,7 +337,7 @@ sub-expression, via the @var{breadth-first?} keyword 
            ((and (= i (1- len)) (or (zero? i) (> width 1)))
             (print (ref x i) (if (zero? i) width (1- width))))
            ((<= width (+ 1 ellipsis-width))
-            (display "..."))
+            (display ellipsis))
             (let ((str
                    (with-fluids ((%default-port-encoding (port-encoding port)))

GNU Guile

reply via email to

[Prev in Thread] Current Thread [Next in Thread]