head	1.2;
access;
symbols
	pkgsrc-2020Q1:1.1.0.56
	pkgsrc-2020Q1-base:1.1
	pkgsrc-2019Q4:1.1.0.78
	pkgsrc-2019Q4-base:1.1
	pkgsrc-2019Q3:1.1.0.74
	pkgsrc-2019Q3-base:1.1
	pkgsrc-2019Q2:1.1.0.72
	pkgsrc-2019Q2-base:1.1
	pkgsrc-2019Q1:1.1.0.70
	pkgsrc-2019Q1-base:1.1
	pkgsrc-2018Q4:1.1.0.68
	pkgsrc-2018Q4-base:1.1
	pkgsrc-2018Q3:1.1.0.66
	pkgsrc-2018Q3-base:1.1
	pkgsrc-2018Q2:1.1.0.64
	pkgsrc-2018Q2-base:1.1
	pkgsrc-2018Q1:1.1.0.62
	pkgsrc-2018Q1-base:1.1
	pkgsrc-2017Q4:1.1.0.60
	pkgsrc-2017Q4-base:1.1
	pkgsrc-2017Q3:1.1.0.58
	pkgsrc-2017Q3-base:1.1
	pkgsrc-2017Q2:1.1.0.54
	pkgsrc-2017Q2-base:1.1
	pkgsrc-2017Q1:1.1.0.52
	pkgsrc-2017Q1-base:1.1
	pkgsrc-2016Q4:1.1.0.50
	pkgsrc-2016Q4-base:1.1
	pkgsrc-2016Q3:1.1.0.48
	pkgsrc-2016Q3-base:1.1
	pkgsrc-2016Q2:1.1.0.46
	pkgsrc-2016Q2-base:1.1
	pkgsrc-2016Q1:1.1.0.44
	pkgsrc-2016Q1-base:1.1
	pkgsrc-2015Q4:1.1.0.42
	pkgsrc-2015Q4-base:1.1
	pkgsrc-2015Q3:1.1.0.40
	pkgsrc-2015Q3-base:1.1
	pkgsrc-2015Q2:1.1.0.38
	pkgsrc-2015Q2-base:1.1
	pkgsrc-2015Q1:1.1.0.36
	pkgsrc-2015Q1-base:1.1
	pkgsrc-2014Q4:1.1.0.34
	pkgsrc-2014Q4-base:1.1
	pkgsrc-2014Q3:1.1.0.32
	pkgsrc-2014Q3-base:1.1
	pkgsrc-2014Q2:1.1.0.30
	pkgsrc-2014Q2-base:1.1
	pkgsrc-2014Q1:1.1.0.28
	pkgsrc-2014Q1-base:1.1
	pkgsrc-2013Q4:1.1.0.26
	pkgsrc-2013Q4-base:1.1
	pkgsrc-2013Q3:1.1.0.24
	pkgsrc-2013Q3-base:1.1
	pkgsrc-2013Q2:1.1.0.22
	pkgsrc-2013Q2-base:1.1
	pkgsrc-2013Q1:1.1.0.20
	pkgsrc-2013Q1-base:1.1
	pkgsrc-2012Q4:1.1.0.18
	pkgsrc-2012Q4-base:1.1
	pkgsrc-2012Q3:1.1.0.16
	pkgsrc-2012Q3-base:1.1
	pkgsrc-2012Q2:1.1.0.14
	pkgsrc-2012Q2-base:1.1
	pkgsrc-2012Q1:1.1.0.12
	pkgsrc-2012Q1-base:1.1
	pkgsrc-2011Q4:1.1.0.10
	pkgsrc-2011Q4-base:1.1
	pkgsrc-2011Q3:1.1.0.8
	pkgsrc-2011Q3-base:1.1
	pkgsrc-2011Q2:1.1.0.6
	pkgsrc-2011Q2-base:1.1
	pkgsrc-2011Q1:1.1.0.4
	pkgsrc-2011Q1-base:1.1
	pkgsrc-2010Q4:1.1.0.2
	pkgsrc-2010Q4-base:1.1;
locks; strict;
comment	@# @;


1.2
date	2020.04.21.11.16.56;	author micha;	state dead;
branches;
next	1.1;
commitid	2qzIwDzLYFgR9f5C;

1.1
date	2010.12.09.14.59.37;	author is;	state Exp;
branches;
next	;


desc
@@


1.2
log
@news/cleanscore: Update to 0.9.8.1nb10

The old source archive URL was no longer valid.
Switch to the source from the slrn archive (that has the former
required patch already applied).

OK from is@@.
@
text
@$NetBSD: patch-aa,v 1.1 2010/12/09 14:59:37 is Exp $

--- cleanscore.orig	2010-12-09 12:33:33.000000000 +0000
+++ cleanscore
@@@@ -27,8 +27,8 @@@@ use Getopt::Std;
 
 sub help();
 sub reset_vars(%);
-sub insert_comment(%%);
-sub end_of_score(%$);
+sub insert_comment(%);
+sub end_of_score(%);
 sub clean_file($);
 
 # globals variables.
@@@@ -323,7 +323,7 @@@@ sub clean_file($)
 
 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
 
-sub end_of_score(%$)
+sub end_of_score(%)
 {
   my $entry = shift;
   my $file_is_changed = shift;
@@@@ -355,7 +355,7 @@@@ sub end_of_score(%$)
 
 # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
 
-sub insert_comment(%%)
+sub insert_comment(%)
 {
   my $comment=shift;
   my $entry=shift;
@


1.1
log
@No, (%%) and (%$) in prototypes are not doing what somebody thought
a few years ago. (Un-,?)fortunately, the first % just grabs all
parameters on a sub call in a way that shift inside it can get at
them, so the 2nd % and the $ were ignored. Until some warning was
added to perl recently.
@
text
@d1 1
a1 1
$NetBSD$
@