csv: don't need optional first/last.

2012-07-15 16:03:19 -07:00 · 2012-07-15 16:03:19 -07:00 · d539aa9311
parent 260b75f4bf
commit d539aa9311
1 changed files with 2 additions and 2 deletions
--- a/basis/csv/csv.factor
+++ b/basis/csv/csv.factor
@ -43,8 +43,8 @@ MEMO: (quoted-field) ( delimiter -- delimiter' )
    ] [
        swap [ "" ] [
            dup {
-                [ ?first blank? ]
+                [ first blank? ]
-                [ ?last blank? ]
+                [ last blank? ]
            } 1||
            [ [ blank? ] trim ] when
        ] if-empty