Skip to content

Commit

Permalink
Set version 1.0 for asdf and stop resizing blog titles
Browse files Browse the repository at this point in the history
  • Loading branch information
vii committed Mar 13, 2014
1 parent dfc0b92 commit 438e792
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 8 deletions.
9 changes: 1 addition & 8 deletions src/blog/entry.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -156,14 +156,7 @@

(my-defun entry headline-ml (score-mul)
(<div :class "blog-front-page-entry"
:style
(css-attrib
:max-width ((format nil "~$%" (* 100 (min 0.5 (max 0.2 (* 1/5 score-mul (my score)))))))
:width "auto")
(<h2 :style
(css-attrib
:font-size ((format nil "~$em" (min 2.5 (max 1.2 (* 1.6 score-mul (my score)))))))
(<a :href (my url-path) (my title)))
(<h2 (<a :href (my url-path) (my title)))
(<p :class "time" "Posted " (friendly-age-string (my time)) " ago"
(when (my comments)
(with-ml-output ", last comment " (friendly-age-string (comment-time (first (my comments)))) " ago")))))
Expand Down
1 change: 1 addition & 0 deletions teepeedee2.asd
Original file line number Diff line number Diff line change
Expand Up @@ -20,6 +20,7 @@
:name "teepeedee2"
:author "John Fremlin <[email protected]>"
:description "Multiprotocol fast networking framework"
:version "1.0"

:components (
(:module :src
Expand Down

0 comments on commit 438e792

Please sign in to comment.