Merge branch 'maint'
authorShawn O. Pearce <spearce@spearce.org>
Tue, 3 Jul 2007 14:42:43 +0000 (10:42 -0400)
committerShawn O. Pearce <spearce@spearce.org>
Tue, 3 Jul 2007 14:42:43 +0000 (10:42 -0400)
* maint:
git-gui: properly popup error if gitk should be started but is not installed

git-gui.sh
index 9df2e47029cd6b7dedf0417d6028226b868e953d..8ee680221d9ab7602a6ea9c87d84ab38a3f1e987 100755 (executable)
@@ -1065,15 +1065,17 @@ proc do_gitk {revs} {
        #    lets us bypass using shell process on Windows systems.
        #
        set cmd [list [info nameofexecutable]]
-       lappend cmd [gitexec gitk]
+       set exe [gitexec gitk]
+       lappend cmd $exe
        if {$revs ne {}} {
                append cmd { }
                append cmd $revs
        }
 
-       if {[catch {eval exec $cmd &} err]} {
-               error_popup "Failed to start gitk:\n\n$err"
+       if {! [file exists $exe]} {
+               error_popup "Unable to start gitk:\n\n$exe does not exist"
        } else {
+               eval exec $cmd &
                set ui_status_value $starting_gitk_msg
                after 10000 {
                        if {$ui_status_value eq $starting_gitk_msg} {