git-gui: Shorten Aspell version strings to just Aspell version number

We really only support Aspell, so showing the compatibility line from
ispell is of little value to end users.

Signed-off-by: Shawn O. Pearce <spearce@spearce.org>

diff --git a/lib/spellcheck.tcl b/lib/spellcheck.tcl
index 05a1ceb85b355fe77efd644ff2da79d91c46d3b2..76a2f17daeb2ff7e463be39368e9946941b6d3d9 100644 (file)
--- a/lib/spellcheck.tcl
+++ b/lib/spellcheck.tcl
@@ -74,12 +74,16 @@ method _connect {pipe_fd} {
                }
                return
        }
+
        if {{@(#) } ne [string range $s_version 0 4]} {
                catch {close $pipe_fd}
                error_popup [strcat [mc "Unrecognized spell checker"] ":\n\n$s_version"]
                return
        }
        set s_version [string range $s_version 5 end]
+       regexp \
+               {International Ispell Version .* \(but really (Aspell .*?)\)$} \
+               $s_version _junk s_version
 
        puts $pipe_fd !             ; # enable terse mode
        puts $pipe_fd {$$cr master} ; # fetch the language