Browse Source

fix cl-ppcre import statement in view.lisp and rename articles-make.

I had a typo in the import statement which meant I could not quickload
rails-to-caveman. The articles-make function rename is, also, a typo.
master
Craig Oates 2 years ago
parent
commit
aabc92196b
  1. 4
      src/view.lisp
  2. 2
      src/web.lisp

4
src/view.lisp

@ -47,7 +47,7 @@
(:import-from #:caveman2
#:url-for)
(:import-from #:cl-ppcre
#:regexp-replace-all)
#:regex-replace-all)
(:export #:title! ; Added in Chapter 3 (Mockup section).
#:date-options
))
@ -82,7 +82,7 @@
(djula::def-filter :simple-format (it)
(with-output-to-string (s)
(3bmd:parse-string-and-print-to-stream
(ppcre:regex-replace-all #\newline it "<br>") s)))
(cl-ppcre:regex-replace-all #\newline it "<br>") s)))
#| LACK OF 'DJULA' DOES NOT MEAN IT IS NOT PART OF IT (date-options)
====================================================================

2
src/web.lisp

@ -929,7 +929,7 @@ nil "/users/~D"(mito:object-id user))))))))
time
:format '((:year 4)"-"(:month 2)"-"(:day 2))))
(defun articles (n &key (logged-in-p (hermetic:logged-in-p))
(defun articles-make (n &key (logged-in-p (hermetic:logged-in-p))
(user(and logged-in-p (current-user))))
(if logged-in-p
(if (rails-to-caveman.model::administrator-of user)

Loading…
Cancel
Save