From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Piet van Oostrum Newsgroups: gmane.emacs.devel Subject: CVS maxima on openmcl Date: 22 Mar 2004 19:12:22 +0100 Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1079979456 7260 80.91.224.253 (22 Mar 2004 18:17:36 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 22 Mar 2004 18:17:36 +0000 (UTC) Original-X-From: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Mon Mar 22 19:17:16 2004 Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1B5TzA-0006tz-00 for ; Mon, 22 Mar 2004 19:17:16 +0100 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1B5Tz9-0002T2-00 for ; Mon, 22 Mar 2004 19:17:15 +0100 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.30) id 1B5TyA-0002c0-30 for emacs-devel@quimby.gnus.org; Mon, 22 Mar 2004 13:16:14 -0500 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.30) id 1B5Tvu-0001ow-I5 for emacs-devel@gnu.org; Mon, 22 Mar 2004 13:13:54 -0500 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.30) id 1B5TvD-0001c8-Nl for emacs-devel@gnu.org; Mon, 22 Mar 2004 13:13:43 -0500 Original-Received: from [213.116.162.91] (helo=ordesa.cs.uu.nl) by monty-python.gnu.org with esmtp (Exim 4.30) id 1B5Tti-000185-TM for emacs-devel@gnu.org; Mon, 22 Mar 2004 13:11:39 -0500 Original-Received: from Ordesa.local (localhost [127.0.0.1]) by ordesa.cs.uu.nl (Postfix) with ESMTP id E00D112310C for ; Mon, 22 Mar 2004 19:12:25 +0100 (CET) X-Mailer: emacs 21.3.50.10 (via feedmail 8 I) Original-To: emacs-devel@gnu.org Original-Lines: 30 User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.4 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:20738 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:20738 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 URL: http://www.cs.uu.nl/~piet [PGP] Private email: P.van.Oostrum@hccnet.nl