emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/subed 080e512 262/389: Make variable subed-subtitle-format


From: ELPA Syncer
Subject: [nongnu] elpa/subed 080e512 262/389: Make variable subed-subtitle-format private
Date: Fri, 3 Dec 2021 11:00:38 -0500 (EST)

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

    Make variable subed-subtitle-format private
---
 subed/subed-config.el | 3 +++
 subed/subed-srt.el    | 1 +
 2 files changed, 4 insertions(+)

diff --git a/subed/subed-config.el b/subed/subed-config.el
index 7855ad4..9ef10b3 100644
--- a/subed/subed-config.el
+++ b/subed/subed-config.el
@@ -33,6 +33,9 @@
   :group 'multimedia
   :prefix "subed-")
 
+(defvar-local subed--subtitle-format nil
+  "Short form of the name of the subtitle format in the current buffer (e.g. 
\"srt\").")
+
 (defvar subed-mode-map
   (let ((subed-mode-map (make-keymap)))
     (define-key subed-mode-map (kbd "M-n") #'subed-forward-subtitle-text)
diff --git a/subed/subed-srt.el b/subed/subed-srt.el
index 777919d..89081a1 100644
--- a/subed/subed-srt.el
+++ b/subed/subed-srt.el
@@ -548,6 +548,7 @@ scheduled call is canceled and another call is scheduled in
 
 (defun subed-srt--init ()
   "This function is called when subed-mode is entered for a SRT file."
+  (setq-local subed--subtitle-format "srt")
   (setq-local font-lock-defaults '(subed-srt-font-lock-keywords))
   (setq-local paragraph-start "^[[:alnum:]\n]+")
   (setq-local paragraph-separate "\n\n"))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]