summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--pod/urpmf.8.pod6
-rw-r--r--urpm/args.pm1
-rwxr-xr-xurpmf1
3 files changed, 7 insertions, 1 deletions
diff --git a/pod/urpmf.8.pod b/pod/urpmf.8.pod
index 314b6081..335de718 100644
--- a/pod/urpmf.8.pod
+++ b/pod/urpmf.8.pod
@@ -77,7 +77,11 @@ hdlist files for your media.
=item B<-i>
-Ignore case distinctions in any patterns.
+Ignore case distinctions in the patterns that follow.
+
+=item B<-I>
+
+Honor case distinctions in the patterns that follow.
=item B<-F> I<string>
diff --git a/urpm/args.pm b/urpm/args.pm
index 21cccf42..9e5ee075 100644
--- a/urpm/args.pm
+++ b/urpm/args.pm
@@ -169,6 +169,7 @@ my %options_spec = (
'verbose|v' => \$::verbose,
m => add_param_closure('media'),
i => sub { $::pattern = 'i' },
+ I => sub { $::pattern = '' },
f => sub { $::full = 1 },
'F=s' => sub { $::separator = $_[1] },
'e=s' => sub { $::expr .= "($_[1])" },
diff --git a/urpmf b/urpmf
index 2799f9de..49511892 100755
--- a/urpmf
+++ b/urpmf
@@ -43,6 +43,7 @@ usage: urpmf [options] pattern-expression
") . N(" --update - use only update media.
") . N(" --verbose - verbose mode.
") . N(" -i - ignore case distinctions in patterns.
+") . N(" -I - honor case distinctions in patterns (default).
") . N(" -F<str> - change field separator (defaults to ':').
") . N("Pattern expressions:
") . N(" text - any text is parsed as a regexp, unless -l is used.