branch: externals/fountain-mode
commit c1a01e31ee9c3e01c7b20d4bfc914993a6b54d20
Author: Paul W. Rankin <he...@paulwrankin.com>
Commit: Paul W. Rankin <he...@paulwrankin.com>

    Remove old page-count vars/options
---
 fountain-mode.el | 28 ----------------------------
 1 file changed, 28 deletions(-)

diff --git a/fountain-mode.el b/fountain-mode.el
index 00fb749..c493f82 100644
--- a/fountain-mode.el
+++ b/fountain-mode.el
@@ -1373,34 +1373,6 @@ script, you may get incorrect output."
   :type 'boolean
   :safe 'booleanp)
 
-(defvar fountain-page-count-timer
-  nil)
-
-(defvar-local fountain-page-count-string
-  nil)
-
-(defcustom fountain-pages-count-delay
-  2.0
-  "Idle time in seconds before calculating page count."
-  :type 'number
-  :safe 'numberp)
-
-(defcustom fountain-pages-show-in-mode-line
-  nil
-  "If non-nil show current page of total pages in mode-line."
-  :type '(choice (const :tag "No page count" nil)
-                 (const :tag "Show with manual update" force)
-                 (const :tag "Show with automatic update" timer))
-  :safe (lambda (value) (memq value '(nil force timer)))
-  :set (lambda (symbol value)
-         (set-default symbol value)
-         ;; Don't call fountain-count-pages-maybe while in the middle of
-         ;; loading this file!
-         (when (featurep 'fountain-mode)
-           (dolist (buffer (buffer-list))
-             (with-current-buffer buffer
-               (fountain-count-pages-maybe value))))))
-
 (defvar fountain-elements
   '((section-heading
      :tag "Section Heading"

Reply via email to