projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Use overlay functions directly
[gnus]
/
lisp
/
messagexmas.el
diff --git
a/lisp/messagexmas.el
b/lisp/messagexmas.el
index
e4602d0
..
22f93e5
100644
(file)
--- a/
lisp/messagexmas.el
+++ b/
lisp/messagexmas.el
@@
-1,7
+1,6
@@
;;; messagexmas.el --- XEmacs extensions to message
;;; messagexmas.el --- XEmacs extensions to message
-;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2003, 2004,
-;; 2005, 2008, 2009, 2010 Free Software Foundation, Inc.
+;; Copyright (C) 1996-2015 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: mail, news
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: mail, news
@@
-19,9
+18,7
@@
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING. If not, write to the
-;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
-;; Boston, MA 02110-1301, USA.
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
;;; Commentary:
@@
-136,7
+133,7
@@
the width is used for the toolbar displayed on the right or the left.")
(set-specifier left-toolbar-visible-p nil cur)))))
(defun message-xmas-exchange-point-and-mark ()
(set-specifier left-toolbar-visible-p nil cur)))))
(defun message-xmas-exchange-point-and-mark ()
- "Exchange point and mark, but allow for XEmacs' optional argument."
+ "Exchange point and mark, but allow for XEmacs'
s
optional argument."
(exchange-point-and-mark message-xmas-dont-activate-region))
(defun message-xmas-maybe-fontify ()
(exchange-point-and-mark message-xmas-dont-activate-region))
(defun message-xmas-maybe-fontify ()
@@
-185,9
+182,6
@@
If NOW, use that time instead."
'region-exists-p)
(defalias 'message-make-caesar-translation-table
'message-xmas-make-caesar-translation-table)
'region-exists-p)
(defalias 'message-make-caesar-translation-table
'message-xmas-make-caesar-translation-table)
- (defalias 'message-make-overlay 'make-extent)
- (defalias 'message-delete-overlay 'delete-extent)
- (defalias 'message-overlay-put 'set-extent-property)
(defalias 'message-make-date 'message-xmas-make-date))
(message-xmas-redefine)
(defalias 'message-make-date 'message-xmas-make-date))
(message-xmas-redefine)