[Lisppaste-cvs] CVS update: lisppaste2/encode-for-pre.lisp

[Brian Mastenbrook]

Update of /project/lisppaste/cvsroot/lisppaste2
In directory common-lisp.net:/tmp/cvs-serv24534

Modified Files:
	encode-for-pre.lisp 
Log Message:
One more fix


Date: Wed Nov 12 23:34:20 2003
Author: bmastenbrook

Index: lisppaste2/encode-for-pre.lisp
diff -u lisppaste2/encode-for-pre.lisp:1.3 lisppaste2/encode-for-pre.lisp:1.4
--- lisppaste2/encode-for-pre.lisp:1.3	Wed Nov 12 23:30:54 2003
+++ lisppaste2/encode-for-pre.lisp	Wed Nov 12 23:34:20 2003
@@ -1,4 +1,4 @@
-;;;; $Id: encode-for-pre.lisp,v 1.3 2003/11/13 04:30:54 bmastenbrook Exp $
+;;;; $Id: encode-for-pre.lisp,v 1.4 2003/11/13 04:34:20 bmastenbrook Exp $
 ;;;; $Source: /project/lisppaste/cvsroot/lisppaste2/encode-for-pre.lisp,v $
 
 ;;;; See the LICENSE file for licensing information.
@@ -28,5 +28,5 @@
    (replace-in-string
     (replace-in-string
      (replace-in-string
-      (replace-in-string str #\newline "") #\return "<br>") #\linefeed "")
+      (replace-in-string (encode-for-pre str) #\newline "") #\return "<br>") #\linefeed "")
     #\space " ") #\tab "    "))