projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 2505 - Add commented use warnings where missing in the misc/ directory
[koha.git]
/
misc
/
cronjobs
/
notifyMailsOp.pl
diff --git
a/misc/cronjobs/notifyMailsOp.pl
b/misc/cronjobs/notifyMailsOp.pl
index
4b8c4a4
..
630b159
100755
(executable)
--- a/
misc/cronjobs/notifyMailsOp.pl
+++ b/
misc/cronjobs/notifyMailsOp.pl
@@
-1,9
+1,17
@@
+#!/usr/bin/perl
use strict;
use strict;
+#use warnings; FIXME - Bug 2505
+BEGIN {
+ # find Koha's Perl modules
+ # test carefully before changing this
+ use FindBin;
+ eval { require "$FindBin::Bin/../kohalib.pl" };
+}
use C4::Context;
use C4::Context;
-use C4::Date;
+use C4::Date
s qw/format_date/
;
use Mail::Sendmail; # comment out if not doing e-mail notices
use Getopt::Long;
use Mail::Sendmail; # comment out if not doing e-mail notices
use Getopt::Long;
-use C4::Circulation
::Circ2
;
+use C4::Circulation;
# use C4::Members;
# this module will notify only the mail case
# Now it's only programmed for ouest provence, you can modify it for yourself
# use C4::Members;
# this module will notify only the mail case
# Now it's only programmed for ouest provence, you can modify it for yourself
@@
-41,8
+49,6
@@
sub GetBorrowerNotifys{
AND
(notifys.borrowernumber=issues.borrowernumber AND notifys.itemnumber=issues.itemnumber)
AND
AND
(notifys.borrowernumber=issues.borrowernumber AND notifys.itemnumber=issues.itemnumber)
AND
- issues.returndate IS NULL
- AND
notifys.borrowernumber=?
AND notify_send_date IS NULL");
$sth2->execute($borrowernumber);
notifys.borrowernumber=?
AND notify_send_date IS NULL");
$sth2->execute($borrowernumber);
@@
-204,7
+210,7
@@
foreach my $num (@getnofifys) {
# now deal with the debarred mode
# if ($debarred eq 1) {
# now deal with the debarred mode
# if ($debarred eq 1) {
-#
à
ajouter : si le lecteur est en mode debarred, ajouter la fonction qui nous permettra cela
+#
�
ajouter : si le lecteur est en mode debarred, ajouter la fonction qui nous permettra cela
# UpdateBorrowerDebarred($num->{'borrowernumber'});
# }
close(OUT);
# UpdateBorrowerDebarred($num->{'borrowernumber'});
# }
close(OUT);