[nongnu] elpa/subed 19efbb8 161/389: Rename subed--mode-enabled to subed-mode--enabled-p

[ELPA Syncer]

branch: elpa/subed
commit 19efbb8ed719749def71b3348063fbbd75ca4576
Author: Random User <rndusr@posteo.de>
Commit: Random User <rndusr@posteo.de>

    Rename subed--mode-enabled to subed-mode--enabled-p
---
 subed/subed-config.el |  6 +++---
 subed/subed-mpv.el    |  2 +-
 subed/subed.el        | 16 ++++++++--------
 3 files changed, 12 insertions(+), 12 deletions(-)

diff --git a/subed/subed-config.el b/subed/subed-config.el
index 32fc14c..421fdc8 100644
--- a/subed/subed-config.el
+++ b/subed/subed-config.el
@@ -81,12 +81,12 @@
   :group 'hypermedia
   :prefix "subed-")
 
-(defvar-local subed--mode-enabled nil
+(defvar-local subed-mode--enabled-p nil
   "Whether `subed-mode' is enabled.
 This is set by `subed-mode-enable' and `subed-mode-disable'.")
 
-(defvar-local subed--debug-enabled nil
-  "Whether `subed-debug' prints to `subed-debugging-buffer'.")
+(defvar-local subed-debugging-enabled-p nil
+  "Whether debugging messages are displayed.")
 
 (defcustom subed-debug-buffer "*subed-debug*"
   "Name of the buffer that contains debugging messages."
diff --git a/subed/subed-mpv.el b/subed/subed-mpv.el
index 23996b3..587f107 100644
--- a/subed/subed-mpv.el
+++ b/subed/subed-mpv.el
@@ -101,7 +101,7 @@ See also `subed-mpv-socket-base'."
 
 (defun subed-mpv--client-buffer ()
   "Unique name of buffer that stores RPC responses."
-  (if subed--debug-enabled
+  (if subed-debugging-enabled-p
       (format "*subed-mpv-buffer:%s-%s*"
               (file-name-base (or (buffer-file-name) "unnamed"))
               (buffer-hash))
diff --git a/subed/subed.el b/subed/subed.el
index 9585a4b..53a5683 100644
--- a/subed/subed.el
+++ b/subed/subed.el
@@ -73,8 +73,8 @@
 (defun subed-enable-debugging ()
   "Hide debugging messages and set `debug-on-error' to `nil'."
   (interactive)
-  (unless subed--debug-enabled
-    (setq subed--debug-enabled t
+  (unless subed-debugging-enabled-p
+    (setq subed-debugging-enabled-p t
           debug-on-error t)
     (let ((debug-buffer (get-buffer-create subed-debug-buffer))
           (debug-window (or (get-buffer-window subed-debug-buffer)
@@ -89,8 +89,8 @@
   "Display debugging messages in separate window and set
 `debug-on-error' to `t'."
   (interactive)
-  (when subed--debug-enabled
-    (setq subed--debug-enabled nil
+  (when subed-debugging-enabled-p
+    (setq subed-debugging-enabled-p nil
           debug-on-error nil)
     (let ((debug-window (get-buffer-window subed-debug-buffer)))
       (when debug-window
@@ -101,7 +101,7 @@
   "Display or hide debugging messages in separate window and set
 `debug-on-error' to `t' or `nil'."
   (interactive)
-  (if subed--debug-enabled
+  (if subed-debugging-enabled-p
       (subed-disable-debugging)
     (subed-enable-debugging)))
 
@@ -613,7 +613,7 @@ existing file."
   (subed-enable-replay-adjusted-subtitle :quiet)
   (setq major-mode 'subed-mode
         mode-name "subed")
-  (setq subed--mode-enabled t)
+  (setq subed-mode--enabled-p t)
   (run-mode-hooks 'subed-mode-hook))
 
 (defun subed-mode-disable ()
@@ -630,7 +630,7 @@ existing file."
   (remove-hook 'before-save-hook #'subed-sort :local)
   (remove-hook 'after-save-hook #'subed-mpv-reload-subtitles :local)
   (remove-hook 'kill-buffer-hook #'subed-mpv-kill :local)
-  (setq subed--mode-enabled nil))
+  (setq subed-mode--enabled-p nil))
 
 ;;;###autoload
 (defun subed-mode ()
@@ -643,7 +643,7 @@ Key bindings:
 \\{subed-mode-map}"
   (interactive)
   ;; Use 'enabled property of this function to store enabled/disabled status
-  (if subed--mode-enabled
+  (if subed-mode--enabled-p
       (subed-mode-disable)
     (subed-mode-enable)))