Skip to content
Snippets Groups Projects
Commit 01274f39 authored by rtoy's avatar rtoy
Browse files

code/filesys.lisp:

o FILE-WRITE-DATE merges the filename with
  *DEFAULT-PATHNAME-DEFAULTS*, as required by CLHS sec 19.2.3.

general-info/release-20b.txt:
o Update.
parent c5eff503
No related branches found
No related tags found
No related merge requests found
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;; ;;;
(ext:file-comment (ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/filesys.lisp,v 1.111 2010/06/07 22:10:11 rtoy Exp $") "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/filesys.lisp,v 1.112 2010/06/07 22:52:17 rtoy Rel $")
;;; ;;;
;;; ********************************************************************** ;;; **********************************************************************
;;; ;;;
...@@ -1035,7 +1035,7 @@ optionally keeping some of the most recent old versions." ...@@ -1035,7 +1035,7 @@ optionally keeping some of the most recent old versions."
(error 'simple-file-error (error 'simple-file-error
:pathname file :pathname file
:format-control (intl:gettext "Bad place for a wild pathname.")) :format-control (intl:gettext "Bad place for a wild pathname."))
(let ((name (unix-namestring file t))) (let ((name (unix-namestring (merge-pathnames file) t)))
(when name (when name
(multiple-value-bind (multiple-value-bind
(res dev ino mode nlink uid gid rdev size atime mtime) (res dev ino mode nlink uid gid rdev size atime mtime)
......
...@@ -77,9 +77,9 @@ New in this release: ...@@ -77,9 +77,9 @@ New in this release:
- DEFINE-COMPILER-MACRO no longer sets the wrong block name for - DEFINE-COMPILER-MACRO no longer sets the wrong block name for
SETF functions. We also check that the name is a valid function SETF functions. We also check that the name is a valid function
name; an error is signaled if it's invalid. name; an error is signaled if it's invalid.
- DELETE-FILE, ENSURE-DIRECTORIES-EXIST, FILE-AUTHOR, and OPEN now - DELETE-FILE, ENSURE-DIRECTORIES-EXIST, FILE-AUTHOR,
merge the given pathname with *DEFAULT-PATHNAME-DEFAULTS* as FILE-WRITE-DATE, and OPEN now merge the given pathname with
required by CLHS sec 19.2.3. *DEFAULT-PATHNAME-DEFAULTS* as required by CLHS sec 19.2.3.
* Bugfixes: * Bugfixes:
- On Unicode builds, printing of '|\|| and '|`| was incorrect - On Unicode builds, printing of '|\|| and '|`| was incorrect
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment