diff options
Diffstat (limited to 'lib/Youri/Submit/Action/Link.pm')
| -rw-r--r-- | lib/Youri/Submit/Action/Link.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/Youri/Submit/Action/Link.pm b/lib/Youri/Submit/Action/Link.pm index db4e6c6..845491b 100644 --- a/lib/Youri/Submit/Action/Link.pm +++ b/lib/Youri/Submit/Action/Link.pm @@ -39,6 +39,10 @@ sub run { my $default_dir = $repository->get_install_dir($package, $target, $define); my $file = $package->get_file_name(); + # FIXME remove prefix this should be done by a function + $file =~ s/^\d{14}\.\w*\.\w+\.\d+_//; + $file =~ s/^\@\d+://; + foreach my $arch ($repository->get_extra_arches()) { # compute installation target, forcing arch my $other_dir = $repository->get_install_dir( @@ -58,6 +62,7 @@ sub run { link $default_file, $file; } chdir $current_dir; + print "set_install_dir_changed($other_dir) for updated $file\n"; $repository->set_install_dir_changed($other_dir); } } |