changeset 61361:d5052fc4ea58

(next-error-overlay-arrow-position): New defvar. Put "=>" on its property `overlay-arrow-string'. Add it to `overlay-arrow-variable-list'.
author Juri Linkov <juri@jurta.org>
date Thu, 07 Apr 2005 15:15:15 +0000
parents 93e4cee306d3
children 0c7ec8f85244
files lisp/simple.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Thu Apr 07 12:01:21 2005 +0000
+++ b/lisp/simple.el	Thu Apr 07 15:15:15 2005 +0000
@@ -114,6 +114,10 @@
 
 (defvar next-error-highlight-timer nil)
 
+(defvar next-error-overlay-arrow-position nil)
+(put 'next-error-overlay-arrow-position 'overlay-arrow-string "=>")
+(add-to-list 'overlay-arrow-variable-list 'next-error-overlay-arrow-position)
+
 (defvar next-error-last-buffer nil
   "The most recent next-error buffer.
 A buffer becomes most recent when its compilation, grep, or