aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/licentia/license/notice.lux
diff options
context:
space:
mode:
authorEduardo Julian2019-06-20 22:32:59 -0400
committerEduardo Julian2019-06-20 22:32:59 -0400
commitb71b861008381626633bf28b033cd866d7e4e0b7 (patch)
tree3ee21cd21e6dd80f6fcdf90173bbd6162b616d8f /stdlib/source/program/licentia/license/notice.lux
parentfcee38da766a683ed5569978be153c6e7a8ae0af (diff)
Improved the convention for using text formatters.
Diffstat (limited to 'stdlib/source/program/licentia/license/notice.lux')
-rw-r--r--stdlib/source/program/licentia/license/notice.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/program/licentia/license/notice.lux b/stdlib/source/program/licentia/license/notice.lux
index 7e775078c..947669035 100644
--- a/stdlib/source/program/licentia/license/notice.lux
+++ b/stdlib/source/program/licentia/license/notice.lux
@@ -2,7 +2,7 @@
[lux #*
[data
["." text
- format]
+ ["%" format (#+ format)]]
[collection
["." list ("#;." functor)]]]]
["." // #_
@@ -20,8 +20,8 @@
(let [(^slots [#//time.start #//time.end]) (get@ #//copyright.period holder)
single-year? (n/= start end)
period-section (if single-year?
- (%n start)
- (format (%n start) "-" (%n end)))]
+ (%.nat start)
+ (format (%.nat start) "-" (%.nat end)))]
(format "Copyright (C) " period-section " " (get@ #//copyright.name holder))))
(def: #export copyright