From: Eshel Yaron Date: Wed, 27 Sep 2023 17:02:52 +0000 (+0200) Subject: ; Add missing ':type' for 'sweeprolog-top-level-use-pty' X-Git-Tag: V9.1.16-sweep-0.25.3~9 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0dd67eba55309be645dc54488e5b894ab0fdf9c1;p=sweep.git ; Add missing ':type' for 'sweeprolog-top-level-use-pty' --- diff --git a/sweeprolog.el b/sweeprolog.el index d5e39c0..4370252 100644 --- a/sweeprolog.el +++ b/sweeprolog.el @@ -439,6 +439,15 @@ pack completion candidates." :package-version '((sweeprolog "0.22.2")) :type 'natnum) +(defcustom sweeprolog-top-level-use-pty + (not (memq system-type '(ms-dos windows-nt))) + "Whether to communicate with top-levels using pseudo-terminal (\"pty\"). + +By default, this is t on systems where Emacs can use a pty." + :package-version '((sweeprolog "0.25.0")) + :type 'boolean) + + ;;;; Keymaps (defvar-keymap sweeprolog-mode-map @@ -3203,12 +3212,6 @@ function with PROC and MSG." #'sweeprolog-top-level-sentinel) (add-hook 'kill-buffer-hook #'comint-write-input-ring nil t))) -(defcustom sweeprolog-top-level-use-pty - (not (memq system-type '(ms-dos windows-nt))) - "Whether to communicate with top-levels using pseudo-terminal (\"pty\"). - -By default, this is t on systems where Emacs can use a pty.") - (defun sweeprolog-top-level-buffer (&optional name) "Return a Prolog top-level buffer named NAME.