Commit 24887dff authored by csr21's avatar csr21
Browse files

Fix "too many arguments to format" problem -- clearly a rewrite to

Fix "too many arguments to format" problem -- clearly a rewrite to
FORMAT from PRINC which didn't quite get edited correctly

darcs-hash:20030806094824-ed5a3-609426d89653e6da5eee2f68b030f28a01dc3be8.gz
parent 1258a011
......@@ -2593,7 +2593,7 @@
(index-incf count)
(unless (index= count last)
(write-char #\, fstream))))
(format fstream "};~%" fstream))))))
(format fstream "};~%"))))))
(defun bitmap-image (&optional plist &rest patterns)
;; Create an image containg pattern
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment