diff options
author | Peter Wemm <peter@FreeBSD.org> | 2013-08-11 09:44:58 +0000 |
---|---|---|
committer | Peter Wemm <peter@FreeBSD.org> | 2013-08-11 09:44:58 +0000 |
commit | be3e4646eef6a3abcf58590dac24a5dfe54540f6 (patch) | |
tree | 5a0e2514f154d0eb24f2235092423adb95ac75ac /tcl_scripts/errors.tcl | |
parent | 84ed61ee234d2654ec965be5bfdda4269f9dc4fd (diff) |
Import nvi-2.1.1-4334a8297f into the work area. This is the gsoc-2011vendor/nvi/2.1.1-4334a8297f
project to clean up and backport multibyte support from other nvi forks
in a form we can use.
GSoC info: http://www.google-melange.com/gsoc/proposal/review/google/gsoc2011/zy/1
Repo at: https://github.com/lichray/nvi2
Obtained from: Zhihao Yuan <lichray@gmail.com>
Notes
Notes:
svn path=/vendor/nvi/dist/; revision=254211
svn path=/vendor/nvi/2.1.1-4334a8297f/; revision=254212; tag=vendor/nvi/2.1.1-4334a8297f
Diffstat (limited to 'tcl_scripts/errors.tcl')
-rw-r--r-- | tcl_scripts/errors.tcl | 44 |
1 files changed, 0 insertions, 44 deletions
diff --git a/tcl_scripts/errors.tcl b/tcl_scripts/errors.tcl deleted file mode 100644 index 94a1e6a8c3c9..000000000000 --- a/tcl_scripts/errors.tcl +++ /dev/null @@ -1,44 +0,0 @@ -# @(#)errors.tcl 8.2 (Berkeley) 11/18/95 -# -# File: errors.tcl -# -# Author: George V. Neville-Neil -# -# Purpose: This file contains vi/tcl code that allows a vi user to parse -# compiler errors and warnings from a make.out file. - -proc findErr {} { - global errScreen - global currFile - global fileScreen - set errLine [lindex [viGetCursor $errScreen] 0] - set currLine [split [viGetLine $errScreen $errLine] :] - set currFile [lindex $currLine 0] - set fileScreen [viNewScreen $errScreen $currFile] - viSetCursor $fileScreen [lindex $currLine 1] 1 - viMapKey $viScreenId nextErr -} - -proc nextErr {} { - global errScreen - global fileScreen - global currFile - set errLine [lindex [viGetCursor $errScreen] 0] - set currLine [split [viGetLine $errScreen $errLine] :] - if {[string match $currFile [lindex $currLine 0]]} { - viSetCursor $fileScreen [lindex $currLine 1] 0 - viSwitchScreen $fileScreen - } else { - viEndScreen $fileScreen - set currFile [lindex $currLine 0] - set fileScreen[viNewScreen $errScreen $currFile] - viSetCursor $fileScreen [lindex $currLine 1] 0 - } -} - -proc initErr {} { - global viScreenId - global errScreen - set errScreen [viNewScreen $viScreenId make.out] - viMapKey $viScreenId findErr -} |