1 files changed, 0 insertions, 61 deletions
diff --git a/net/amphetadesk/files/patch-lib::AmphetaDesk::OS::Linux.pm b/net/amphetadesk/files/patch-lib::AmphetaDesk::OS::Linux.pm
deleted file mode 100644
index 101b5d137522..000000000000
--- a/net/amphetadesk/files/patch-lib::AmphetaDesk::OS::Linux.pm
+++ /dev/null
@@ -1,61 +0,0 @@
---- lib/AmphetaDesk/OS/Linux.pm.orig	Sun Oct  9 22:39:00 2005
-+++ lib/AmphetaDesk/OS/Linux.pm	Sun Oct  9 22:39:05 2005
-@@ -15,11 +15,25 @@
- use strict;
- use AmphetaDesk::Settings;
- use AmphetaDesk::Utilities;
-+use POSIX ":sys_wait_h";
- require Exporter;
- use vars qw( @ISA @EXPORT );
- @ISA = qw( Exporter );
- @EXPORT = qw( gui_init gui_listen gui_note open_url );
- 
-+# taken from perlipc man page
-+sub sigchild {
-+  my $child;
-+
-+  # If a second child dies while in the signal handler caused by the
-+  # first death, we won't get another signal. So must loop here else
-+  # we will leave the unreaped child as a zombie. And the next time
-+  # two children die we get another zombie. And so on.
-+  while (($child = waitpid(-1,WNOHANG)) > 0) {}
-+
-+  $SIG{CHLD} = \&sigchild;
-+}
-+
- ###############################################################################
- # gui_init - start the gui and display the window.                            #
- ###############################################################################
-@@ -105,8 +119,32 @@
-    # construct our url.
-    my $url = "http://127.0.0.1:" . get_setting("urls_port") . "/index.html";
- 
-+   # default browser
-+   my $browser;
-+
-    # we spit out our suggestion just to catch all instances.
-    note("If your browser doesn't load, go to <$url>.", 1);
-+
-+   # what browser?
-+   if ($ENV{'BROWSER'}) {
-+     $browser = $ENV{'BROWSER'};
-+   } else {
-+     if (get_setting("user_browser_path")) {
-+       $browser = get_setting("user_browser_path");
-+     }
-+   }
-+
-+   if ($browser) {
-+     note("Your environment states that $browser is your default program.");
-+
-+     $SIG{CHLD} = \&sigchild;
-+
-+     if (fork() == 0) {
-+       my @args = ("$browser", "$url");
-+       exec(@args) == 0
-+         or note("The browser <$browser> does not exist. Please select another.");
-+     }
-+   }
- 
-    return 1;
-