From: Raymond T. <rt...@us...> - 2002-06-28 15:05:42
|
Update of /cvsroot/maxima/maxima/src In directory usw-pr-cvs1:/tmp/cvs-serv577/src Modified Files: suprv1.lisp Log Message: There is no ~m format directive. Index: suprv1.lisp =================================================================== RCS file: /cvsroot/maxima/maxima/src/suprv1.lisp,v retrieving revision 1.7 retrieving revision 1.8 diff -u -d -r1.7 -r1.8 --- suprv1.lisp 7 Jan 2002 18:47:42 -0000 1.7 +++ suprv1.lisp 28 Jun 2002 15:05:36 -0000 1.8 @@ -403,7 +403,7 @@ (IF PRINTP (FORMAT T "~%~A being loaded.~%" FILE)) (let* ((path (pathname FILE)) (tem (errset (LOAD (pathname FILE))))) - (or tem (merror "Load failed for ~m" (namestring path))) + (or tem (merror "Load failed for ~A" (namestring path))) (namestring path))) (defun $directory (path) |