From ae9fef20af624c885e3da3583326a2546057e7ce Mon Sep 17 00:00:00 2001 From: Bruno Boal Date: Thu, 14 Nov 2024 23:58:43 +0000 Subject: [PATCH] Type correction and docstring change in `erc-spelling-dictionaries' --- lisp/erc/erc-spelling.el | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/lisp/erc/erc-spelling.el b/lisp/erc/erc-spelling.el index b2f565d71bf..558cef2d2b2 100644 --- a/lisp/erc/erc-spelling.el +++ b/lisp/erc/erc-spelling.el @@ -52,15 +52,17 @@ (define-erc-module spelling nil (defcustom erc-spelling-dictionaries nil "An alist mapping buffer names to dictionaries. -The `car' of every cell is a buffer name, the `cadr' is the -string name of an associated dictionary. + +Each element is a list of strings with the form (KEY VALUE) where KEY +is a buffer name and VALUE, the name of the dictionary to be +associated. + The dictionary is inherited from server buffers, so if you want a -default dictionary for some server, you can use a server buffer -name here." +default dictionary for some server, you can use a server buffer name +here." :type '(choice (const nil) - (repeat (cons (string :tag "Buffer name") - (string :tag "Dictionary")))) - :group 'erc-spelling) + (repeat (list (string :tag "Buffer name") + (string :tag "Dictionary"))))) (defun erc-spelling-init (buffer) "Enable flyspell mode in an ERC buffer. -- 2.47.0