X-Git-Url: https://git.hcoop.net/bpt/guile.git/blobdiff_plain/fcbf843f56bf894f4899d39d494a5046e4a8f597..e2e2631d7529842d3667573312c819cbeb7adc25:/module/ice-9/ftw.scm diff --git a/module/ice-9/ftw.scm b/module/ice-9/ftw.scm index 23f341521..e6ac0b462 100644 --- a/module/ice-9/ftw.scm +++ b/module/ice-9/ftw.scm @@ -1,11 +1,11 @@ -;;;; ftw.scm --- filesystem tree walk +;;;; ftw.scm --- file system tree walk ;;;; Copyright (C) 2002, 2003, 2006 Free Software Foundation, Inc. ;;;; ;;;; This library is free software; you can redistribute it and/or ;;;; modify it under the terms of the GNU Lesser General Public ;;;; License as published by the Free Software Foundation; either -;;;; version 2.1 of the License, or (at your option) any later version. +;;;; version 3 of the License, or (at your option) any later version. ;;;; ;;;; This library is distributed in the hope that it will be useful, ;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of @@ -104,7 +104,7 @@ ;; entered directory. ;; ;; * Procedure: (ftw filename proc . options) -;; Do a filesystem tree walk starting at FILENAME using PROC. +;; Do a file system tree walk starting at FILENAME using PROC. ;; ;; The `ftw' procedure calls the callback procedure given in the ;; parameter PROC for every item which is found in the directory @@ -140,7 +140,7 @@ ;; returned as the return value of `ftw'. ;; ;; * Procedure: (nftw filename proc . control-flags) -;; Do a new-style filesystem tree walk starting at FILENAME using PROC. +;; Do a new-style file system tree walk starting at FILENAME using PROC. ;; Various optional CONTROL-FLAGS alter the default behavior. ;; ;; The `nftw' procedures works like the `ftw' procedures. It calls @@ -165,7 +165,7 @@ ;; ;; mount' ;; The callback procedure is only called for items which are on -;; the same mounted filesystem as the directory given as the +;; the same mounted file system as the directory given as the ;; FILENAME parameter to `nftw'. ;; ;; chdir'