X-Git-Url: https://iankelling.org/git/?p=visible-mark;a=blobdiff_plain;f=visible-mark.el;h=5f9781b14629ef8243997f072dd51956e6c0b8d4;hp=2e4f5aa246212d215b48ea4556306675cce1ba3c;hb=80a3159bb5f944388543becd713ef955aa4893bf;hpb=56b5dbcfe64efe4b1aee6c5e8b29edc22ccde3bf diff --git a/visible-mark.el b/visible-mark.el index 2e4f5aa..5f9781b 100644 --- a/visible-mark.el +++ b/visible-mark.el @@ -3,7 +3,9 @@ ;; Copyright (C) 2014 by Ian Kelling ;; Maintainer: Ian Kelling +;; Mailing list: https://lists.iankelling.org/listinfo/visible-mark ;; Author: Ian Kelling +;; Author: Yann Hodique ;; Author: MATSUYAMA Tomohiro ;; Author: John Foerch ;; Keywords: marking color faces @@ -54,20 +56,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 @@ -75,7 +63,7 @@ ;; gets styled with the mark's face. May also happen for left margins, but ;; haven't tested yet. ;; -;; Patches / pull requests welcome. +;; Patches / pull requests / feedback welcome. ;;; Code: @@ -242,6 +230,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 +243,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)