[claw-cvs] r137 - trunk/main/claw-demo/src/frontend/components

Andrea Chiumenti achiumenti at common-lisp.net
Wed Nov 12 07:46:02 UTC 2008


Author: achiumenti
Date: Wed Nov 12 07:46:02 2008
New Revision: 137

Log:
corrected wrong link

Modified:
   trunk/main/claw-demo/src/frontend/components/site-template.lisp

Modified: trunk/main/claw-demo/src/frontend/components/site-template.lisp
==============================================================================
--- trunk/main/claw-demo/src/frontend/components/site-template.lisp	(original)
+++ trunk/main/claw-demo/src/frontend/components/site-template.lisp	Wed Nov 12 07:46:02 2008
@@ -57,7 +57,7 @@
                           (djdrop-down-button> (span> "File")
                                                (djmenu>
                                                 (djmenu-item> :id "homeMenu"
-                                                              :on-click (ps:ps* `(location.replace ,(format nil "~a/home.html" *root-path*)))
+                                                              :on-click (ps:ps* `(location.replace ,(format nil "~a/index.html" *root-path*)))
                                                               "Home")
                                                 (djmenu-item> :id "loginMenu"
                                                               :render-condition #'(lambda () (null principal))




More information about the Claw-cvs mailing list