summaryrefslogtreecommitdiff
path: root/lisp/gnus/plstore.el
diff options
context:
space:
mode:
authorGnus developers <ding@gnus.org>2011-09-10 23:30:53 +0000
committerKatsumi Yamaoka <yamaoka@jpl.org>2011-09-10 23:30:53 +0000
commite21bac426b787ac0f03c3a64341ec98995ea8262 (patch)
treea3877a583cca99774594050a192fde13e57e7b78 /lisp/gnus/plstore.el
parent3199b96fc585576ffb2ced6542a2bc2d6172f510 (diff)
downloademacs-e21bac426b787ac0f03c3a64341ec98995ea8262.tar.gz
emacs-e21bac426b787ac0f03c3a64341ec98995ea8262.tar.bz2
emacs-e21bac426b787ac0f03c3a64341ec98995ea8262.zip
Merge changes made in Gnus trunk.
gnus.texi: Remove mentions of `recent', which are now obsolete. (Interactive): Document `quiet'. nnimap.el: Redo the charset handling. Let Gnus encode the names, as it does with all other backends, but decode the names immediately after getting them. gnus-group.el (gnus-group-name-charset): Always return `utf-7' when decoding nnimap groups. gnus.el (gnus-variable-list): Don't save `gnus-format-specs' in the newsrc file. It doesn't seem like an important optimisation any more. nnimap.el (nnimap-transform-headers): Fix regexp to be less prone to overflows. gnus.el (gnus-article-mark-lists): Remove `recent'. (gnus-interactive-exit): Extend to `quiet'. gnus-sum.el (gnus-offer-save-summaries): Use it. gnus-art.el (gnus-treat-hide-citation-maybe): Add more doc to the string. plstore.el (plstore--get-buffer): Silence compiler warnings by renaming function arguments from `this'. gnus-sum.el (gnus-newsgroup-recent): Removed. gnus-spec.el (gnus-lrm-string-p): `bidi-string-mark-left-to-right' has been renamed. (gnus-lrm-string-p): Include RLM and PDF, too. gnus-int.el (gnus-open-server): Make the "denied" message clearer (bug#9225).
Diffstat (limited to 'lisp/gnus/plstore.el')
-rw-r--r--lisp/gnus/plstore.el44
1 files changed, 22 insertions, 22 deletions
diff --git a/lisp/gnus/plstore.el b/lisp/gnus/plstore.el
index 5f9a61aa843..ab78e508480 100644
--- a/lisp/gnus/plstore.el
+++ b/lisp/gnus/plstore.el
@@ -135,38 +135,38 @@ May either be a string or a list of strings.")
(message "%s...%d%%" handback
(if (> total 0) (floor (* (/ current (float total)) 100)) 0))))
-(defun plstore--get-buffer (this)
- (aref this 0))
+(defun plstore--get-buffer (arg)
+ (aref arg 0))
-(defun plstore--get-alist (this)
- (aref this 1))
+(defun plstore--get-alist (arg)
+ (aref arg 1))
-(defun plstore--get-encrypted-data (this)
- (aref this 2))
+(defun plstore--get-encrypted-data (arg)
+ (aref arg 2))
-(defun plstore--get-secret-alist (this)
- (aref this 3))
+(defun plstore--get-secret-alist (arg)
+ (aref arg 3))
-(defun plstore--get-merged-alist (this)
- (aref this 4))
+(defun plstore--get-merged-alist (arg)
+ (aref arg 4))
-(defun plstore--set-buffer (this buffer)
- (aset this 0 buffer))
+(defun plstore--set-buffer (arg buffer)
+ (aset arg 0 buffer))
-(defun plstore--set-alist (this plist)
- (aset this 1 plist))
+(defun plstore--set-alist (arg plist)
+ (aset arg 1 plist))
-(defun plstore--set-encrypted-data (this encrypted-data)
- (aset this 2 encrypted-data))
+(defun plstore--set-encrypted-data (arg encrypted-data)
+ (aset arg 2 encrypted-data))
-(defun plstore--set-secret-alist (this secret-alist)
- (aset this 3 secret-alist))
+(defun plstore--set-secret-alist (arg secret-alist)
+ (aset arg 3 secret-alist))
-(defun plstore--set-merged-alist (this merged-alist)
- (aset this 4 merged-alist))
+(defun plstore--set-merged-alist (arg merged-alist)
+ (aset arg 4 merged-alist))
-(defun plstore-get-file (this)
- (buffer-file-name (plstore--get-buffer this)))
+(defun plstore-get-file (arg)
+ (buffer-file-name (plstore--get-buffer arg)))
(defun plstore--make (&optional buffer alist encrypted-data secret-alist
merged-alist)