diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2020-02-13 23:58:02 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2020-02-13 23:58:02 +0100 |
| commit | 4773f0ca11e4a1369f168a99f6bd1d09aa6f6087 (patch) | |
| tree | ec35e8d1c6c672749eddd0bb49d787392f77d5a5 /module | |
| parent | Hopefully fixed date+ bugs. (diff) | |
| download | calp-4773f0ca11e4a1369f168a99f6bd1d09aa6f6087.tar.gz calp-4773f0ca11e4a1369f168a99f6bd1d09aa6f6087.tar.xz | |
Add missing hour to time->decimal-hour.
Diffstat (limited to 'module')
| -rw-r--r-- | module/output/html.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index cf70b583..46abfdb6 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -62,7 +62,8 @@ ;; For that see @var{date->decimal-hour}. ;; NOTE Above comment probably deprecated (define (time->decimal-hour time) - (exact->inexact (+ (/ (minute time) 60) + (exact->inexact (+ (hour time) + (/ (minute time) 60) (/ (second time) 3600)))) (define (html-attr str) |