Changeset 11856 for release/1.3/source/level-1/l1-error-system.lisp
- Timestamp:
- Mar 28, 2009, 4:49:44 AM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
release/1.3/source/level-1/l1-error-system.lisp
r11747 r11856 988 988 (if (= 1 (length other-functions)) 989 989 (format s "Apply ~s to ~S this time." (first other-functions) args) 990 (format s "Apply one of ~{~S or ~} to ~S this time."))) 990 (format s "Apply one of ~{~S or ~} to ~S this time." 991 other-functions args))) 991 992 :interactive (lambda () 992 993 (if (= 1 (length other-functions))
Note: See TracChangeset
for help on using the changeset viewer.