Fixed decrement-underflow occurring when editing the first ever message.

This commit is contained in:
Fang 2017-11-07 17:05:51 +01:00
parent 0f276a5e4a
commit f045a1035b

View File

@ -1515,7 +1515,7 @@
:: changed message
%_ +>.$
grams %+ welp
(scag (dec u.old) grams)
(scag (dec (max u.old 1)) grams)
[gam (slag u.old grams)]
==
::