bkuhn/small-hacks
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Don't put $ago setting in cached output.

Browse source 
That changes ever time.

Also, increase time.
This commit is contained in:
Bradley M. Kuhn 2015-09-08 10:10:11 -07:00
parent c2bbeaf556
commit 4a66d940c9
1 changed files with 3 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
urgent-mail-check.plx
View file

@ -141,14 +141,13 @@ foreach my $summary (@{$summaries}) {
$ago = "" if not defined $ago;
$subject =~ s/^\s*Re\s*:\s*//i;
my $record = "$ago ago from $who about $subject";
$output .= "\${font Inconsolata:size=13}$record\n";
my $record = "$who about $subject";
$output .= "\${font Inconsolata:size=13}$ago ago from $record\n";
my $alreadyDone = 0;
foreach my $key (keys %$info) {
print "Testing: \"$key\": \"$info->{$key}\" vs \"$record\"\n";
$alreadyDone = (($info->{$key} eq $record) and
(Delta_Format(DateCalc($key, $now), 0, "%mt") < 7200));
(Delta_Format(DateCalc($key, $now), 0, "%mt") < 14400));
last if $alreadyDone;
}
unless ($alreadyDone) {