aboutsummaryrefslogtreecommitdiffhomepage
path: root/generic/proof-menu.el
diff options
context:
space:
mode:
Diffstat (limited to 'generic/proof-menu.el')
-rw-r--r--generic/proof-menu.el20
1 files changed, 15 insertions, 5 deletions
diff --git a/generic/proof-menu.el b/generic/proof-menu.el
index 0a7317cb..f893a9f6 100644
--- a/generic/proof-menu.el
+++ b/generic/proof-menu.el
@@ -1,15 +1,24 @@
;;; proof-menu.el --- Menus, keymaps, misc commands for Proof General
-;;
-;; Copyright (C) 2000,2001,2009,2010,2011 LFCS Edinburgh.
+
+;; This file is part of Proof General.
+
+;; Portions © Copyright 1994-2012 David Aspinall and University of Edinburgh
+;; Portions © Copyright 2003, 2012, 2014 Free Software Foundation, Inc.
+;; Portions © Copyright 2001-2017 Pierre Courtieu
+;; Portions © Copyright 2010, 2016 Erik Martin-Dorel
+;; Portions © Copyright 2011-2013, 2016-2017 Hendrik Tews
+;; Portions © Copyright 2015-2017 Clément Pit-Claudel
+
;; Authors: David Aspinall
+
;; License: GPL (GNU GENERAL PUBLIC LICENSE)
-;;
-;; $Id$
+
+;;; Commentary:
;;
+;;; Code:
(require 'cl) ; mapcan
-;;; Code:
(eval-when-compile
(defvar proof-assistant-menu) ; defined by macro in proof-menu-define-specific
(defvar proof-mode-map))
@@ -113,6 +122,7 @@ without adjusting window layout."
;; C-c C-v is proof-minibuffer-cmd in universal-keys
;; C-c C-. is proof-goto-end-of-locked in universal-keys
(define-key map [(control c) (control return)] 'proof-goto-point)
+ (define-key map [(control c) (control m)] 'proof-goto-point) ; fallback for tty
(define-key map [(control c) ?v] 'pg-toggle-visibility)
(define-key map [(control meta mouse-3)] 'proof-mouse-goto-point)
;; NB: next binding overwrites comint-find-source-code.