From: Eshel Yaron <me@eshelyaron.com>
Date: Sat, 14 Jan 2023 09:47:14 +0000 (+0200)
Subject: * (sweeprolog-prefix-map): bind sweeprolog-top-level-send-goal to q
X-Git-Tag: V9.1.3-sweep-0.11.3~6
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4028141133859394cd86096f78bfbe87d3887a68;p=dict.git

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

diff --git a/README.org b/README.org
index 4bc658e..28c2f19 100644
--- 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 e329571..61c5aa3 100644
--- 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.")