Update of /cvsroot/cscope/cscope/contrib/xcscope
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv17515
Modified Files:
xcscope.el
Log Message:
Added optional autoclose. Also fixed [Ret] key for plain Emacs.
Index: xcscope.el
===================================================================
RCS file: /cvsroot/cscope/cscope/contrib/xcscope/xcscope.el,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -r1.15 -r1.16
*** xcscope.el 9 Apr 2013 14:35:57 -0000 1.15
--- xcscope.el 6 Aug 2013 07:50:10 -0000 1.16
***************
*** 831,834 ****
--- 831,840 ----
+ (defcustom cscope-close-window-after-select nil
+ "*If non-nil close the window showing the cscope buffer after an entry has been selected."
+ :type 'boolean
+ :group 'cscope)
+
+
(defvar cscope-minor-mode-hooks nil
"List of hooks to call when entering cscope-minor-mode.")
***************
*** 916,919 ****
--- 922,927 ----
(define-key cscope-list-entry-keymap [mouse-2] 'cscope-mouse-select-entry-other-window))
(define-key cscope-list-entry-keymap [return] 'cscope-select-entry-other-window)
+ ;; \r is for Emacs:
+ (define-key cscope-list-entry-keymap "\r" 'cscope-select-entry-other-window)
(define-key cscope-list-entry-keymap " " 'cscope-show-entry-other-window)
(define-key cscope-list-entry-keymap "o" 'cscope-select-entry-one-window)
***************
*** 1388,1392 ****
(if (windowp window)
(select-window window))
! ))
--- 1396,1402 ----
(if (windowp window)
(select-window window))
! )
! (if cscope-close-window-after-select
! (delete-windows-on cscope-output-buffer-name)))
|