aboutsummaryrefslogtreecommitdiff
path: root/sysutils
diff options
context:
space:
mode:
authorJun Kuriyama <kuriyama@FreeBSD.org>2002-05-14 09:18:22 +0000
committerJun Kuriyama <kuriyama@FreeBSD.org>2002-05-14 09:18:22 +0000
commit28b827b2a0f37a2ba833e044922a06ee556b84dc (patch)
tree813bea8bfafb587303216e6cb2eefa568c832fcb /sysutils
parent7c3e878e0950fde0fc907dbf9d501364ad143b18 (diff)
downloadports-28b827b2a0f37a2ba833e044922a06ee556b84dc.tar.gz
ports-28b827b2a0f37a2ba833e044922a06ee556b84dc.zip
Return 1 when Schedule::At::add() is used by denied (by /var/at/at.deny)
user. Pointed out by: hanai
Notes
Notes: svn path=/head/; revision=59073
Diffstat (limited to 'sysutils')
-rw-r--r--sysutils/p5-Schedule-At/Makefile1
-rw-r--r--sysutils/p5-Schedule-At/files/patch-At.pm14
2 files changed, 12 insertions, 3 deletions
diff --git a/sysutils/p5-Schedule-At/Makefile b/sysutils/p5-Schedule-At/Makefile
index 776f5712d3cd..59fe4efbdc5d 100644
--- a/sysutils/p5-Schedule-At/Makefile
+++ b/sysutils/p5-Schedule-At/Makefile
@@ -7,6 +7,7 @@
PORTNAME= Schedule-At
PORTVERSION= 1.03
+PORTREVISION= 1
CATEGORIES= sysutils perl5
MASTER_SITES= ${MASTER_SITE_PERL_CPAN}
MASTER_SITE_SUBDIR= Schedule
diff --git a/sysutils/p5-Schedule-At/files/patch-At.pm b/sysutils/p5-Schedule-At/files/patch-At.pm
index 4d5f48a926f5..64ca9761c716 100644
--- a/sysutils/p5-Schedule-At/files/patch-At.pm
+++ b/sysutils/p5-Schedule-At/files/patch-At.pm
@@ -1,6 +1,14 @@
--- At.pm.orig Mon Mar 25 20:52:01 2002
-+++ At.pm Tue May 14 17:17:41 2002
-@@ -258,6 +258,7 @@
++++ At.pm Tue May 14 18:15:55 2002
+@@ -55,6 +55,7 @@
+ print ATCMD "$TAGID$params{TAG}\n" if $params{TAG};
+ print ATCMD $params{COMMAND};
+ close (ATCMD);
++ return 1 if ($?);
+ }
+
+ 0;
+@@ -258,6 +259,7 @@
Jose A. Rodriguez (josear@ac.upc.es)
=cut
@@ -8,7 +16,7 @@
###############################################################################
# OS dependent code
-@@ -327,6 +328,25 @@
+@@ -327,6 +329,25 @@
my @fields = split("\t", $_[0]);
($fields[0], substr($fields[1], 0, 16))
};