anchor.diff:  (defparameter +port+ 8090)
   
   (defparameter *html* nil)
  +
  +(defparameter *user* nil "The logged user")
  +
  +(eval-when (:compile-toplevel :load-toplevel :execute)
  +  (defmacro with-html (&body body)
  +    `(who:with-html-output (*html*)
  +       ,@body))
  +
  +  (defmacro with-frontend-common (&body body)
  +    `(call-with-frontend-common (lambda () (with-html ,@body)))))
   
   (defun start (&optional (host +host+) (port +port+))
     (model::connect-db)
  
positive.code: 		 (:input :name "realname" :class "form-control" :type "text" :placeholader "Enter realname"))
  	   (:div :class "form-group"
  		 (:input :type "submit" :value "Register")))))
  
  (restas:define-route register-handler ("/register")
      (let ((username (hunchentoot:post-parameter "username"))
  
negative.code: 	       :src "/static/bower_components/jquery/dist/jquery.min.js")
        (:script :type "javascript" :src "/static/bower_components/bootstrap/dist/js/bootstrap.min.js"))
       (:body
        (navbar)
        (funcall function)))))
  
  (restas:define-route main ("")
    (with-frontend-common
      ))
  
  (restas:define-route registration-handler ("/registration")
    (with-frontend-common
  