Attachment 4840 Details for Bug 11176 – OEM patch

OEM patch

oem-11176.pl (text/x-perl), 553 bytes, created by Thierry Vignaud on 2014-01-21 18:45:34 CET

(hide)

Description:

Filename:

MIME Type:

Creator: Thierry Vignaud

Created: 2014-01-21 18:45:34 CET

Size: 553 bytes

patch

obsolete

#!/usr/bin/perl
package install::any;

log::l("PATCH: fixing screenshots");

undef *screenshot_dir__and_move;
*screenshot_dir__and_move = sub {
    my ($dir0, $dir1, $dir2) = ('/root', "$::prefix/root", '/tmp');
    if (-e $dir0 && ! -e '/root/non-chrooted-marker.DrakX') {
	($dir0, 'nowarn'); #- it occurs during pkgs install when we are chrooted
    } elsif (-e $dir1) {
        my $path = "$dir2/DrakX-screenshots";
	if (-d $path) {
	    cp_af($path, $dir1);
	    rm_rf($path);
	    symlink($path, $dir1);
	}
	$dir1;
    } else {
	$dir2;
    }
}

1;

Actions: View

Attachments on bug 11176: 4826 | 4836 | 4838 | 4839 | 4840