X-Git-Url: https://iankelling.org/git/?p=visible-mark;a=blobdiff_plain;f=visible-mark.el;h=569b34a20d64c368af520620dc7abef45baba421;hp=2e4f5aa246212d215b48ea4556306675cce1ba3c;hb=261db674c6679b60c30e9fd67f934cff79f5489a;hpb=56b5dbcfe64efe4b1aee6c5e8b29edc22ccde3bf diff --git a/visible-mark.el b/visible-mark.el index 2e4f5aa..569b34a 100644 --- a/visible-mark.el +++ b/visible-mark.el @@ -4,6 +4,7 @@ ;; Maintainer: Ian Kelling ;; Author: Ian Kelling +;; Author: Yann Hodique ;; Author: MATSUYAMA Tomohiro ;; Author: John Foerch ;; Keywords: marking color faces @@ -54,20 +55,6 @@ ;; http://www.emacswiki.org/emacs/MarkCommands ;; and http://www.emacswiki.org/emacs/VisibleMark -;;; Pre-git history: -;; -;; 2008-02-21 MATSUYAMA Tomohiro -;; -;; * visible-mark.el: Added function to inhibit trailing overlay. -;; -;; 2008-01-31 MATSUYAMA Tomohiro -;; -;; * visible-mark.el: Create formal emacs lisp file from -;; http://www.emacswiki.org/cgi-bin/wiki/VisibleMark. -;; Yann Hodique and Jorgen Schäfer are original authors. -;; Added function to make multiple marks visible. -;; -;; ;; Known bugs ;; ;; Observed in circe, when the buffer has a right margin, and there @@ -242,6 +229,7 @@ the last defined face will be reused." (t t)) (visible-mark-mode t))) +;;;###autoload (define-minor-mode visible-mark-mode "A mode to make the mark visible." nil nil nil @@ -254,6 +242,7 @@ the last defined face will be reused." (setq visible-mark-overlays nil) (remove-hook 'post-command-hook 'visible-mark-move-overlays t))) +;;;###autoload (define-global-minor-mode global-visible-mark-mode visible-mark-mode visible-mark-mode-maybe :group 'visible-mark)