From unknown Mon Aug 18 19:26:14 2025 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 X-Mailer: MIME-tools 5.509 (Entity 5.509) Content-Type: text/plain; charset=utf-8 From: bug#78235 <78235@debbugs.gnu.org> To: bug#78235 <78235@debbugs.gnu.org> Subject: Status: 30.1; Inconsistency in imap authenticator keyword Reply-To: bug#78235 <78235@debbugs.gnu.org> Date: Tue, 19 Aug 2025 02:26:14 +0000 retitle 78235 30.1; Inconsistency in imap authenticator keyword reassign 78235 emacs submitter 78235 Anush V severity 78235 normal thanks From debbugs-submit-bounces@debbugs.gnu.org Sun May 04 01:41:07 2025 Received: (at submit) by debbugs.gnu.org; 4 May 2025 05:41:07 +0000 Received: from localhost ([127.0.0.1]:49042 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uBS66-0007QC-T0 for submit@debbugs.gnu.org; Sun, 04 May 2025 01:41:07 -0400 Received: from lists.gnu.org ([2001:470:142::17]:36836) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uBS63-0007Nd-Sm for submit@debbugs.gnu.org; Sun, 04 May 2025 01:41:04 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1uBS5f-0001jy-9m for bug-gnu-emacs@gnu.org; Sun, 04 May 2025 01:40:40 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1uBS5e-0006Le-NJ for bug-gnu-emacs@gnu.org; Sun, 04 May 2025 01:40:38 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=MIME-Version:Date:Subject:To:From:in-reply-to: references; bh=/r4ApbSf0+wtPnH82duJcN3UaGIOnjaPZHdF6xtk9iQ=; b=WvqBAXMSbc/zJh SjwHE+RhEyUOaNBlt2DH8vHB7ZcbuhL2Lf/5iyUar6GvsadmuKIgynoZbHiIaUiBcdFN0vs2os6yD urAjrYNrF83cGoX0JNktXAxw4B99hLAE+uRjqIM2IqBe8riKPOMo/FO/akx1s08iTMFDeFG8LCMrp brNcSIR4tenjZWUATOsbnO9q8t0PnqcFHZ6FFamFWaV6BxcaciX7fq7EG6Lpeq1UZ1rc27uhRNFeD jcLiCuCc3fdIuqMiv3+wn3GXEjnaJWEZ/TcDY4TRLtPd137CSr4pFuHXrberMriwI52JDpCOZ5z5W u2ZvoeD5RjfH0f+tUwfA==; From: Anush V To: bug-gnu-emacs@gnu.org Subject: 30.1; Inconsistency in imap authenticator keyword Date: Sun, 04 May 2025 01:40:15 -0400 Message-ID: <87ldrddjcw.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) X-Debbugs-Cc: MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Spam-Score: -0.0 (/) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) Hello Emacs Maintainers, 1. ;; emacs --no-init This configuration works as expected. (require 'mail-source) (add-to-list 'mail-sources '(imap :server "mail.mycorp.com" :authentication login)) This configuration works as expected but gives a warning. (require 'mail-source) (setopt mail-sources '((imap :server "mail.mycorp.com" :authentication login))) Warning =E2=96=A0 Warning (emacs): Value =E2=80=98((imap :server "mail.mycorp= .com" :authentication login))=E2=80=99 does not match type (choice (const := tag None nil) (repeat :tag List (choice :format %[Value Menu%] %v :value (f= ile) (list :tag Group parameter `mail-source' (const :format group)) (cons= :tag Spool file (const :format file) (checklist :tag Options :greedy t (g= roup :inline t (const :format :value :path) file))) (cons :tag Several fil= es in a directory (const :format directory) (checklist :tag Options :greed= y t (group :inline t (const :format :value :path) (directory :tag Path)) (= group :inline t (const :format :value :suffix) (string :tag Suffix)) (grou= p :inline t (const :format :value :predicate) (function :tag Predicate)) (= group :inline t (const :format :value :prescript) (choice :tag Prescript := value nil (string :format %v) (function :format %v))) (group :inline t (con= st :format :value :postscript) (choice :tag Postscript :value nil (string = :format %v) (function :format %v))) (group :inline t (const :format :value= :plugged) (boolean :tag Plugged)))) (cons :tag POP3 server (const :format = pop) (checklist :tag Options :greedy t (group :inline t (const :format :v= alue :server) (string :tag Server)) (group :inline t (const :format :value= :port) (choice :tag Port :value pop3 (integer :format %v) (string :format = %v))) (group :inline t (const :format :value :user) (string :tag User)) (g= roup :inline t (const :format :value :password) (string :tag Password)) (g= roup :inline t (const :format :value :program) (string :tag Program)) (gro= up :inline t (const :format :value :prescript) (choice :tag Prescript :val= ue nil (string :format %v) (function :format %v) (const :tag None nil))) (g= roup :inline t (const :format :value :postscript) (choice :tag Postscript = :value nil (string :format %v) (function :format %v) (const :tag None nil))= ) (group :inline t (const :format :value :function) (function :tag Functio= n)) (group :inline t (const :format :value :authentication) (choice :tag A= uthentication :value apop (const password) (const apop))) (group :inline t = (const :format :value :plugged) (boolean :tag Plugged)) (group :inline t (= const :format :value :stream) (choice :tag Stream :value nil (const :tag C= lear nil) (const starttls) (const :tag SSL/TLS ssl))) (group :inline t (con= st :format :value :leave) (choice :format %{Leave mail on server%}: %[Value Menu%] %v :value nil (const :tag Don't leave mails nil) (cons= t :tag Leave all mails t) (number :tag Leave mails for this many days :valu= e 14))))) (cons :tag Maildir (qmail, postfix...) (const :format maildir) (= checklist :tag Options :greedy t (group :inline t (const :format :value :p= ath) (directory :tag Path)) (group :inline t (const :format :value :plugge= d) (boolean :tag Plugged)))) (cons :tag IMAP server (const :format imap) (= checklist :tag Options :greedy t (group :inline t (const :format :value :s= erver) (string :tag Server)) (group :inline t (const :format :value :port)= (choice :tag Port :value 143 integer string)) (group :inline t (const :for= mat :value :user) (string :tag User)) (group :inline t (const :format :va= lue :password) (string :tag Password)) (group :inline t (const :format :va= lue :stream) (choice :tag Stream :value network (const gssapi) (const kerbe= ros4) (const tls) (const ssl) (const network) (const shell) (const starttls= ))) (group :inline t (const :format :value :program) (string :tag Program)= ) (group :inline t (const :format :value :authenticator) (choice :tag Auth= enticator :value login (const gssapi) (const kerberos4) (const sasl) (const= cram-md5) (const login) (const anonymous) (const digest-md5))) (group :inl= ine t (const :format :value :mailbox) (string :tag Mailbox :value INBOX)) = (group :inline t (const :format :value :predicate) (string :tag Predicate = :value UNSEEN UNDELETED)) (group :inline t (const :format :value :fetchfla= g) (string :tag Fetchflag :value \Deleted)) (group :inline t (const :format= :value :dontexpunge) (boolean :tag Dontexpunge)) (group :inline t (const = :format :value :plugged) (boolean :tag Plugged))))))) Expected Behavior: There should be no warning, since the second code snippet is functionally doing the same thing as first code snippet 2. According to info manual, gnus#Mail Source Specifiers, authenticator for im= ap is specified using the keyword :authentication. And same is reflected in the value of the variable mail-source-keyword-map But the defcustom for mail-sources in mail-source.el uses the keyboard :authenticator instead. I=E2=80=99m suspecting that these two issues are related but i=E2=80=99m no= t 100% sure Thank you for your time! * * * In GNU Emacs 30.1 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.43, cairo version 1.18.2) System Description: Guix System Configured using: 'configure CONFIG_SHELL=3D/gnu/store/m0xdsa8cfq6mq1kxgxmpmpg71la4f0b9-bash-minimal-5.= 1.16/bin/bash SHELL=3D/gnu/store/m0xdsa8cfq6mq1kxgxmpmpg71la4f0b9-bash-minimal-5.1.16/bi= n/bash --prefix=3D/gnu/store/lq0nwm8qkj9cmyjm85z3dcqrjnglhcym-emacs-next-pg= tk-30.1-rc1-2.7144e84 --enable-fast-install --with-pgtk --with-cairo --with= -modules --with-native-compilation=3Daot --disable-build-details' Configured features: ACL CAIRO DBUS FREETYPE GIF GLIB GMP GNUTLS GPM GSETTINGS HARFBUZZ JPEG LCMS2 LIBOTF LIBSELINUX LIBSYSTEMD LIBXML2 MODULES NATIVE_COMP NOTIFY INOTIFY PDUMPER PGTK PNG RSVG SECCOMP SOUND SQLITE3 THREADS TIFF TOOLKIT_SCROLL_BARS TREE_SITTER XIM GTK3 ZLIB -- Regards, Anush From debbugs-submit-bounces@debbugs.gnu.org Sun May 04 02:49:08 2025 Received: (at 78235-done) by debbugs.gnu.org; 4 May 2025 06:49:08 +0000 Received: from localhost ([127.0.0.1]:49741 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1uBT9v-000838-EQ for submit@debbugs.gnu.org; Sun, 04 May 2025 02:49:08 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:46732) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1uBT9n-000810-6C for 78235-done@debbugs.gnu.org; Sun, 04 May 2025 02:49:04 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1uBT9h-0005Cp-MX for 78235-done@debbugs.gnu.org; Sun, 04 May 2025 02:48:53 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=MIME-Version:References:Subject:In-Reply-To:To:From: Date; bh=mpBtJmW1BklJu7l4fXj99MmBI54Tk6UGT7Luv49OS6U=; b=A3jfn2PjRi5PF2uFuqKk m2bWKCHC95tFbJGUVudLEGKhZNgYNUSwMyzfQgmfcN3OBatuE3Sl3wgm7e/M8Bv2GgeWFJlJaqMkU yluqwfstXFbT1Ughci6IhEtVwYo/irhaBZTwt+vwlqEPnpC08CkdPmMNHJUQNZA3FrPV+DTvivwzf o1gq78aRteQFkNN1/YrldpiwtfWqh4rYmWB1TmmMVOSw5/o4KmTvm0Yq5/2E0apwNwKxvJhwcfyns qfLRYdoE/GoFFmd9Jl2FAj73/8mVhDokU6Fgt1xnCPDveZBn+io1EjufEy3FZzatfRRlfF6iaTVkL 7gcPnTgwUROMDA==; Date: Sun, 04 May 2025 09:48:49 +0300 Message-Id: <867c2wj2ge.fsf@gnu.org> From: Eli Zaretskii To: Anush V In-Reply-To: <87ldrddjcw.fsf@gnu.org> (message from Anush V on Sun, 04 May 2025 01:40:15 -0400) Subject: Re: bug#78235: 30.1; Inconsistency in imap authenticator keyword References: <87ldrddjcw.fsf@gnu.org> MIME-Version: 1.0 Content-Type: text/plain; charset=gb2312 Content-Transfer-Encoding: quoted-printable X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 78235-done Cc: 78235-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) > From: Anush V > Date: Sun, 04 May 2025 01:40:15 -0400 >=20 > 1. > ;; emacs --no-init >=20 > This configuration works as expected. >=20 > (require 'mail-source) > (add-to-list 'mail-sources '(imap :server "mail.mycorp.com" > :authentication login)) >=20 > This configuration works as expected but gives a warning. >=20 > (require 'mail-source) > (setopt mail-sources '((imap :server "mail.mycorp.com" > :authentication login))) >=20 > Warning >=20 > =A1=F6 Warning (emacs): Value =A1=AE((imap :server "mail.mycorp.com= " :authentication login))=A1=AF does not match type (choice (const :tag Non= e nil) (repeat :tag List (choice :format %[Value Menu%] %v :value (file) (l= ist :tag Group parameter `mail-source' (const :format group)) (cons :tag S= pool file (const :format file) (checklist :tag Options :greedy t (group :i= nline t (const :format :value :path) file))) (cons :tag Several files in a= directory (const :format directory) (checklist :tag Options :greedy t (gr= oup :inline t (const :format :value :path) (directory :tag Path)) (group := inline t (const :format :value :suffix) (string :tag Suffix)) (group :inli= ne t (const :format :value :predicate) (function :tag Predicate)) (group := inline t (const :format :value :prescript) (choice :tag Prescript :value n= il (string :format %v) (function :format %v))) (group :inline t (const :for= mat :value :postscript) (choice :tag Postscript :value nil (string :format= %v) (function :format %v))) (group :inline t (const :format :value :plugg= ed) (boolean :tag Plugged)))) (cons :tag POP3 server (const :format pop) (= checklist :tag Options :greedy t (group :inline t (const :format :value :s= erver) (string :tag Server)) (group :inline t (const :format :value :port)= (choice :tag Port :value pop3 (integer :format %v) (string :format %v))) (= group :inline t (const :format :value :user) (string :tag User)) (group :i= nline t (const :format :value :password) (string :tag Password)) (group :i= nline t (const :format :value :program) (string :tag Program)) (group :inl= ine t (const :format :value :prescript) (choice :tag Prescript :value nil = (string :format %v) (function :format %v) (const :tag None nil))) (group :i= nline t (const :format :value :postscript) (choice :tag Postscript :value = nil (string :format %v) (function :format %v) (const :tag None nil))) (grou= p :inline t (const :format :value :function) (function :tag Function)) (gr= oup :inline t (const :format :value :authentication) (choice :tag Authenti= cation :value apop (const password) (const apop))) (group :inline t (const = :format :value :plugged) (boolean :tag Plugged)) (group :inline t (const := format :value :stream) (choice :tag Stream :value nil (const :tag Clear ni= l) (const starttls) (const :tag SSL/TLS ssl))) (group :inline t (const :for= mat :value :leave) (choice :format %{Leave mail on server%}: > %[Value Menu%] %v :value nil (const :tag Don't leave mails nil) (co= nst :tag Leave all mails t) (number :tag Leave mails for this many days :va= lue 14))))) (cons :tag Maildir (qmail, postfix...) (const :format maildir)= (checklist :tag Options :greedy t (group :inline t (const :format :value = :path) (directory :tag Path)) (group :inline t (const :format :value :plug= ged) (boolean :tag Plugged)))) (cons :tag IMAP server (const :format imap)= (checklist :tag Options :greedy t (group :inline t (const :format :value = :server) (string :tag Server)) (group :inline t (const :format :value :por= t) (choice :tag Port :value 143 integer string)) (group :inline t (const :f= ormat :value :user) (string :tag User)) (group :inline t (const :format := value :password) (string :tag Password)) (group :inline t (const :format := value :stream) (choice :tag Stream :value network (const gssapi) (const ker= beros4) (const tls) (const ssl) (const network) (const shell) (const startt= ls))) (group :inline t (const :format :value :program) (string :tag Progra= m)) (group :inline t (const :format :value :authenticator) (choice :tag Au= thenticator :value login (const gssapi) (const kerberos4) (const sasl) (con= st cram-md5) (const login) (const anonymous) (const digest-md5))) (group :i= nline t (const :format :value :mailbox) (string :tag Mailbox :value INBOX)= ) (group :inline t (const :format :value :predicate) (string :tag Predicat= e :value UNSEEN UNDELETED)) (group :inline t (const :format :value :fetchf= lag) (string :tag Fetchflag :value \Deleted)) (group :inline t (const :form= at :value :dontexpunge) (boolean :tag Dontexpunge)) (group :inline t (cons= t :format :value :plugged) (boolean :tag Plugged))))))) >=20 >=20 > Expected Behavior: There should be no warning, since the second code > snippet is functionally doing the same thing as first code snippet >=20 >=20 > 2. > According to info manual, gnus#Mail Source Specifiers, authenticator for = imap is > specified using the keyword :authentication. And same is reflected in > the value of the variable mail-source-keyword-map >=20 > But the defcustom for mail-sources in mail-source.el uses the > keyboard :authenticator instead. >=20 > I=A1=AFm suspecting that these two issues are related but i=A1=AFm not 10= 0% sure Yes, thanks. Now fixed on the emacs-30 branch, and closing the bug. From unknown Mon Aug 18 19:26:14 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Sun, 01 Jun 2025 11:24:25 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator