Corrected a typo in step mode prompt.
tswd
8 years ago
1165 | 1165 |
(return-from cafein-stepper nil))
|
1166 | 1166 |
(unless *steps-to-be-done* (return-from cafein-stepper nil))))
|
1167 | 1167 |
;; print current term
|
1168 | |
(format t "~%>> taret: ")
|
|
1168 |
(format t "~%>> target: ")
|
1169 | 1169 |
(term-print term)
|
1170 | 1170 |
;; prompt command
|
1171 | 1171 |
(catch 'cafein-stepper-exit
|