MàJ l10n-check 0.3.1

[Nicolas Bertolissio <nico.bertol@wanadoo.fr>]

Bonjour,

Journal des modification :
Description: 
 l10n-check - Perl script to check common localisation mistakes
Changes: 
 l10n-check (0.3.1) unstable; urgency=low
 .
   * fix `FILE_TYPE' rev extension
   * remove short option for `--rules' (due conflict with `--review')
   * add bash completion file
   * add note in `README.Debian'

Le fichier pour le complètement et la rustine sont attachés, les paquets
sont à jour :
deb http://nico.bertol.free.fr/debian bertol/fr/  pour votre sources.list
    http://nico.bertol.free.fr/rpm/bertol/        en rpm


Nicolas
-- 

--- l10n-check_0.3	Sun Feb 17 00:00:00 2002
+++ l10n-check_0.3.1	Tue Feb 26 00:00:00 2002
@@ -13,7 +13,7 @@
 # constants setting
 #
 
-use constant VERSION	=> 0.3;					# script version number
+use constant VERSION	=> 0.3.1;				# script version number
 use constant RULES_DIR	=> "/usr/share/l10n-check/rules";	# rules directory
 use constant RULES_E	=> "rules";				# rules files extension
 my @FIELDS = (							# available fields
@@ -25,9 +25,9 @@
 	"pre_insert", "post_insert");
 my %FILE_TYPES = (						# filetypes
 	'\.wml$'	=> "wml",
-	'\.wml\.relu$'	=> "wml",
+	'\.wml\.rev$'	=> "wml",
 	'\.po$'		=> "po",
-	'\.po\.relu$' 	=> "po");
+	'\.po\.rev$' 	=> "po");
 my %TEXT_COLORS = (						# available colors
 	"black"		=> "\033[30;1m",
 	"red"		=> "\033[31;1m",
@@ -653,7 +653,7 @@
 		 "  -q, --quiet        quiet mode",
 		 "  -v                 verbose, add more for more verbosity",
 		 "      --verbose      set verbosity to n",
-		 "  -r, --rules <xxx>  use rules set <xxx>",
+		 "      --rules <xxx>  use rules set <xxx>",
 		 "  -i, --spell        check spelling with ispell",
 		 "      --dict <lang>  use <lang> dictionary",
 		 "  -n, --nospell      don't check spelling",
@@ -681,7 +681,7 @@
 		'v+'		=> sub { inc_debug },			# incremental
 		'quiet|q'	=> sub { set_debug 0 },			# quiet
 		'help|h'	=> sub { $ARGV[0] = '' },		# help
-		'rules|r=s'	=> \$filetype,				# file type
+		'rules=s'	=> \$filetype,				# file type
 		'spell|s'	=> sub { $Use_ispell  = "yes" },	# use ispell
 		'nospell|n'	=> sub { $Use_ispell  = "no"  },	# short no
 		'dict|d=i'	=> \$Dictionary,			# dictionary

# This is a completion rule, it parses the usage message for commands and
# options through a one-line perl command

_l10n-check()
{
	COMPREPLY=()
	cur=${COMP_WORDS[COMP_CWORD]}
	
	if [[ "$cur" == -* ]]; then
		COMPREPLY=( $( l10n-check | perl -e "while (<>) { print \"\$1\n\" if /^  \b($cur\S*)/; next unless \"$cur\"; print \"\$1\n\" if /(?=--)($cur\S*) / }" ) )
	else
		COMPREPLY=( $( compgen -f $cur ) )
	fi

	return 0
}
complete -F _l10n-check l10n-check