Mercurial > hg > xemacs-beta

diff lisp/extents.el @ 211:78478c60bfcd r20-4b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-4b4
author cvs
date Mon, 13 Aug 2007 10:05:51 +0200
parents 41ff10fd062f
children c5d627a313b1
line wrap: on
line diff
--- a/lisp/extents.el	Mon Aug 13 10:05:01 2007 +0200
+++ b/lisp/extents.el	Mon Aug 13 10:05:51 2007 +0200
@@ -95,4 +95,8 @@
   "Set EXTENT's `keymap' property to KEYMAP."
   (set-extent-property extent 'keymap keymap))
 
+(defun extent-keymap (extent)
+  "Return EXTENT's `keymap' property."
+  (extent-property extent 'keymap))
+
 ;;; extents.el ends here