[Defeditor-cvs] CVS update: DefEditor/website/website.lisp - defeditor-cvs@common-lisp.net - mailman3.common-lisp.net

16 Feb 2004

Update of /project/defeditor/cvsroot/DefEditor/website
In directory common-lisp.net:/tmp/cvs-serv5756
Modified Files:
    website.lisp 
Log Message:
oops, fix cvsroot for code file links
Date: Mon Feb 16 00:48:24 2004
Author: rjain
Index: DefEditor/website/website.lisp
diff -u DefEditor/website/website.lisp:1.1 DefEditor/website/website.lisp:1.2

--- DefEditor/website/website.lisp:1.1	Mon Feb 16 00:46:27 2004
+++ DefEditor/website/website.lisp	Mon Feb 16 00:48:23 2004
@@ -10,7 +10,7 @@
 (defabbreviation DefEditor (doc italic () "Def") (doc small-caps () "Editor"))
(defun gen-src-link (target)
-  (concatenate 'string "/cgi-bin/viewcvs.cgi/DefEditor/src" target "?cvsroot=defdoc"
+  (concatenate 'string "/cgi-bin/viewcvs.cgi/DefEditor/src" target "?cvsroot=defeditor"
                (unless (eql (aref target (1- (length target))) #/)
                  "&rev=HEAD&content-type=text/vnd.viewcvs-markup")))

    