summary refs log tree commit diff
path: root/tests/ui.scm
diff options
context:
space:
mode:
authorCyrill Schenkel <cyrill.schenkel@gmail.com>2014-07-27 00:53:16 +0200
committerLudovic Courtès <ludo@gnu.org>2014-08-11 18:27:03 +0200
commit3a09e1d2e8ef976e5d5e35d47fcb92ae501a651e (patch)
tree38277f2a8ca11840d3e289fee0ec700ce221bd04 /tests/ui.scm
parentebc32b311088808d028804909c841154e5c8bc9f (diff)
downloadguix-3a09e1d2e8ef976e5d5e35d47fcb92ae501a651e.tar.gz
ui: Fix handling of periods by fill-paragraph.
Fixes <http://bugs.gnu.org/17468>.

* guix/ui.scm (fill-paragraph): Two spaces after period and no spaces before newline.
* tests/ui.scm: New test case.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'tests/ui.scm')
-rw-r--r--tests/ui.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/ui.scm b/tests/ui.scm
index 4bf7a779c5..7cc02649e1 100644
--- a/tests/ui.scm
+++ b/tests/ui.scm
@@ -67,6 +67,11 @@ interface, and powerful string processing.")
                    10)
    #\newline))
 
+(test-equal "fill-paragraph, two spaces after period"
+  "First line.  Second line"
+  (fill-paragraph "First line.
+Second line" 24))
+
 (test-equal "package-specification->name+version+output"
   '(("guile" #f "out")
     ("guile" "2.0.9" "out")