Package: fslint
Version: 2.40-2
Severity: normal
Tags: patch

The options are not removed, so they got passed to find(1) call.
The following patch fixes this. Correction is against SVN 238.
as per http://code.google.com/p/fslint/source/checkout

-- System Information:
Debian Release: squeeze/sid
  APT prefers testing
  APT policy: (990, 'testing'), (500, 'unstable'), (1, 'experimental')
Architecture: amd64 (x86_64)

Kernel: Linux 2.6.30-1-amd64 (SMP w/2 CPU cores)
Locale: LANG=en_DK.UTF-8, LC_CTYPE=en_DK.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash

Versions of packages fslint depends on:
ii  findutils                     4.4.2-1    utilities for finding files--find,
ii  python                        2.5.4-2    An interactive high-level object-o
ii  python-glade2                 2.16.0-1   GTK+ bindings: Glade support
ii  python-gtk2                   2.16.0-1   Python bindings for the GTK+ widge

fslint recommends no packages.

fslint suggests no packages.

-- no debconf information
>From cb5d93efb482b2ebff760c94b1062cbd1fa0afca Mon Sep 17 00:00:00 2001
From: Jari Aalto <[email protected]>
Date: Mon, 28 Sep 2009 10:49:56 +0300
Subject: [PATCH] fslint/findbl: Correct OPTION handling by adding shift calls

Signed-off-by: Jari Aalto <[email protected]>
---
 fslint/findbl |   20 +++++++++++++++-----
 1 files changed, 15 insertions(+), 5 deletions(-)

diff --git a/fslint/findbl b/fslint/findbl
index b7de0d9..e0cf3cd 100755
--- a/fslint/findbl
+++ b/fslint/findbl
@@ -84,15 +84,23 @@ for arg
 do
        case "$arg" in
        -d)
-               mode="dangling" ;;
+               mode="dangling"
+               shift
+               ;;
        -s)
-               mode="suspect" ;;
+               mode="suspect"
+               shift
+               ;;
        -A)
                mode="absolute"
-               search_expr="${ASC_01}/" ;;
+               search_expr="${ASC_01}/"
+               shift
+               ;;
        -l)
                mode="relative"
-               search_expr="${ASC_01}[^/]+" ;;
+               search_expr="${ASC_01}[^/]+"
+               shift
+               ;;
        -n)
                mode="redundant"
 search_expr="(${ASC_01}.*[/]{2,})" #finds 2 or more consequtive /'s
@@ -100,7 +108,9 @@ search_expr="$search_expr|([${ASC_01}/]\./)" # starting 
with ./ or /./ anywhere
 search_expr="$search_expr|(${ASC_01}.*[^.]+/[.][.]/)" #finds x/../y
 search_expr="$search_expr|(${ASC_01}/[.][.]/)" #finds /../y
 search_expr="$search_expr|(${ASC_01}.*[.]{3,}/[.][.]/)" #finds .../../y etc
-search_expr="$search_expr|(${ASC_01}.+/$)" ;; #finds ending with /
+search_expr="$search_expr|(${ASC_01}.+/$)" #finds ending with /
+               shift
+               ;;
        -h|--help|-help)
                Usage ;;
        -v|--version)
-- 
1.6.3.3

Reply via email to