[Date Prev][Date Next][Thread Prev][Thread Next][Minivend by date
][Minivend by thread
]
Re: [mv] db-date MV4!
****** message to minivend-users from "Bill Randle" <billr@exgate.tek.com> ******
Joachim,
There's another typo in the db_date usertag. Here's the full diff:
titan:~/mvend4/usertag% diff -u db_date.orig db_date
--- db_date.orig Fri Mar 10 17:48:39 2000
+++ db_date Wed Mar 15 08:21:33 2000
@@ -8,12 +8,12 @@
UserTag db-date PosNumber 2
UserTag db-date Routine <<EOF
sub {
- my ($format, $db) = @_;
+ my ($db, $format) = @_;
$format = '%A %d %b %Y' unless $format;
$db = 'products' unless $db;
- my $mtime = (stat($Vend::Cfg->{Database}{'db_file'}))[9];
+ my $mtime = (stat($Vend::Cfg->{Database}{$db}{'db_file'}))[9];
return POSIX::strftime($format, localtime($mtime));
}
-Bill
-
To unsubscribe from the list, DO NOT REPLY to this message. Instead, send
email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
Archive of past messages: http://www.minivend.com/minivend/minivend-list
