Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Merge pull request #2 from mcna/master

Fix for format-timestring's destination argument
  • Loading branch information...
commit fef360aeb1690d1af5d81929088270f135f8e2e0 2 parents 1b77c78 + 5797a11
@dlowe-net authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/local-time.lisp
View
2  src/local-time.lisp
@@ -1550,7 +1550,7 @@ You can see examples in +ISO-8601-FORMAT+, +ASCTIME-FORMAT+, and +RFC-1123-FORMA
(declare (type (or boolean stream) destination))
(let ((result (%construct-timestring timestamp format timezone)))
(when destination
- (write-string result destination))
+ (write-string result (if (eq t destination) *standard-output* destination)))
result))
(defun format-rfc1123-timestring (destination timestamp)
Please sign in to comment.
Something went wrong with that request. Please try again.