* (sweeprolog-prefix-map): bind sweeprolog-top-level-send-goal to q

diff --git a/README.org b/README.org
index 4bc658e287de74411bf813a1a267210cf1e4aecb..28c2f19e5da5e8d11745386737d19d9493528562 100644 (file)
--- a/README.org
+++ b/README.org
@@ -1828,6 +1828,7 @@ The full list of keybindings in ~sweeprolog-prefix-map~ is given below:
 | ~l~   | ~sweeprolog-load-buffer~               | [[#loading-buffers][Loading Buffers]]                   |
 | ~m~   | ~sweeprolog-find-module~               | [[#finding-prolog-code][Finding Prolog Code]]               |
 | ~p~   | ~sweeprolog-find-predicate~            | [[*Finding Prolog code][Finding Prolog Code]]               |
+| ~q~   | ~sweeprolog-top-level-send-goal~       | [[#top-level-send-goal][Sending Goals to the Top-level]]    |
 | ~t~   | ~sweeprolog-top-level~                 | [[#prolog-top-level][The Prolog Top-level]]              |
 
 * Examining Prolog messages

diff --git a/sweeprolog.el b/sweeprolog.el
index e329571d81e841232a470ede261636db421f2f54..61c5aa351407e9b84d4f2ccfbf45e7936c73f1f7 100644 (file)
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -456,6 +456,7 @@ determinism specification, and the third is a summary line."
     (define-key map "l" #'sweeprolog-load-buffer)
     (define-key map "m" #'sweeprolog-find-module)
     (define-key map "p" #'sweeprolog-find-predicate)
+    (define-key map "q" #'sweeprolog-top-level-send-goal)
     (define-key map "t" #'sweeprolog-top-level)
     map)
   "Keymap for `sweeprolog' global commands.")