ports/175186: ports-mgmt/portlint: Perl warnings in case of incomplete distinfo

[Gerald Pfeifer]

>Number:         175186
>Category:       ports
>Synopsis:       ports-mgmt/portlint: Perl warnings in case of incomplete distinfo
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    freebsd-ports-bugs
>State:          open
>Quarter:        
>Keywords:       
>Date-Required:
>Class:          change-request
>Submitter-Id:   current-users
>Arrival-Date:   Thu Jan 10 22:30:00 UTC 2013
>Closed-Date:
>Last-Modified:
>Originator:     Gerald Pfeifer
>Release:        
>Organization:
>Environment:
>Description:
	When updating emulators/wine-devel, by mistake I bumped
	DISTVERSION in Makefile and then ran portlint.   This gave
	the following:
:
FATAL: /shscratch/tmp/gerald/ports.svn/emulators/wine-devel/distinfo: has no SIZE record for wine-1.5.21.tar.bz2.
Argument "/shscratch/tmp/gerald/ports.svn/emulators/wine-devel/dis..." isn't numeric in subtraction (-) at /home/gerald/bin/portlint line 610.
Argument "no checksum record for wine-1.5.21.tar.bz2." isn't numeric in numeric gt (>) at /home/gerald/bin/portlint line 3211.
Use of uninitialized value $msg in concatenation (.) or string at /home/gerald/bin/portlint line 3212.
:

>How-To-Repeat:
	Set DISTVERSION of any port to something which is not covered
	in distinfo and run portlint.
>Fix:

--- portlint.orig	2013-01-10 22:17:41.639276000 +0000
+++ portlint	2013-01-10 22:18:11.550932000 +0000
@@ -607,7 +607,7 @@
 			$n++ if exists($records{$path}{$alg});
 		}
 		if ($n == 0) {
-			&perror("FATAL", $file -1, "no checksum record for $path.");
+			&perror("FATAL", $file, -1, "no checksum record for $path.");
 		}
 		if ($n < scalar(keys %algorithms)) {
 			&perror("WARN", $file, -1, "no checksum records for all ".
>Release-Note:
>Audit-Trail:
>Unformatted: