Changeset 14034 in project


Ignore:
Timestamp:
04/01/09 15:16:37 (11 years ago)
Author:
sjamaan
Message:

Add htmlize, so error reporting works properly in non-spiffy cases

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/3/web-unity/trunk/web-unity.scm

    r10862 r14034  
    4242
    4343;; Basically copied from Spiffy
     44(define (htmlize str)
     45  (string-translate* str
     46                     '(("<" . "&lt;")
     47                       (">" . "&gt;")
     48                       ("\"" . "&quot;")
     49                       ("&" . "&amp;"))))
     50
    4451(define generate-error-message
    4552  (let ()
Note: See TracChangeset for help on using the changeset viewer.