Loading .gitignore +1 −0 Original line number Diff line number Diff line *~ *.html *.fasl *.dx64fsl system-index.txt No newline at end of file source/base-page.gdl +4 −3 Original line number Diff line number Diff line Loading @@ -32,10 +32,11 @@ ((:div :id "sidebar") (:h2 "Navigation") (dolist (page (the pages)) (htm ((:a :href (theo page url)) (str (theo page strings-for-display))) :br))))) (htm ((:a :href (theo page url)) (str (theo page strings-for-display))) :br)))) ((:div :class "col-md-9") ;; Main content section (different for each page). (str (the main-content)))) (str (the main-content)))))) (main-content (with-cl-who-string () "Empty main-content-section.")))) Loading Loading
.gitignore +1 −0 Original line number Diff line number Diff line *~ *.html *.fasl *.dx64fsl system-index.txt No newline at end of file
source/base-page.gdl +4 −3 Original line number Diff line number Diff line Loading @@ -32,10 +32,11 @@ ((:div :id "sidebar") (:h2 "Navigation") (dolist (page (the pages)) (htm ((:a :href (theo page url)) (str (theo page strings-for-display))) :br))))) (htm ((:a :href (theo page url)) (str (theo page strings-for-display))) :br)))) ((:div :class "col-md-9") ;; Main content section (different for each page). (str (the main-content)))) (str (the main-content)))))) (main-content (with-cl-who-string () "Empty main-content-section.")))) Loading