From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 9 Jan 2017 01:22:13 +0000 (-0800)
Subject: Tweak pagination.
X-Git-Tag: mit-scheme-pucked-9.2.12~227^2~171
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=28c7d7984e27560e8934f71aec579358654411fc;p=mit-scheme.git

Tweak pagination.
---

diff --git a/src/runtime/string.scm b/src/runtime/string.scm
index 27ee28752..7e9e6b03c 100644
--- a/src/runtime/string.scm
+++ b/src/runtime/string.scm
@@ -973,7 +973,7 @@ USA.
 	 (fix:= (%substring-match-forward-ci string1 start1 end1
 					     string2 start2 end2)
 		length))))
-
+
 (define (string-suffix? string1 string2)
   (guarantee-2-strings string1 string2 'STRING-SUFFIX?)
   (%substring-suffix? string1 0 (string-length string1)
@@ -1263,7 +1263,7 @@ USA.
 		    (fix:+ (string-find-previous-char-in-set string char-set)
 			   1))
 	"")))
-
+
 ;;;; Pad
 
 (define (string-pad-right string n #!optional char)