Article View: gnu.emacs.bug
Article #98531make blink-matching-open interactive
From: Joe Wells
Date: Mon, 13 May 1991 01:58
Date: Mon, 13 May 1991 01:58
19 lines
1489 bytes
1489 bytes
The following change will allow people to bind blink-matching-open to a
key, or to invoke it with M-x:
----------------------------------------------------------------------
--- /usr/local/src/emacs-18.57/lisp/simple.el Wed Jan 9 22:04:21 1991
+++ simple.el Mon May 13 01:55:26 1991
@@ -1245,4 +1245,5 @@
(defun blink-matching-open ()
"Move cursor momentarily to the beginning of the sexp before point."
+ (interactive)
(and (> (point) (1+ (point-min)))
(/= (char-syntax (char-after (- (point) 2))) ?\\ )
----------------------------------------------------------------------
I know at least one person who wrote a wrapper function just to make
blink-matching-open interactive to put it on a key.
--
Joe Wells <jbw@cs.bu.edu>
Technical Details
Message-ID:
<JBW.91May12215804@bigbird.bu.edu>Path:
arc1-ca.pugleaf.net!gmdzi!unido!math.fu-berlin.de!fauern!ira.uka.de!sol.ctr.columbia.edu!spool.mu.edu!sdd.hp.com!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!tut.cis.ohio-state.edu!unreplyable!garbageShow Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: fb2f1,ddd7e31588b1cbf0,start X-Google-Attributes: gidfb2f1,public X-Google-ArrivalTime: 1991-05-13 14:20:11 PST Path: arc1-ca.pugleaf.net!gmdzi!unido!math.fu-berlin.de!fauern!ira.uka.de!sol.ctr.columbia.edu!spool.mu.edu!sdd.hp.com!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!tut.cis.ohio-state.edu!unreplyable!garbage From: jbw@BIGBIRD.BU.EDU (Joe Wells) Newsgroups: gnu.emacs.bug Subject: make blink-matching-open interactive Message-ID: <JBW.91May12215804@bigbird.bu.edu> Date: 13 May 91 01:58:04 GMT Sender: daemon@tut.cis.ohio-state.edu Distribution: gnu Organization: Boston University Computer Science Department Lines: 19 Approved: bug-gnu-emacs@prep.ai.mit.edu