From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/7824 Path: main.gmane.org!not-for-mail From: "jeff (j.d.) sparkes" Newsgroups: gmane.emacs.gnus.general Subject: 0.27: bogus error signalled due to gnus-make-directory Date: Fri, 6 Sep 1996 13:48:00 -0400 Sender: "jeff (j.d.) sparkes" Message-ID: <18632.4851857082$1042182301@news.gmane.org> NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035148084 8667 80.91.224.250 (20 Oct 2002 21:08:04 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 21:08:04 +0000 (UTC) Return-Path: ding-request@ifi.uio.no Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by deanna.miranova.com (8.7.5/8.6.9) with SMTP id LAA14092 for ; Fri, 6 Sep 1996 11:09:28 -0700 Original-Received: from bnr.ca (x400gate.bnr.ca [192.58.194.73]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) id for ; Fri, 6 Sep 1996 19:50:36 +0200 X400-Received: by mta bnr.ca in /PRMD=BNR/ADMD=TELECOM.CANADA/C=CA/; Relayed; Fri, 6 Sep 1996 13:48:56 -0400 X400-Received: by /PRMD=BNR/ADMD=TELECOM.CANADA/C=CA/; Relayed; Fri, 6 Sep 1996 13:48:24 -0400 X400-Received: by /PRMD=BNR/ADMD=TELECOM.CANADA/C=CA/; Relayed; Fri, 6 Sep 1996 13:48:00 -0400 X400-Originator: /dd.id=1581776/g=jeff/i=jd/s=sparkes/@bnr.ca X400-MTS-Identifier: [/PRMD=BNR/ADMD=TELECOM.CANADA/C=CA/;bcars735.b.653:06.08.96.17.48.24] X400-Content-Type: P2-1984 (2) Content-Identifier: 0.27: bogus e... Original-To: ding@ifi.uio.no Xref: main.gmane.org gmane.emacs.gnus.general:7824 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:7824 make-directory returns nil on success, but gnus-make-directory returns t if the directory already exists. This causes an error to be signalled from gnus-score-save, and the updated scores aren't save. *** /tmp/geta20276 Fri Sep 6 13:45:27 1996 --- gnus-util.el Fri Sep 6 13:45:05 1996 *************** *** 540,546 **** "Make DIRECTORY (and all its parents) if it doesn't exist." (when (not (file-exists-p directory)) (make-directory directory t) ! t)) (provide 'gnus-util) --- 540,546 ---- "Make DIRECTORY (and all its parents) if it doesn't exist." (when (not (file-exists-p directory)) (make-directory directory t) ! nil)) (provide 'gnus-util) -- Jeff Sparkes jsparkes@nortel.ca Nortel, Ottawa (613)765-2503 "Egad Brain, you astound me!" "I'm afraid I always will, Pinky." -- Jeff Sparkes jsparkes@nortel.ca Nortel, Ottawa, Ontario, Canada 613-765-2503