Bug#181973: psplpr: useless argument parsing (-x)

[Arnaud Giersch <giersch@icps.u-strasbg.fr>]

Package: psptools
Version: 1.2.2-7
Severity: minor
Tags: patch

Hi,

If I understand the code correctly, the "-x" argument is parsed as a
synonym for "--warn", which is useless: "-x" is already used to change
"opt-prefix" at the beginning of argument processing.

--- psplpr.pl.in~	Fri Feb 21 22:36:55 2003
+++ psplpr.pl.in	Fri Feb 21 22:37:32 2003
@@ -834,8 +834,7 @@
     } elsif ($args[0] eq "--${lopt_prefix}silent") {
         $opt_verbose = 0;
 	close(STDERR);
-    } elsif ($args[0] eq "-${opt_prefix}x"
-	|| $args[0] eq "--${lopt_prefix}warn") {
+    } elsif ($args[0] eq "--${lopt_prefix}warn") {
         $opt_warn = 1;
     } elsif ($args[0] eq "--${lopt_prefix}nodsc") {
 	$opt_nodsc = 1 unless $opt_nodsc;


-- System Information
Debian Release: 3.0
Architecture: i386
Kernel: Linux dinadan 2.4.19-686 #1 Tue Nov 19 00:52:59 EST 2002 i686
Locale: LANG=fr_FR@euro, LC_CTYPE=fr_FR@euro

Versions of packages psptools depends on:
ii  perl                          5.6.1-8.2  Larry Wall's Practical Extraction 

-- 
Arnaud