X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fdescribe.lisp;h=8a97208c81f2cb1684bb6f54b7f55b0697c905a1;hb=b8f63d9b4e978bec3bfc1f4fc471e5ed946781fd;hp=333aa33d2bdbdcd840af88a482786a8fea0a480b;hpb=2d195da5e29feadce7190ea1a68a2efa83a5e1c0;p=sbcl.git

diff --git a/src/code/describe.lisp b/src/code/describe.lisp
index 333aa33..8a97208 100644
--- a/src/code/describe.lisp
+++ b/src/code/describe.lisp
@@ -172,7 +172,7 @@
 	      (ecase (sb-c::debug-source-from source)
 		(:file
 		 (format s "~@:_~A~@:_  Created: " (namestring name))
-		 (sb-int:format-universal-time t (sb-c::debug-source-created
+		 (sb-int:format-universal-time s (sb-c::debug-source-created
 						  source)))
 		(:lisp (format s "~@:_~S" name))))))))))