head	1.3;
access;
symbols
	pkgsrc-2026Q1:1.3.0.48
	pkgsrc-2026Q1-base:1.3
	pkgsrc-2025Q4:1.3.0.46
	pkgsrc-2025Q4-base:1.3
	pkgsrc-2025Q3:1.3.0.44
	pkgsrc-2025Q3-base:1.3
	pkgsrc-2025Q2:1.3.0.42
	pkgsrc-2025Q2-base:1.3
	pkgsrc-2025Q1:1.3.0.40
	pkgsrc-2025Q1-base:1.3
	pkgsrc-2024Q4:1.3.0.38
	pkgsrc-2024Q4-base:1.3
	pkgsrc-2024Q3:1.3.0.36
	pkgsrc-2024Q3-base:1.3
	pkgsrc-2024Q2:1.3.0.34
	pkgsrc-2024Q2-base:1.3
	pkgsrc-2024Q1:1.3.0.32
	pkgsrc-2024Q1-base:1.3
	pkgsrc-2023Q4:1.3.0.30
	pkgsrc-2023Q4-base:1.3
	pkgsrc-2023Q3:1.3.0.28
	pkgsrc-2023Q3-base:1.3
	pkgsrc-2023Q2:1.3.0.26
	pkgsrc-2023Q2-base:1.3
	pkgsrc-2023Q1:1.3.0.24
	pkgsrc-2023Q1-base:1.3
	pkgsrc-2022Q4:1.3.0.22
	pkgsrc-2022Q4-base:1.3
	pkgsrc-2022Q3:1.3.0.20
	pkgsrc-2022Q3-base:1.3
	pkgsrc-2022Q2:1.3.0.18
	pkgsrc-2022Q2-base:1.3
	pkgsrc-2022Q1:1.3.0.16
	pkgsrc-2022Q1-base:1.3
	pkgsrc-2021Q4:1.3.0.14
	pkgsrc-2021Q4-base:1.3
	pkgsrc-2021Q3:1.3.0.12
	pkgsrc-2021Q3-base:1.3
	pkgsrc-2021Q2:1.3.0.10
	pkgsrc-2021Q2-base:1.3
	pkgsrc-2021Q1:1.3.0.8
	pkgsrc-2021Q1-base:1.3
	pkgsrc-2020Q4:1.3.0.6
	pkgsrc-2020Q4-base:1.3
	pkgsrc-2020Q3:1.3.0.4
	pkgsrc-2020Q3-base:1.3
	pkgsrc-2020Q2:1.3.0.2
	pkgsrc-2020Q2-base:1.3
	pkgsrc-2013Q2:1.2.0.2
	pkgsrc-2013Q2-base:1.2;
locks; strict;
comment	@# @;


1.3
date	2020.06.21.07.35.25;	author mef;	state Exp;
branches;
next	1.2;
commitid	147GqVBtj5m7Z3dC;

1.2
date	2013.06.16.01.00.54;	author mef;	state dead;
branches;
next	1.1;
commitid	33G0RoHkpvJe9MTw;

1.1
date	2013.06.16.00.56.44;	author mef;	state Exp;
branches;
next	;
commitid	FnwjYAXXaeF36MTw;


desc
@@


1.3
log
@(mail/mailagent) Fix -> $* is no longer supported, I am not sure,sorry
@
text
@$NetBSD$

$* is no longer supported as of Perl 5.30 at ../bin/perload line 463.

--- bin/perload.orig	2020-06-21 07:22:20.380448528 +0000
+++ bin/perload
@@@@ -460,8 +460,7 @@@@ sub flush_comment {
 
 sub q {
 	local($_) = @@_;
-	local($*) = 1;
-	s/^://g;
+	s/^://mg;
 	$_;
 }
 
@


1.2
log
@Sorry another fix was already made. Revert (remove) patches.
Thanks obache@@.
@
text
@d1 1
a1 1
$NetBSD: patch-bin_perload,v 1.1 2013/06/16 00:56:44 mef Exp $
d3 1
a3 7
Extracting agent/magent (with variable substitutions)
perl ../bin/perload -o magent > mailagent
$* is no longer supported at ../bin/perload line 463.
Can't locate getopt.pl in @@INC (@@INC contains:
....
.) at ../bin/perload line 40.
 *** Error code 2
d5 3
a7 5
--- bin/perload.orig	2001-03-18 03:31:36.000000000 +0900
+++ bin/perload	2013-06-15 12:18:17.000000000 +0900
@@@@ -37,8 +37,8 @@@@ $current_package = 'main';		# Current pa
 $init_emitted = 0;				# True when dataloading stamp was emitted
 $in_function = 0;
d9 7
a15 4
-require 'getopt.pl';
-&Getopt;
+use Getopt::Std;
+getopt();
a16 2
 while (<>) {
 	if ($. == 1 && /^(:|#).*perl/) {	# Invocation stub
@


1.1
log
@Fix problems with recent perl as:
Can't locate getopt.pl in @@INC (@@INC contains:...
by adding two patches.
  patches/patch-agent_test_TEST
  patches/patch-bin_perload

See the thread starting with:
| To: tech-pkg@@NetBSD.org
| Subject: broken packages for 2013q2
| From: David Holland <dholland-pkgtech@@NetBSD.org>
| Date: Wed, 12 Jun 2013 04:02:11 +0000
  or
http://mail-index.netbsd.org/tech-pkg/2013/06/12/msg011548.html
@
text
@d1 1
a1 1
$NetBSD$
@