freebsd-ports/astro/tkseti/files/patch-aa

--- tkseti.orig	Sat Mar 20 07:11:41 2004
+++ tkseti	Sun Jul 18 01:51:15 2004
@@ -3,7 +3,7 @@
 # $Id: tkseti,v 1.4 2004/03/19 22:10:54 chipster Exp $
 
 # the next line restarts using wish \
-exec wish "$0" ${1+"$@"}
+exec %%WISH%% "$0" ${1+"$@"}
 
 #################################
 # GLOBAL VARIABLES
@@ -193,11 +193,11 @@
     TkSETI can be started if the client is already running, or it can start
     the client manually or automatically for you. This is explained in the
     Setup section that follows.
-    
-    TkSETI will look for the client files in the directory ~/setiathome. If
-    you've run the client elsewhere, or run more than one client, just
-    specify the setiathome client directory on the tkseti command line. For
-    example:
+
+    TkSETI will look for the client files in the directory
+    /var/db/setiathome . If you've run the client elsewhere, or run more
+    than one client, just specify the setiathome client directory on the
+    tkseti command line. For example:
 
     tkseti ~/setiathome
 
@@ -367,6 +367,11 @@
     KDE's kfm:  kfmclient openURL $url
     lynx:       xterm -e lynx $url
     
+
+    The following command is used in this FreeBSD port:
+
+    mozilla (no wrapper): /bin/sh -c "mozilla -remote 'openurl($url,new-window)'||exec mozilla $url"
+
     Proxy Host
     ==========
 
@@ -556,7 +561,7 @@
     if {[catch {info nameofexecutable} nameofexecutable]} {
         set nameofexecutable wish
     }
-    set seti(usage) "    TkSETI version $seti(tksetiVersion) by Rick Macdonald <rickm@vsl.com> and by\nChip Cuccio <chipster@norlug.org>\n\nYou are running $nameofexecutable patchlevel [info patchlevel].\n\nUsage: tkseti \[--help\] \[user_setiathome_directory\]\n       user_setiathome_directory defaults to ~/setiathome"
+    set seti(usage) "    TkSETI version $seti(tksetiVersion) by Rick Macdonald <rickm@vsl.com> and by\nChip Cuccio <chipster@norlug.org>\n\nYou are running $nameofexecutable patchlevel [info patchlevel].\n\nUsage: tkseti \[--help\] \[user_setiathome_directory\]\n       user_setiathome_directory defaults to /var/db/setiathome"
 
     if {[lsearch $argv "--help"] >= 0} {
         puts \n$seti(usage)
@@ -571,7 +576,7 @@
     option add *highlightBackground grey85 user
 
     if {$argc == 0} {
-        set seti(setidir) [glob ~]/setiathome
+        set seti(setidir) /var/db/setiathome
     } {
         set seti(setidir) [lindex $argv 0]
         if {[string index $seti(setidir) 0] != "/"} {
@@ -4942,7 +4947,7 @@
     set seti(_howto_kill)     {kill -KILL $pid}
     set seti(_howto_pause)    {kill -STOP $pid}
     set seti(_howto_cont)     {kill -CONT $pid}
-    set seti(_howto_browse)   {mozilla $url}
+    set seti(_howto_browse)   {/bin/sh -c "mozilla -remote 'openurl($url,new-window)'||exec mozilla $url"}
     set seti(_howto_statnet)  {}
     set seti(_howto_startnet) {}
     set seti(_howto_stopnet)  {}