[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/subed 828764f 375/389: Change keybindings and use a transi
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/subed 828764f 375/389: Change keybindings and use a transient keymap |
Date: |
Fri, 3 Dec 2021 11:01:01 -0500 (EST) |
branch: elpa/subed
commit 828764f866d645fc9ed9b03bc6d9d416a64e8920
Author: Marcin Borkowski <mbork@mbork.pl>
Commit: Random User <rndusr@posteo.de>
Change keybindings and use a transient keymap
---
subed/subed-mpv.el | 14 ++++++++++----
subed/subed.el | 10 ++++++++--
2 files changed, 18 insertions(+), 6 deletions(-)
diff --git a/subed/subed-mpv.el b/subed/subed-mpv.el
index 71933ca..bd36a7f 100644
--- a/subed/subed-mpv.el
+++ b/subed/subed-mpv.el
@@ -321,14 +321,20 @@ See \"List of events\" in mpv(1)."
(subed-mpv-jump cur-sub-start))))
(defun subed-mpv-frame-step ()
- "Step one frame forward."
+ "Step one frame forward.
+Set up keybindings so that repeatedly pressing `,' and `.' moves
+by frames until any other key is pressed."
(interactive)
- (subed-mpv--client-send `(frame-step)))
+ (subed-mpv--client-send `(frame-step))
+ (set-transient-map subed-mpv-frame-step-map))
(defun subed-mpv-frame-back-step ()
- "Step one frame backward."
+ "Step one frame backward.
+Set up keybindings so that repeatedly pressing `,' and `.' moves
+by frames until any other key is pressed."
(interactive)
- (subed-mpv--client-send `(frame-back-step)))
+ (subed-mpv--client-send `(frame-back-step))
+ (set-transient-map subed-mpv-frame-step-map))
(defun subed-mpv-add-subtitles (file)
"Load FILE as subtitles in mpv."
diff --git a/subed/subed.el b/subed/subed.el
index 96a7b0a..ee4edbc 100644
--- a/subed/subed.el
+++ b/subed/subed.el
@@ -39,6 +39,13 @@
(require 'subed-vtt)
(require 'subed-mpv)
+(defconst subed-mpv-frame-step-map
+ (let ((map (make-sparse-keymap)))
+ (define-key map "." #'subed-mpv-frame-step)
+ (define-key map "," #'subed-mpv-frame-back-step)
+ map)
+ "A keymap for stepping the video by frames.")
+
(setq subed-mode-map
(let ((subed-mode-map (make-keymap)))
(define-key subed-mode-map (kbd "M-n") #'subed-forward-subtitle-text)
@@ -64,8 +71,7 @@
(define-key subed-mode-map (kbd "C-c C-d") #'subed-toggle-debugging)
(define-key subed-mode-map (kbd "C-c C-v") #'subed-mpv-find-video)
(define-key subed-mode-map (kbd "C-c C-u") #'subed-mpv-play-video-from-url)
- (define-key subed-mode-map (kbd "C-c <right>") #'subed-mpv-frame-step)
- (define-key subed-mode-map (kbd "C-c <left>") #'subed-mpv-frame-back-step)
+ (define-key subed-mode-map (kbd "C-c C-f") subed-mpv-frame-step-map)
(define-key subed-mode-map (kbd "C-c C-p")
#'subed-toggle-pause-while-typing)
(define-key subed-mode-map (kbd "C-c C-l")
#'subed-toggle-loop-over-current-subtitle)
(define-key subed-mode-map (kbd "C-c C-r")
#'subed-toggle-replay-adjusted-subtitle)
- [nongnu] elpa/subed fc7a12d 335/389: Fix mpv arguments, (continued)
- [nongnu] elpa/subed fc7a12d 335/389: Fix mpv arguments, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed d9c41ba 345/389: Add test for validation fix, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 8bdec56 356/389: Move subed-split-subtitle to "Inserting" section, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed b28f528 364/389: Revert indentation changes, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 5b868c3 366/389: Fix minor issues in README.org added in last commit, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 6949622 365/389: Adopt REUSE standard for copyright and licensing, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 9f55817 369/389: Wrap start/stop calculating functions in `ignore-errors', ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed beda7dc 371/389: Add functions to insert HTML-like tags, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed c23dd84 373/389: Add info about the new features to README.org, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 6a5802c 374/389: Add video movement per frame, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 828764f 375/389: Change keybindings and use a transient keymap,
ELPA Syncer <=
- [nongnu] elpa/subed 5de6f21 377/389: Add msecs-to-timestamp as a common function, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed b42f563 378/389: Add audio extensions, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 6b1a6f2 367/389: Add computing and displaying characters per second, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 3ba295b 336/389: Fix "service name too long", ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 961e5eb 343/389: More subed-vtt fixes: require subed-vtt, validate better, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 87b3823 353/389: subed-split-subtitle works at the beginning or end of subtitle text, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 3b4b56a 384/389: Merge pull request #49 from sachac/fix-vtt-spaces, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed bee9e63 342/389: subed-vtt: Fix syncing point with player, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 016c6a5 363/389: subed-split-subtitle: Handle more cases, ELPA Syncer, 2021/12/03
- [nongnu] elpa/subed 6164f88 380/389: Keep track of video being played, ELPA Syncer, 2021/12/03