diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-06-22 13:52:36 +0200 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2017-07-17 20:54:28 +0200 |
| commit | 6e367459b47ecf9a18e5805092f67a53fa127d8d (patch) | |
| tree | f011aa87c48ca07f4733d328f49e8f42d770382c | |
| parent | 47be347d65e30c8f0b80d1d1ed66295fd9a4dbe3 (diff) | |
| download | urpmi-6e367459b47ecf9a18e5805092f67a53fa127d8d.tar urpmi-6e367459b47ecf9a18e5805092f67a53fa127d8d.tar.gz urpmi-6e367459b47ecf9a18e5805092f67a53fa127d8d.tar.bz2 urpmi-6e367459b47ecf9a18e5805092f67a53fa127d8d.tar.xz urpmi-6e367459b47ecf9a18e5805092f67a53fa127d8d.zip | |
simplify: use //= where appropirate
| -rw-r--r-- | urpm/util.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/urpm/util.pm b/urpm/util.pm index 931a0bc0..c786227b 100644 --- a/urpm/util.pm +++ b/urpm/util.pm @@ -65,7 +65,7 @@ sub reduce_pathname { #- clean url to remove any macro (which cannot be solved now). #- take care if this is a true url and not a simple pathname. my ($host, $dir) = $url =~ m|([^:/]*://[^/]*/)?(.*)|; - $host = '' if !defined $host; + $host //= ''; #- remove any multiple /s or trailing /. #- then split all components of pathname. |