[Wisp-cvs] wisp wisplint.wisp,1.16,1.17

[<di...@us...>]

Update of /cvsroot/wisp/wisp
In directory usw-pr-cvs1:/tmp/cvs-serv4997

Modified Files:
	wisplint.wisp 
Log Message:
Moved gray.cgi, names.cgi, show.cgi, and wisp.css from doc/examples to web .

Index: wisplint.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/wisplint.wisp,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- wisplint.wisp	31 Aug 2002 14:27:45 -0000	1.16
+++ wisplint.wisp	31 Aug 2002 14:29:37 -0000	1.17
@@ -89,8 +89,6 @@
                                        "doc/TODO"
                                        "doc/depends.txt"
                                        "doc/examples/embed.ewisp"
-                                       "doc/examples/gray.cgi"
-                                       "doc/examples/names.cgi"
                                        "doc/examples/quine.wisp"
                                        "doc/paw.txt"
                                        "doc/wisp.texi"
@@ -104,7 +102,10 @@
                                        "tests/cut-check.wisp"
                                        "tests/srfi-1.wisp"
                                        "tests/srfi-26.wisp"
-                                       "wa/README.wa")
+                                       "wa/README.wa"
+                                       "web/gray.cgi"
+                                       "web/index.html"
+                                       "web/names.cgi")
                                 string=?)))
             (begin
               (run check-for-gpl-notice name)
@@ -133,8 +134,6 @@
                                        "doc/TODO"
                                        "doc/depends.txt"
                                        "doc/examples/embed.ewisp"
-                                       "doc/examples/gray.cgi"
-                                       "doc/examples/names.cgi"
                                        "doc/examples/quine.wisp"
                                        "doc/wisp.texi"
                                        "install-sh"
@@ -185,6 +184,8 @@
                                             ".patchlog"
                                             "CVS")
                                      string=?)
+                             (string=? name[-4 ...] ".rej")
+                             (string=? name[-5 ...] ".orig")
                              (regex-match ignore name)))
                   (case (file-type n)
                     ((directory) (loop n))