aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorPaul Eggert2011-07-25 09:26:30 -0700
committerPaul Eggert2011-07-25 09:26:30 -0700
commitea8db5520cb3d1aa7c682cbcd22f80e7a9188169 (patch)
tree3e24b36136cd3b3c1b7f5d60a011997f98364e29 /lisp
parentccd80c5525ba298b055e43f83830e9090b9b1887 (diff)
parent2238127283d703f38765f9b3f6a64f799d18e9e5 (diff)
downloademacs-ea8db5520cb3d1aa7c682cbcd22f80e7a9188169.tar.gz
emacs-ea8db5520cb3d1aa7c682cbcd22f80e7a9188169.zip
Merge from trunk.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/gnus/ChangeLog4
-rw-r--r--lisp/gnus/nnimap.el10
-rw-r--r--lisp/image.el4
4 files changed, 15 insertions, 7 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4f03b9b97d5..93674179121 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12011-07-25 Deniz Dogan <deniz@dogan.se>
2
3 * image.el (insert-image): Clarifying docstring.
4
12011-07-24 Michael Albinus <michael.albinus@gmx.de> 52011-07-24 Michael Albinus <michael.albinus@gmx.de>
2 6
3 * net/tramp-sh.el (tramp-barf-unless-okay): Return the value of 7 * net/tramp-sh.el (tramp-barf-unless-okay): Return the value of
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 400abd51c27..f90e180b128 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
12011-07-24 Andrew Cohen <cohen@andy.bu.edu>
2
3 * nnimap.el (nnimap-make-thread-query): Quote message-ids for gmail.
4
12011-07-23 Andrew Cohen <cohen@andy.bu.edu> 52011-07-23 Andrew Cohen <cohen@andy.bu.edu>
2 6
3 * nnir.el (nnir-search-thread): New function to make an nnir group 7 * nnir.el (nnir-search-thread): New function to make an nnir group
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 8a0d635ef7b..52de48869d8 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -1947,13 +1947,13 @@ textual parts.")
1947 (refs (split-string 1947 (refs (split-string
1948 (or (mail-header-references header) 1948 (or (mail-header-references header)
1949 ""))) 1949 "")))
1950 (value 1950 (value
1951 (format 1951 (format
1952 "(OR HEADER REFERENCES %s HEADER Message-Id %s)" 1952 "(OR HEADER REFERENCES %S HEADER Message-Id %S)"
1953 id id))) 1953 id id)))
1954 (dolist (refid refs value) 1954 (dolist (refid refs value)
1955 (setq value (format 1955 (setq value (format
1956 "(OR (OR HEADER Message-Id %s HEADER REFERENCES %s) %s)" 1956 "(OR (OR HEADER Message-Id %S HEADER REFERENCES %S) %s)"
1957 refid refid value))))) 1957 refid refid value)))))
1958 1958
1959 1959
diff --git a/lisp/image.el b/lisp/image.el
index c6862622639..30362251664 100644
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -413,8 +413,8 @@ means display it in the right marginal area."
413(defun insert-image (image &optional string area slice) 413(defun insert-image (image &optional string area slice)
414 "Insert IMAGE into current buffer at point. 414 "Insert IMAGE into current buffer at point.
415IMAGE is displayed by inserting STRING into the current buffer 415IMAGE is displayed by inserting STRING into the current buffer
416with a `display' property whose value is the image. STRING is 416with a `display' property whose value is the image. STRING
417defaulted if you omit it. 417defaults to the empty string if you omit it.
418AREA is where to display the image. AREA nil or omitted means 418AREA is where to display the image. AREA nil or omitted means
419display it in the text area, a value of `left-margin' means 419display it in the text area, a value of `left-margin' means
420display it in the left marginal area, a value of `right-margin' 420display it in the left marginal area, a value of `right-margin'