git-gui: display error launching blame as a message box.

patthoyts · patthoyts · commit 780777720a1d · 2010-08-08T00:07:43.000+01:00
This does not appear to Windows users and can follow the form of the fatal
error messages near the top of the script file.

Signed-off-by: Pat Thoyts &lt;patthoyts@users.sourceforge.net&gt;
diff --git a/git-gui.sh b/git-gui.sh
@@ -2944,7 +2944,12 @@ blame {
 	}
 	blame   {
 		if {$head eq {} && ![file exists $path]} {
-			puts stderr [mc "fatal: cannot stat path %s: No such file or directory" $path]
+			catch {wm withdraw .}
+			tk_messageBox \
+				-icon error \
+				-type ok \
+				-title [mc "git-gui: fatal error"] \
+				-message [mc "fatal: cannot stat path %s: No such file or directory" $path]
 			exit 1
 		}
 		blame::new $head $path $jump_spec

Original file line number	Diff line number	Diff line change
`@@ -2944,7 +2944,12 @@ blame {`
`2944`	`2944`	`}`
`2945`	`2945`	`blame {`
`2946`	`2946`	`if {$head eq {} && ![file exists $path]} {`
`2947`		`- puts stderr [mc "fatal: cannot stat path %s: No such file or directory" $path]`
	`2947`	`+ catch {wm withdraw .}`
	`2948`	`+ tk_messageBox \`
	`2949`	`+ -icon error \`
	`2950`	`+ -type ok \`
	`2951`	`+ -title [mc "git-gui: fatal error"] \`
	`2952`	`+ -message [mc "fatal: cannot stat path %s: No such file or directory" $path]`
`2948`	`2953`	`exit 1`
`2949`	`2954`	`}`
`2950`	`2955`	`blame::new $head $path $jump_spec`