commit ba780fc3a400c018fe0af568d99b35e88b61baee

Author: Alexey Tourbin <at@altlinux.ru>

Date:   Tue Sep 25 22:45:27 2012 +0400

    installperl: fixed missing 0444 -> 0644 case

diff --git a/installperl b/installperl

index f4d850b..88b7d55 100755

--- a/installperl

+++ b/installperl

@@ -24,8 +24,8 @@ BEGIN {

 #

 # In AmigaOS, the 0777 means 'rwed' (e = execute, d = delete),

 # (not 'rwx') and having the 'd' makes updates more convenient.

-my $SO_MODE     = $Is_AmigaOS ? 0777 : 0555;

-my $NON_SO_MODE = $Is_AmigaOS ? 0666 : 0444;

+my $SO_MODE     = $Is_AmigaOS ? 0777 : 0755;

+my $NON_SO_MODE = $Is_AmigaOS ? 0666 : 0644;

 my $scr_ext = ($Is_VMS ? '.Com' : $Is_W32 ? '.bat' : '');