summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-ems.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/gnus/gnus-ems.el')
-rw-r--r--lisp/gnus/gnus-ems.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/gnus/gnus-ems.el b/lisp/gnus/gnus-ems.el
index bc85e4960d4..aed471c38f4 100644
--- a/lisp/gnus/gnus-ems.el
+++ b/lisp/gnus/gnus-ems.el
@@ -209,6 +209,11 @@
(setq start end
end nil))))))
+(defmacro gnus-string-mark-left-to-right (string)
+ (if (fboundp 'string-mark-left-to-right)
+ `(string-mark-left-to-right ,string)
+ string))
+
(eval-and-compile
;; XEmacs does not have window-inside-pixel-edges
(defalias 'gnus-window-inside-pixel-edges