Commit fe815ae335894af6171288bbed408854501408d2
2019-10-14T19:38:28
update skel
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126
diff --git a/skel/app/assets/css/app.css b/skel/app/assets/css/app.css
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/skel/app/assets/css/app.css
diff --git a/skel/app/assets/js/app.js b/skel/app/assets/js/app.js
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/skel/app/assets/js/app.js
diff --git a/skel/app/controllers/application_controller.lisp b/skel/app/controllers/application_controller.lisp
new file mode 100644
index 0000000..a45f0bd
--- /dev/null
+++ b/skel/app/controllers/application_controller.lisp
@@ -0,0 +1,5 @@
+;; This is a controller, define functions and route to them in config/routes.lisp
+
+(defun /home ()
+ (template-let ((title "@{NAME}"))
+ (render-view :home :index '.html)))
diff --git a/skel/app/views/_layouts/main.html b/skel/app/views/_layouts/main.html
new file mode 100644
index 0000000..eb1124b
--- /dev/null
+++ b/skel/app/views/_layouts/main.html
@@ -0,0 +1,43 @@
+<!doctype html>
+<!--[if lt IE 7 ]>
+<html lang="en" class="no-js ie6"> <![endif]-->
+<!--[if IE 7 ]>
+<html lang="en" class="no-js ie7"> <![endif]-->
+<!--[if IE 8 ]>
+<html lang="en" class="no-js ie8"> <![endif]-->
+<!--[if IE 9 ]>
+<html lang="en" class="no-js ie9"> <![endif]-->
+<!--[if (gt IE 9)|!(IE)]><!-->
+<html lang="fr" class="no-js"><!--<![endif]-->
+ <head>
+ <meta charset="utf-8"/>
+ <meta name="viewport" content="width=device-width, initial-scale=1.0">
+ <meta http-equiv="X-UA-Compatible" content="IE=edge,chrome=1"/>
+ <title>«=(h $title)»</title>
+ « (dolist (meta $meta)
+ (destructuring-bind (name content) meta »
+ <meta name="«=(h name)»" content="«=(h content)»"/>
+ « )) »
+ « (when $favicon »
+ <link rel="shortcut icon" href="«=(h $favicon)»"/>
+ « ) »
+ « (print-asset-tag "app.css") »
+ </head>
+ <body class="«=(h $controller)» «=(h $controller)»--«=(h $action)»">
+
+ <div id="messages" class="container">
+ « (dolist (flash $flash) »
+ « (destructuring-bind (level message) flash »
+ <div class="alert alert-«=(h level)»">
+ «=(h message)»
+ </div>
+ « )) »
+ </div>
+
+ <div id="body" class="container">
+ « (when $template (print-template $template)) »
+ </div>
+
+ « (print-asset-tag "app.js") »
+ </body>
+</html>
diff --git a/skel/app/views/home/index.html b/skel/app/views/home/index.html
new file mode 100644
index 0000000..d43cad1
--- /dev/null
+++ b/skel/app/views/home/index.html
@@ -0,0 +1,2 @@
+<h1>@{NAME}</h1>
+Welcome to @{NAME} !
diff --git a/skel/config/app.lisp b/skel/config/app.lisp
index 3ba1c6b..a186299 100644
--- a/skel/config/app.lisp
+++ b/skel/config/app.lisp
@@ -1,36 +1,18 @@
(setf *layout* :main)
-(setf *port* 4207)
+(setf *port* 4000)
(setf *session-timeout* (* 3600 24 7))
-(setf *smtp-server* "smtp.kmx.io")
-(setf *smtp-user* "noreply@kmx.io")
-(setf *smtp-password* "V7IwjWwLHOjRqemc")
-(setf facts:*db-path* #P"data/mentats")
+(setf facts:*db-path* #P"data/@{NAME}")
(define-template-var title
- "Mentats")
-
-(define-template-var nav
- '("<li><a href=\"/competence\">Compétences</a></li>"
- "<li><a href=\"/blog\">Blog</a></li>"))
-
-(define-template-var nav-right
- '())
-
-(define-template-var classroom nil)
-(define-template-var token nil)
+ "@{NAME}")
(require :re)
(use-package :re)
-(require :can)
-(require :gravatar)
-(require :rw-ut)
-
(cl-json:set-decoder-simple-clos-semantics)
(defun setup-environment (env)
(log-msg :INFO "setup environment ~A" (string-downcase env))
- (can:compile-rules)
(case env
((:development)
#+swank
diff --git a/skel/public/favicon.ico b/skel/public/favicon.ico
new file mode 100644
index 0000000..2ca3afb
Binary files /dev/null and b/skel/public/favicon.ico differ