Parent Directory | Revision Log | Patch
revision 1.3 by ttn, Mon Apr 8 17:03:57 2002 UTC | revision 1.4 by ttn, Mon Apr 8 17:07:18 2002 UTC | |
---|---|---|
# | Line 197 exec ${GUILE-guile} -l $0 -c "(apply $ma | Line 197 exec ${GUILE-guile} -l $0 -c "(apply $ma |
197 | (value #t)) | (value #t)) |
198 | (todo (single-char #\t)) | (todo (single-char #\t)) |
199 | (done (single-char #\d)) | (done (single-char #\d)) |
200 | (review (single-char #\d)) | (review (single-char #\r)) |
201 | ;; Add options here. | ;; Add options here. |
202 | )))) | )))) |
203 | (display-items p (select-items p (read-TODO (car (option-ref p '() #f)))))) | (display-items p (select-items p (read-TODO (car (option-ref p '() #f)))))) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |