[closure-cvs] CVS update: closure/src/renderer/renderer2.lisp

[Eric Marsden]

Update of /project/closure/cvsroot/closure/src/renderer
In directory common-lisp.net:/tmp/cvs-serv16691/src/renderer

Modified Files:
	renderer2.lisp 
Log Message:
Reference hyphenation table via a file:// URL.

Date: Sun Jul 17 11:35:47 2005
Author: emarsden

Index: closure/src/renderer/renderer2.lisp
diff -u closure/src/renderer/renderer2.lisp:1.10 closure/src/renderer/renderer2.lisp:1.11
--- closure/src/renderer/renderer2.lisp:1.10	Wed Jul 13 15:44:55 2005
+++ closure/src/renderer/renderer2.lisp	Sun Jul 17 11:35:47 2005
@@ -4,7 +4,7 @@
 ;;;   Created: somewhen late 2002
 ;;;    Author: Gilbert Baumann <gilbert at base-engineering.com>
 ;;;   License: MIT style (see below)
-;;;       $Id: renderer2.lisp,v 1.10 2005/07/13 13:44:55 crhodes Exp $
+;;;       $Id: renderer2.lisp,v 1.11 2005/07/17 09:35:47 emarsden Exp $
 ;;; ---------------------------------------------------------------------------
 ;;;  (c) copyright 1997-2003 by Gilbert Baumann
 
@@ -4787,7 +4787,7 @@
 (defun hyphenation-table ()
   (or *hyphenation-table*
       (setf *hyphenation-table*
-            (read-hyphen-table-file "/home/closure/closure/resources/patterns/english.ptn"))))
+            (read-hyphen-table "file://closure/resources/patterns/english.ptn"))))
 
 (defun hyphenate-items (items w)
   "This takes a chunk list and applies hyphenation it it."
@@ -4968,6 +4968,9 @@
 
 
 ;; $Log: renderer2.lisp,v $
+;; Revision 1.11  2005/07/17 09:35:47  emarsden
+;; Reference hyphenation table via a file:// URL.
+;;
 ;; Revision 1.10  2005/07/13 13:44:55  crhodes
 ;; Make images work, more or less.
 ;;