projects
/
infodrom.org
/
service.infodrom.org
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
81ffc3f
)
Only display current customers
author
Joey Schulze
<joey@infodrom.org>
Mon, 12 Nov 2012 20:26:41 +0000
(20:26 +0000)
committer
Joey Schulze
<joey@infodrom.org>
Mon, 12 Nov 2012 20:26:41 +0000
(20:26 +0000)
src/InfoCon/stempel/stempel
patch
|
blob
|
history
diff --git
a/src/InfoCon/stempel/stempel
b/src/InfoCon/stempel/stempel
index
6d316ee
..
8754200
100755
(executable)
--- a/
src/InfoCon/stempel/stempel
+++ b/
src/InfoCon/stempel/stempel
@@
-57,7
+57,7
@@
sub customerlist
{
my @res;
{
my @res;
- my $query = q{SELECT DISTINCT customer FROM stempel ORDER BY customer};
+ my $query = q{SELECT DISTINCT customer FROM stempel
WHERE start > now() - interval '1 year'
ORDER BY customer};
my $sth = $dbh->prepare ($query);
if ($sth && $sth->execute > 0) {
while ((my $row = $sth->fetchrow_hashref)) {
my $sth = $dbh->prepare ($query);
if ($sth && $sth->execute > 0) {
while ((my $row = $sth->fetchrow_hashref)) {