Changeset 13341 in project


Ignore:
Timestamp:
02/19/09 03:22:22 (11 years ago)
Author:
Ivan Raikov
Message:

Bug fix in invocation of string-trim-both.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • release/3/formular/trunk/form2wiki.scm

    r13317 r13341  
    112112                      (for-each (lambda (x)
    113113                                  (for-each (lambda (x)
    114                                               (let ((x1 (string-trim-both char-whitespace? x)))
     114                                              (let ((x1 (string-trim-both x char-whitespace?)))
    115115                                                (if (not (string-null? x1))
    116116                                                    (print x1 " <br>"))))
    … …  
    122122                            (for-each (lambda (x)
    123123                                        (for-each (lambda (x)
    124                                                     (let ((x1 (string-trim-both char-whitespace? x)))
     124                                                    (let ((x1 (string-trim-both x char-whitespace?)))
    125125                                                      (if (not (string-null? x1))
    126126                                                          (print x1 " <br>"))))
Note: See TracChangeset for help on using the changeset viewer.