diff options
author | Eduardo Julian | 2019-07-26 21:23:27 -0400 |
---|---|---|
committer | Eduardo Julian | 2019-07-26 21:23:27 -0400 |
commit | a0889b2ee76c1ae7a9a5bbe2eec9f051b4f341e4 (patch) | |
tree | 08df3db7f8fffad6360a476d20db1d40b36c85cb /stdlib/source/program/licentia/license | |
parent | 78fd01f7e6688448bbd710336d4d7b1c35ae058a (diff) |
No more "n/"-prefixed functions.
Diffstat (limited to 'stdlib/source/program/licentia/license')
-rw-r--r-- | stdlib/source/program/licentia/license/notice.lux | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/stdlib/source/program/licentia/license/notice.lux b/stdlib/source/program/licentia/license/notice.lux index 947669035..d4df7d166 100644 --- a/stdlib/source/program/licentia/license/notice.lux +++ b/stdlib/source/program/licentia/license/notice.lux @@ -1,6 +1,8 @@ (.module: [lux #* [data + [number + ["n" nat]] ["." text ["%" format (#+ format)]] [collection @@ -18,7 +20,7 @@ (def: #export (copyright-holder holder) (-> //copyright.Holder Text) (let [(^slots [#//time.start #//time.end]) (get@ #//copyright.period holder) - single-year? (n/= start end) + single-year? (n.= start end) period-section (if single-year? (%.nat start) (format (%.nat start) "-" (%.nat end)))] |