aboutsummaryrefslogtreecommitdiff
path: root/tcl_scripts/errors.tcl
diff options
context:
space:
mode:
authorPeter Wemm <peter@FreeBSD.org>2013-08-11 09:44:58 +0000
committerPeter Wemm <peter@FreeBSD.org>2013-08-11 09:44:58 +0000
commitbe3e4646eef6a3abcf58590dac24a5dfe54540f6 (patch)
tree5a0e2514f154d0eb24f2235092423adb95ac75ac /tcl_scripts/errors.tcl
parent84ed61ee234d2654ec965be5bfdda4269f9dc4fd (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.tcl44
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
-}