[osicat-cvs] CVS update: src/osicat.lisp src/packages.lisp

[Nikodemus Siivola]

Update of /project/osicat/cvsroot/src
In directory common-lisp.net:/tmp/cvs-serv19329

Modified Files:
	osicat.lisp packages.lisp 
Log Message:
 * Documentation fixes.

Date: Sun Feb 29 18:41:50 2004
Author: nsiivola

Index: src/osicat.lisp
diff -u src/osicat.lisp:1.15 src/osicat.lisp:1.16
--- src/osicat.lisp:1.15	Sun Feb 29 18:28:22 2004
+++ src/osicat.lisp	Sun Feb 29 18:41:50 2004
@@ -148,9 +148,7 @@
 (defmacro with-directory-iterator ((iterator pathspec) &body body)
   "macro WITH-DIRECTORY-ITERATOR (iterator pathspec) &body forms => value
 
-If pathspec is relative, it is resolved against *default-pathname-defaults*. 
-If the resulting pathname is still relative, it is further resolved against
-current directory. The resulting pathname is then bound to 
+The directory designated by pathspec is then bound to 
 *default-pathname-defaults* for the dynamic scope of the body.
 
 Within the lexical scope of the body, iterator is defined via macrolet
@@ -195,7 +193,9 @@
   "function MAPDIR function pathspec => list
 
 Applies function to each entry in directory designated by pathspec in
-turn and returns a list of the results.
+turn and returns a list of the results. Binds 
+*default-pathname-defaults* to the directory designated by pathspec
+round to function call.
 
 If pathspec designates a symbolic link, it is implicitly resolved.
 
@@ -354,9 +354,9 @@
 If pathspec designates a symbolic link, that link is implicitly
 resolved.
 
-Permission symbols consist of :USER-READ, :USER-WRITE, :USER-EXEC,
-:GROUP-READ, :GROUP-WRITE, :GROUP-EXEC, :OTHER-READ, :OTHER-WRITE,
-:OTHER-EXEC, :SET-USER-ID, :SET-GROUP-ID, and :STICKY.
+Permission symbols consist of :user-read, :user-write, :user-exec,
+:group-read, :group-write, :group-exec, :other-read, :other-write,
+:other-exec, :set-user-id, :set-group-id, and :sticky.
 
 Both signal an error is pathspec is wild, or doesn't designate an
 exiting file."


Index: src/packages.lisp
diff -u src/packages.lisp:1.4 src/packages.lisp:1.5
--- src/packages.lisp:1.4	Sun Feb 29 13:10:41 2004
+++ src/packages.lisp	Sun Feb 29 18:41:50 2004
@@ -26,7 +26,15 @@
 on Unix-platforms. It is not a POSIX-style API, but rather a simple
 lispy accompaniment to the standard ANSI facilities.
 
-Osicat homepage: http://www.common-lisp.net/project/osicat")
+Osicat homepage: http://www.common-lisp.net/project/osicat
+
+Concepts:
+
+ Designated directory
+
+  When a relative pathname designator is used as a directory designator
+  it is first resolved agains *default-pathname-default*, and the
+  against the current directory. (With MERGE-PATHNAMES in both cases.)")
   (:export
    ;;; Evironment
    #:environment