X-Git-Url: https://iankelling.org/git/?a=blobdiff_plain;f=spray.el;h=8fa8bce4ddfacf51be450481aabb8360936638c3;hb=2bf8adc2e3392716343b4c942a1737ff33f79df5;hp=29a95a09d4136dc46471f9a90141b893edfd46bb;hpb=091c1d22fdca14e2cb7e3170c5f8ec191d996280;p=spray diff --git a/spray.el b/spray.el index 29a95a0..8fa8bce 100644 --- a/spray.el +++ b/spray.el @@ -4,17 +4,16 @@ ;; This program is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation; either version 2 of the License, or +;; the Free Software Foundation, either version 3 of the License, or ;; (at your option) any later version. -;; + ;; This program is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of -;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. -;; + ;; You should have received a copy of the GNU General Public License -;; along with this program; if not, write to the Free Software -;; Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA +;; along with this program. If not, see . ;; Maintainer: Ian Kelling ;; Author: Ian Kelling @@ -22,6 +21,7 @@ ;; Created: 18 Jun 2014 ;; Version: 0.0.2 ;; URL: https://github.com/ian-kelling/spray +;; Mailing list: https://lists.iankelling.org/listinfo/spray ;; Keywords: convenience ;;; Commentary: @@ -124,7 +124,8 @@ decreasing by one for each subsequent word." :type 'integer) (defcustom spray-unsupported-minor-modes - '(buffer-face-mode smartparens-mode highlight-symbol-mode) + '(buffer-face-mode smartparens-mode highlight-symbol-mode + column-number-mode) "Minor modes to toggle off when in spray mode." :group 'spray :type '(list symbol)) @@ -269,7 +270,7 @@ decreasing by one for each subsequent word." (t (widen) (if (eobp) - (spray-mode -1) + (spray-quit) (when (not (zerop spray--first-words)) (setq spray--initial-delay spray--first-words) (setq spray--first-words (1- spray--first-words)))