diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-01-31 17:38:38 -0500 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-01-31 17:38:38 -0500 |
commit | 11abc4aef42ceaea451c264e5a7292e765d4f31b (patch) | |
tree | f08a48e93e5d1b5ef773bc66f8178b0795e98cac /lisp/gnus/gnus-mh.el | |
parent | cb72b8345b4c6741650c4cff8844716386acaf23 (diff) | |
parent | d2341eb0fb8139f92955c1462ee7b965befdccee (diff) | |
download | emacs-11abc4aef42ceaea451c264e5a7292e765d4f31b.tar.gz |
Merge remote-tracking branch 'origin/scratch/lexical-gnus' into trunk
Diffstat (limited to 'lisp/gnus/gnus-mh.el')
-rw-r--r-- | lisp/gnus/gnus-mh.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-mh.el b/lisp/gnus/gnus-mh.el index b26b736d055..fc8d9be8d6d 100644 --- a/lisp/gnus/gnus-mh.el +++ b/lisp/gnus/gnus-mh.el @@ -1,4 +1,4 @@ -;;; gnus-mh.el --- mh-e interface for Gnus +;;; gnus-mh.el --- mh-e interface for Gnus -*- lexical-binding: t; -*- ;; Copyright (C) 1994-2021 Free Software Foundation, Inc. @@ -95,7 +95,7 @@ Optional argument FOLDER specifies folder name." (kill-buffer errbuf)))) (setq gnus-newsgroup-last-folder folder))) -(defun gnus-Folder-save-name (newsgroup headers &optional last-folder) +(defun gnus-Folder-save-name (newsgroup _headers &optional last-folder) "Generate folder name from NEWSGROUP, HEADERS, and optional LAST-FOLDER. If variable `gnus-use-long-file-name' is nil, it is +News.group. Otherwise, it is like +news/group." @@ -105,7 +105,7 @@ Otherwise, it is like +news/group." (gnus-capitalize-newsgroup newsgroup) (gnus-newsgroup-directory-form newsgroup))))) -(defun gnus-folder-save-name (newsgroup headers &optional last-folder) +(defun gnus-folder-save-name (newsgroup _headers &optional last-folder) "Generate folder name from NEWSGROUP, HEADERS, and optional LAST-FOLDER. If variable `gnus-use-long-file-name' is nil, it is +news.group. Otherwise, it is like +news/group." |