From 20f73b0beebc71466b7be0dea537ab05e8f7be5c Mon Sep 17 00:00:00 2001 From: JSDurand Date: Sun, 26 Dec 2021 14:47:32 +0800 Subject: Use defalias rather than fset * common.el (durand-display-in-one-window) (durand-completion-scroll-up-or-go-to-minibuffer) (intentionally-disabled-bind): * completion-conf.el (durand-completion-toggle-display): * eww-conf.el (global-map): defalias has the advantage that one can find the file of the definition from the help buffer while fset cannot. --- completion-conf.el | 34 +++++++++++++++++----------------- 1 file changed, 17 insertions(+), 17 deletions(-) (limited to 'completion-conf.el') diff --git a/completion-conf.el b/completion-conf.el index e4190d3..1ed310a 100644 --- a/completion-conf.el +++ b/completion-conf.el @@ -131,25 +131,25 @@ minibuffer as usual." ;; nil)) ;;;###autoload -(fset - 'durand-completion-toggle-display - (make-byte-code - 0 - (unibyte-string 192 9 62 ; determine if it is a member - 131 14 0 - ;; memq - 194 193 192 196 35 130 20 0 - ;; not memq - 195 193 192 197 196 36 - 135) - (vector #'durand-completion-display-after-change - 'after-change-functions - 'remove-hook 'add-hook t nil) - 6 - "Toggle to display the list of completions after each input. +(defalias + 'durand-completion-toggle-display + (make-byte-code + 0 + (unibyte-string 192 9 62 ; determine if it is a member + 131 14 0 + ;; memq + 194 193 192 196 35 130 20 0 + ;; not memq + 195 193 192 197 196 36 + 135) + (vector #'durand-completion-display-after-change + 'after-change-functions + 'remove-hook 'add-hook t nil) + 6 + "Toggle to display the list of completions after each input. \(fn)" - nil)) + nil)) ;; (defun durand-completion-toggle-display () ;; "Toggle to display the list of completions after each input." -- cgit v1.2.3-18-g5258