diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-02-15 19:37:50 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-02-15 19:37:50 +0000 |
commit | ad76212fc77de537513f97bd008d501725d6f742 (patch) | |
tree | d9faaed96a64877a9adde8a4daa574c7ec67eee6 | |
parent | cc335323bbc36915e8764d3897030a55f2ebe52f (diff) | |
download | urpmi-ad76212fc77de537513f97bd008d501725d6f742.tar urpmi-ad76212fc77de537513f97bd008d501725d6f742.tar.gz urpmi-ad76212fc77de537513f97bd008d501725d6f742.tar.bz2 urpmi-ad76212fc77de537513f97bd008d501725d6f742.tar.xz urpmi-ad76212fc77de537513f97bd008d501725d6f742.zip |
Fix parsing of hdlists file when adding media with --distrib (bug 13644)
-rw-r--r-- | urpm.pm | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -768,9 +768,11 @@ sub add_distrib_media { s/\s*#.*$//; /^\s*$/ and next; /^(?:suppl|askmedia)/ and next; - m/^\s*(noauto:)?(hdlist\S*\.cz2?)\s+(\S+)\s*(.*)$/ or $urpm->{error}(N("invalid hdlist description \"%s\" in hdlists file", $_)); - my ($noauto, $hdlist, $rpmsdir, $descr) = ($1, $2, $3); + /^\s*(noauto:)?(hdlist\S*\.cz2?)\s+(\S+)\s*([^(]*)(\(.+\))?$/ + or $urpm->{error}(N("invalid hdlist description \"%s\" in hdlists file", $_)); + my ($noauto, $hdlist, $rpmsdir, $descr) = ($1, $2, $3, $4); next if $noauto; + $descr =~ s/\s+$//; push @newnames, $urpm->add_medium( $name ? "$descr ($name$medium)" : $descr, |