Attachment #121353 for bug #164306

View | Details | Raw Unified | Return to bug 164306
Collapse All | Expand All

Lines 6-12 Link Here

(-)mailagent/Makefile (-2 / +8 lines)
6	#	6	#
7		7
8	PORTNAME= mailagent	8	PORTNAME= mailagent
9	PORTVERSION= 3.1.71	9	PORTVERSION= 3.1.77
10	CATEGORIES= mail	10	CATEGORIES= mail
11	MASTER_SITES= http://eron.info/	11	MASTER_SITES= http://eron.info/
12		12
Lines 34-39 Link Here
34	MLINKS= mailhelp.1 maildist.1 mailhelp.1 mailpatch.1 \	34	MLINKS= mailhelp.1 maildist.1 mailhelp.1 mailpatch.1 \
35	mailhelp.1 maillist.1	35	mailhelp.1 maillist.1
36		36
		37	.include <bsd.port.pre.mk>
		38	.if ${OSVERSION} > 900006
		39	EXTRA_PATCHES= ${PATCHDIR}/utmpx-agent::pl::utmp::utmp.pl \
		40	${PATCHDIR}/utmpx-agent::pl::utmp::Makefile.SH
		41	.endif
		42
37	pre-extract:	43	pre-extract:
38	@if [ `${SH} -c umask` != 0022 ]; then \	44	@if [ `${SH} -c umask` != 0022 ]; then \
39	${ECHO} "Please set umask to 022 before running make,"; \	45	${ECHO} "Please set umask to 022 before running make,"; \
Lines 58-61 Link Here
58	${CP} -pR ${WRKSRC}/misc/* ${EXAMPLESDIR}/misc	64	${CP} -pR ${WRKSRC}/misc/* ${EXAMPLESDIR}/misc
59	@${LN} -fs ${PREFIX}/lib/mailagent/examples ${EXAMPLESDIR}/agent	65	@${LN} -fs ${PREFIX}/lib/mailagent/examples ${EXAMPLESDIR}/agent
60		66
61	.include <bsd.port.mk>	67	.include <bsd.port.post.mk>

Lines 1-2 Link Here

(-)mailagent/distinfo (-2 / +2 lines)
1	SHA256 (mailagent-3.1.71.tar.bz2) = 4785a018797d4405f8708ba59197f249f77cd4f22f87b086c04c7226cb64ebdb	1	SHA256 (mailagent-3.1.77.tar.bz2) = 89d399ee9aa87399070309e18b1e4237edf62b345ee1d8061202913de8e027b3
2	SIZE (mailagent-3.1.71.tar.bz2) = 446820	2	SIZE (mailagent-3.1.77.tar.bz2) = 450202

Line 0 Link Here

(-)mailagent/files/utmpx-agent::pl::utmp::Makefile.SH (+20 lines)
	1	--- ../mailagent-3.1.77/agent/pl/utmp/Makefile.SH 2006-08-24 22:24:12.354556000 +0900
	2	+++ agent/pl/utmp/Makefile.SH 2012-01-19 17:37:50.697895588 +0900
	3	@@ -107,7 +107,6 @@
	4	cp Makefile.new Makefile
	5	$(RM) Makefile.new
	6
	7	-all:: utmp_ph
	8
	9	local_realclean::
	10	$(RM) utmp_ph
	11	@@ -122,8 +121,7 @@
	12	local_realclean::
	13	$(RM) utmp.pl
	14
	15	-utmp.pl: utmp_pl.sh utmp_ph
	16	- /bin/sh utmp_pl.sh
	17	+utmp.pl:
	18
	19	########################################################################
	20	# Common rules for all Makefiles -- do not edit




--- /dev/null	2012-01-19 17:47:14.000000000 +0900
+++ agent/pl/utmp/utmp.pl	2012-01-19 17:53:06.536872534 +0900
@@ -0,0 +1,22 @@
+#
+# utmp file primitives
+#
+
+package utmp;
+
+# Return the ttys on which a given user is logged
+sub ttys {
+	local($user) = @_;			# User's login name
+	local(@u);
+	open(WHO, '/usr/bin/who |') || warn "Can't invoke /usr/bin/who: $!\n";
+	while (<WHO>) {
+	    next unless /^$user\s/;
+	    my ($name, $line, $dummy) = split;
+	    push(@u, $line);
+	}
+	close WHO;     
+	return @u;		# Returns array of ttys
+}
+
+package main;
+

Return to bug 164306

Line 0 Link Here

(-)mailagent/files/utmpx-agent::pl::utmp::utmp.pl (+25 lines)
	1	--- /dev/null 2012-01-19 17:47:14.000000000 +0900
	2	+++ agent/pl/utmp/utmp.pl 2012-01-19 17:53:06.536872534 +0900
	3	@@ -0,0 +1,22 @@
	4	+#
	5	+# utmp file primitives
	6	+#
	7	+
	8	+package utmp;
	9	+
	10	+# Return the ttys on which a given user is logged
	11	+sub ttys {
	12	+ local($user) = @_; # User's login name
	13	+ local(@u);
	14	+ open(WHO, '/usr/bin/who \|') \|\| warn "Can't invoke /usr/bin/who: $!\n";
	15	+ while (<WHO>) {
	16	+ next unless /^$user\s/;
	17	+ my ($name, $line, $dummy) = split;
	18	+ push(@u, $line);
	19	+ }
	20	+ close WHO;
	21	+ return @u; # Returns array of ttys
	22	+}
	23	+
	24	+package main;
	25	+