Fix broken calling of url handlers. master
authorPat Thoyts <patthoyts@users.sourceforge.net>
Mon, 23 Aug 2010 21:37:17 +0000 (22:37 +0100)
committerPat Thoyts <patthoyts@users.sourceforge.net>
Mon, 23 Aug 2010 21:37:17 +0000 (22:37 +0100)
Signed-off-by: Pat Thoyts <patthoyts@users.sourceforge.net>
bin/bullfrog.tcl

index a7fe9200345bda712d7097c6aef1ae5e45a582e5..d0ca0e2a8d4981f99a41d07af3ae873939a9eb3a 100644 (file)
@@ -544,7 +544,7 @@ proc GotoURL {w url} {
                 if {$Browser eq ""} {
                     foreach {display exe arg} $Browsers {
                         if {[llength [auto_execok $exe]] != 0} {
                 if {$Browser eq ""} {
                     foreach {display exe arg} $Browsers {
                         if {[llength [auto_execok $exe]] != 0} {
-                            set Browser [linsert [auto_execok $exe] end $arg]
+                            set Browser "$cmd $arg" ;# ensure empty arg vanishes
                             break
                         }
                     }
                             break
                         }
                     }