From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: OGAWA Hirofumi Newsgroups: gmane.emacs.bugs Subject: bug#32880: 27.0.50; sieve-upload doesn't work if no sieve-buffer Date: Sun, 30 Sep 2018 08:27:33 +0900 Message-ID: <878t3jevfe.fsf@mail.parknet.co.jp> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-2022-jp X-Trace: blaine.gmane.org 1538263578 10531 195.159.176.226 (29 Sep 2018 23:26:18 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sat, 29 Sep 2018 23:26:18 +0000 (UTC) User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.0.50 (gnu/linux) To: 32880@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Sep 30 01:26:14 2018 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1g6Ocm-0002ah-M2 for geb-bug-gnu-emacs@m.gmane.org; Sun, 30 Sep 2018 01:26:12 +0200 Original-Received: from localhost ([::1]:52985 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1g6Oes-0004Dy-Rv for geb-bug-gnu-emacs@m.gmane.org; Sat, 29 Sep 2018 19:28:22 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:35389) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1g6Oee-0004Dp-Lg for bug-gnu-emacs@gnu.org; Sat, 29 Sep 2018 19:28:09 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1g6Oea-0007Qa-8e for bug-gnu-emacs@gnu.org; Sat, 29 Sep 2018 19:28:08 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:55012) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1g6OeY-0007Of-4S for bug-gnu-emacs@gnu.org; Sat, 29 Sep 2018 19:28:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1g6OeX-0004n2-TT for bug-gnu-emacs@gnu.org; Sat, 29 Sep 2018 19:28:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: OGAWA Hirofumi Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 29 Sep 2018 23:28:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 32880 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.153826367918401 (code B ref -1); Sat, 29 Sep 2018 23:28:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 29 Sep 2018 23:27:59 +0000 Original-Received: from localhost ([127.0.0.1]:59270 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1g6OeV-0004mh-1H for submit@debbugs.gnu.org; Sat, 29 Sep 2018 19:27:59 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:53945) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1g6OeT-0004mN-J2 for submit@debbugs.gnu.org; Sat, 29 Sep 2018 19:27:58 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1g6OeG-0007LB-I5 for submit@debbugs.gnu.org; Sat, 29 Sep 2018 19:27:47 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:40740) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1g6OeG-0007L7-8j for submit@debbugs.gnu.org; Sat, 29 Sep 2018 19:27:44 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:35318) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1g6OeE-0004DS-NX for bug-gnu-emacs@gnu.org; Sat, 29 Sep 2018 19:27:44 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1g6OeA-0007K5-Mo for bug-gnu-emacs@gnu.org; Sat, 29 Sep 2018 19:27:42 -0400 Original-Received: from mail.parknet.co.jp ([210.171.160.6]:38454) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1g6OeA-0007JE-75 for bug-gnu-emacs@gnu.org; Sat, 29 Sep 2018 19:27:38 -0400 Original-Received: from ibmpc.myhome.or.jp (server.parknet.ne.jp [210.171.168.39]) by mail.parknet.co.jp (Postfix) with ESMTPSA id 193F915AF4A for ; Sun, 30 Sep 2018 08:27:35 +0900 (JST) Original-Received: from devron.myhome.or.jp (foobar@devron.myhome.or.jp [192.168.0.3]) by ibmpc.myhome.or.jp (8.15.2/8.15.2/Debian-12) with ESMTPS id w8TNRXin026178 (version=TLSv1.2 cipher=ECDHE-RSA-AES256-GCM-SHA384 bits=256 verify=NOT) for ; Sun, 30 Sep 2018 08:27:34 +0900 Original-Received: from devron.myhome.or.jp (foobar@localhost [127.0.0.1]) by devron.myhome.or.jp (8.15.2/8.15.2/Debian-12) with ESMTPS id w8TNRXXJ008000 (version=TLSv1.2 cipher=ECDHE-RSA-AES256-GCM-SHA384 bits=256 verify=NOT) for ; Sun, 30 Sep 2018 08:27:33 +0900 Original-Received: (from hirofumi@localhost) by devron.myhome.or.jp (8.15.2/8.15.2/Submit) id w8TNRXJq007999; Sun, 30 Sep 2018 08:27:33 +0900 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] [fuzzy] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.org gmane.emacs.bugs:150774 Archived-At: `sieve-upload' uploads `current-buffer' to sieve daemon. But it doesn't work as expected if `sieve-buffer' is nil. Because if `sieve-buffer' is nil, it calls `sieve-manage' to open network stream, then `sieve-manage' changes `current-buffer'. This fixes it by using `save-current-buffer' to call `sieve-manage'. --- lisp/net/sieve.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff -puN lisp/net/sieve.el~sieve-fixes lisp/net/sieve.el --- emacs/lisp/net/sieve.el~sieve-fixes 2018-09-30 07:33:22.576515187 +0900 +++ emacs-hirofumi/lisp/net/sieve.el 2018-09-30 07:33:22.577515181 +0900 @@ -345,7 +345,8 @@ Used to bracket operations which move po ;;;###autoload (defun sieve-upload (&optional name) (interactive) - (when (or (get-buffer sieve-buffer) (call-interactively 'sieve-manage)) + (when (or (get-buffer sieve-buffer) + (save-current-buffer (call-interactively 'sieve-manage))) (let ((script (buffer-string)) err) (with-current-buffer (get-buffer sieve-buffer) (setq err (sieve-manage-putscript _ In GNU Emacs 27.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.22.30) of 2018-08-04 built on devron Repository revision: da0054c30729e58259c1e7251cb03c8ef13ff943 Windowing system distributor 'The X.Org Foundation', version 11.0.12001000 System Description: Debian GNU/Linux buster/sid Recent messages: Sorry, can’t move spam from spam group nnimap+ibmpc.myhome.or.jp:Junk to spam group nnimap+ibmpc.myhome.or.jp:Junk 3 spam messages were registered by backend spam-use-move. Expiring articles...done Saving /home/hirofumi/.newsrc.eld... Saving file /home/hirofumi/.newsrc.eld... Wrote /home/hirofumi/.newsrc.eld Saving /home/hirofumi/.newsrc.eld...done Making completion list... [2 times] Quit [2 times] Mark saved where search started Configured using: 'configure --libexecdir=/usr/local/lib --with-x --with-x-toolkit=gtk3 --without-xim --with-xpm --with-jpeg --with-tiff --with-gif --with-png --with-rsvg --with-dbus --with-wide-int --with-modules' Configured features: XPM JPEG TIFF GIF PNG RSVG IMAGEMAGICK SOUND DBUS GSETTINGS NOTIFY ACL LIBSELINUX GNUTLS LIBXML2 FREETYPE M17N_FLT LIBOTF XFT ZLIB TOOLKIT_SCROLL_BARS GTK3 X11 MODULES THREADS JSON LCMS2 Important settings: value of $LANG: ja_JP.UTF-8 value of $XMODIFIERS: @im=ibus locale-coding-system: utf-8-unix Major mode: Group Minor modes in effect: shell-dirtrack-mode: t gnus-topic-mode: t gnus-undo-mode: t flycheck-pos-tip-mode: t global-flycheck-mode: t auto-insert-mode: t yas-global-mode: t yas-minor-mode: t global-company-mode: t company-mode: t savehist-mode: t eyebrowse-mode: t icomplete-mode: t show-paren-mode: t tooltip-mode: t global-eldoc-mode: t electric-indent-mode: t mouse-wheel-mode: t file-name-shadow-mode: t global-font-lock-mode: t font-lock-mode: t auto-composition-mode: t auto-encryption-mode: t auto-compression-mode: t buffer-read-only: t column-number-mode: t line-number-mode: t Load-path shadows: None found. Features: (shadow emacsbug apropos edebug backtrace info wgrep shell pcomplete eieio-opt speedbar sb-image ezimage dframe pulse semantic/symref/grep grep compile comint semantic/symref semantic/util-modes semantic/util semantic semantic/tag semantic/lex semantic/fw mode-local cedet vc-mtn vc-hg vc-bzr vc-src vc-sccs vc-svn vc-cvs vc-rcs vc vc-dispatcher cl-print thingatpt help-fns radix-tree misearch multi-isearch dired-aux sendmail nnir bbdb-gui bbdb-hooks gnus-dup url-http url-gw url-auth url-cache jka-compr gnus-notifications gnus-fun notifications dbus hl-line elfeed-show elfeed-search bookmark elfeed-csv elfeed elfeed-curl elfeed-log elfeed-db elfeed-lib avl-tree generator url-queue xml-query pp sort gnus-cite shr-color color shr text-property-search svg xml dom browse-url qp mm-archive gnus-async gnus-bcklg gnus-ml disp-table gnus-topic utf-7 rfc2104 gnutls network-stream nsm nnfolder bbdb-gnus bbdb-snarf mail-extr nnnil spam spam-stat bbdb-com warnings bbdb timezone gnus-uu yenc gnus-demon gnus-delay gnus-draft gnus-agent gnus-srvr gnus-score score-mode nnvirtual nntp gnus-cache gnus-msg gnus-art mm-uu mml2015 mm-view mml-smime smime dig gnus-sum nndraft nnmh gnus-group gnus-undo gnus-start gnus-cloud nnimap nnmail mail-source utf7 netrc nnoo parse-time gnus-spec gnus-int gnus-range message rmc puny rfc822 mml mml-sec epa mm-decode mm-bodies mm-encode mail-parse rfc2231 mailabbrev gmm-utils mailheader gnus-win gnus nnheader gnus-util rmail rmail-loaddefs rfc2047 rfc2045 ietf-drums mail-utils wid-edit dircolors-faces ansi-color dired-x dired dired-loaddefs company-yasnippet flyspell ispell server generic-x multi-translate google-translate-smooth-ui google-translate google-translate-default-ui google-translate-core-ui ido google-translate-core google-translate-tk url url-proxy url-privacy url-expand url-methods url-history url-cookie url-domsuf url-util mailcap magit-autoloads git-modes-autoloads flycheck-pos-tip pos-tip flycheck find-func autoinsert yasnippet elec-pair company-oddmuse company-keywords company-etags etags xref project ring company-gtags company-dabbrev-code company-dabbrev company-files company-capf company-cmake company-xcode company-clang company-semantic company-eclim company-template company-bbdb company edmacro kmacro bbdb-autoloads savehist browse-kill-ring cl eyebrowse-session desktop frameset eyebrowse format-spec dash icomplete paren mozc-im-indicater mozc-popup popup mozc-im advice mm-util mail-prsvr time-date mule-util mozc rx finder-inf package let-alist derived pcase cl-extra help-mode easymenu url-handlers url-parse auth-source cl-seq eieio eieio-core cl-macs eieio-loaddefs password-cache json map url-vars seq byte-opt gv bytecomp byte-compile cconv epg epg-config subr-x cl-loaddefs cl-lib japan-util tooltip eldoc electric uniquify ediff-hook vc-hooks lisp-float-type mwheel term/x-win x-win term/common-win x-dnd tool-bar dnd fontset image regexp-opt fringe tabulated-list replace newcomment text-mode elisp-mode lisp-mode prog-mode register page menu-bar rfn-eshadow isearch timer select scroll-bar mouse jit-lock font-lock syntax facemenu font-core term/tty-colors frame cl-generic cham georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean japanese eucjp-ms cp51932 hebrew greek romanian slovak czech european ethiopic indian cyrillic chinese composite charscript charprop case-table epa-hook jka-cmpr-hook help simple abbrev obarray minibuffer cl-preloaded nadvice loaddefs button faces cus-face macroexp files text-properties overlay sha1 md5 base64 format env code-pages mule custom widget hashtable-print-readable backquote threads dbusbind inotify lcms2 dynamic-setting system-font-setting font-render-setting move-toolbar gtk x-toolkit x multi-tty make-network-process emacs) Memory information: ((conses 16 842374 184907) (symbols 48 49050 109) (miscs 40 653 2447) (strings 32 391245 18606) (string-bytes 1 14422662) (vectors 16 136748) (vector-slots 8 2577719 173822) (floats 8 23424 982) (intervals 56 12861 870) (buffers 992 64)) -- OGAWA Hirofumi