* CVS maxima on openmcl
@ 2004-03-22 18:12 Piet van Oostrum
2004-03-22 19:39 ` Piet van Oostrum
0 siblings, 1 reply; 2+ messages in thread
From: Piet van Oostrum @ 2004-03-22 18:12 UTC (permalink / raw)
openmcl returns :unspecific as result of pathname-device (which is
perfectly correct). But the cvs cersion of maxima can't deal with it and
includes UNSPECIFIC: in front of filenames.
The following patch solves this. Can somebody change this in the sources?
diff -c /Users/piet/Projects/cvs/maxima/src/init-cl.lisp.\~2\~ /Users/piet/Projects/cvs/maxima/src/init-cl.lisp
*** /Users/piet/Projects/cvs/maxima/src/init-cl.lisp.~2~ Mon Mar 22 19:09:54 2004
--- /Users/piet/Projects/cvs/maxima/src/init-cl.lisp Sat Mar 20 23:42:22 2004
***************
*** 105,111 ****
(let ((dev (pathname-device str)))
(if (consp dev)
(setf dev (first dev)))
! (if (and dev (not (string= dev "")))
(concatenate 'string
(string-right-trim
":" dev) ":")
--- 105,111 ----
(let ((dev (pathname-device str)))
(if (consp dev)
(setf dev (first dev)))
! (if (and dev (not (eq dev :unspecific)) (not (string= dev "")))
(concatenate 'string
(string-right-trim
":" dev) ":")
--
Piet van Oostrum <piet@cs.uu.nl>
URL: http://www.cs.uu.nl/~piet [PGP]
Private email: P.van.Oostrum@hccnet.nl
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: CVS maxima on openmcl
2004-03-22 18:12 CVS maxima on openmcl Piet van Oostrum
@ 2004-03-22 19:39 ` Piet van Oostrum
0 siblings, 0 replies; 2+ messages in thread
From: Piet van Oostrum @ 2004-03-22 19:39 UTC (permalink / raw)
>>>>> Piet van Oostrum <piet@cs.uu.nl> (PvO) wrote:
Sorry, wrong list (again)
--
Piet van Oostrum <piet@cs.uu.nl>
URL: http://www.cs.uu.nl/~piet [PGP]
Private email: P.van.Oostrum@hccnet.nl
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2004-03-22 19:39 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2004-03-22 18:12 CVS maxima on openmcl Piet van Oostrum
2004-03-22 19:39 ` Piet van Oostrum
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).