projects
/
infodrom.org
/
service.infodrom.org
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Allow negative times
[infodrom.org/service.infodrom.org]
/
src
/
InfoCon
/
stempel
/
stempel
diff --git
a/src/InfoCon/stempel/stempel
b/src/InfoCon/stempel/stempel
index
d851455
..
9c1c92f
100755
(executable)
--- a/
src/InfoCon/stempel/stempel
+++ b/
src/InfoCon/stempel/stempel
@@
-144,7
+144,7
@@
sub quarter
{
my $min = shift;
- return 15 if $min < 15;
+ return 15 if $min
> 0 && $min
< 15;
return $min - $min%15 if ($min%15 < 3);