diff options
Diffstat (limited to 'sci-biology/GBrowse/files/GBrowseInstall.pm-2.39.patch')
| -rw-r--r-- | sci-biology/GBrowse/files/GBrowseInstall.pm-2.39.patch | 72 |
1 files changed, 0 insertions, 72 deletions
diff --git a/sci-biology/GBrowse/files/GBrowseInstall.pm-2.39.patch b/sci-biology/GBrowse/files/GBrowseInstall.pm-2.39.patch deleted file mode 100644 index 5aa0be9df918..000000000000 --- a/sci-biology/GBrowse/files/GBrowseInstall.pm-2.39.patch +++ /dev/null @@ -1,72 +0,0 @@ -diff -durr GBrowse-2.39-orig/install_util/GBrowseInstall.pm GBrowse-2.39/install_util/GBrowseInstall.pm ---- GBrowse-2.39-orig/install_util/GBrowseInstall.pm 2011-07-19 20:14:52.434608020 +0000 -+++ GBrowse-2.39/install_util/GBrowseInstall.pm 2011-07-19 21:02:13.685107753 +0000 -@@ -454,33 +454,33 @@ - $gid =~ /^(\d+)$/; - $gid = $1; - -- unless (chown $uid,$gid,$tmp) { -- $self->ownership_warning($tmp,$user); -- } -+# unless (chown $uid,$gid,$tmp) { -+# $self->ownership_warning($tmp,$user); -+# } - - my $htdocs_i = File::Spec->catfile($self->install_path->{htdocs},'i'); - my $images = File::Spec->catfile($tmp,'images'); - my $htdocs = $self->install_path->{htdocs}; -- chown $uid,-1,$htdocs; -+# chown $uid,-1,$htdocs; - { - local $> = $uid; -- symlink($images,$htdocs_i); # so symlinkifowner match works! -+# symlink($images,$htdocs_i); # so symlinkifowner match works! - } -- chown $>,-1,$self->install_path->{htdocs}; -+# chown $>,-1,$self->install_path->{htdocs}; - - my $persistent = $self->install_path->{'persistent'}; - my $sessions = File::Spec->catfile($persistent,'sessions'); - my $userdata = File::Spec->catfile($persistent,'userdata'); -- mkpath([$sessions,$userdata],0711); -+# mkpath([$sessions,$userdata],0711); - - my $databases = $self->install_path->{'databases'}; - -- unless (chown $uid,$gid,glob(File::Spec->catfile($databases,'').'*')) { -- $self->ownership_warning($databases,$user); -- } -+# unless (chown $uid,$gid,glob(File::Spec->catfile($databases,'').'*')) { -+# $self->ownership_warning($databases,$user); -+# } - -- chmod 0755,File::Spec->catfile($self->install_path->{'etc'},'init.d','gbrowse-slave'); -- $self->fix_selinux; -+ # chmod 0755,File::Spec->catfile($self->install_path->{'etc'},'init.d','gbrowse-slave'); -+ # $self->fix_selinux; - - my $base = basename($self->install_path->{htdocs}); - -@@ -489,14 +489,14 @@ - my $metadb_script = File::Spec->catfile("bin", "gbrowse_metadb_config.pl"); - my $perl = $self->perl; - my @inc = map{"-I$_"} split ':',$self->added_to_INC; -- system $perl,@inc,$metadb_script; -- system 'sudo','chown','-R',"$uid.$gid",$sessions,$userdata; -+# system $perl,@inc,$metadb_script; -+# system 'sudo','chown','-R',"$uid.$gid",$sessions,$userdata; - -- if (Module::Build->y_n( -- "It is recommended that you restart Apache. Shall I try this for you?",'y' -- )) { -- system "sudo /etc/init.d/apache2 restart"; -- } -+# if (Module::Build->y_n( -+# "It is recommended that you restart Apache. Shall I try this for you?",'y' -+# )) { -+# system "sudo /etc/init.d/apache2 restart"; -+# } - - print STDERR "\n***INSTALLATION COMPLETE***\n"; - print STDERR "Load http://localhost/$base for demo and documentation.\n"; -Only in GBrowse-2.39/install_util: GBrowseInstall.pm~ |