summaryrefslogtreecommitdiff
path: root/org-fc-dashboard.el
diff options
context:
space:
mode:
authorLeon Rische <leon.rische@me.com>2021-03-07 18:08:11 +0100
committerLeon Rische <leon.rische@me.com>2021-03-07 18:08:11 +0100
commit9694ae644851d42365de27e5bdfb690b792909d1 (patch)
tree692753c608ee88b5969b4d24de1a6233621561d7 /org-fc-dashboard.el
parent38412f4a2fe4d05fbb5a790e778b233438d6c840 (diff)
Fix dashboard revert
Diffstat (limited to 'org-fc-dashboard.el')
-rw-r--r--org-fc-dashboard.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/org-fc-dashboard.el b/org-fc-dashboard.el
index 38a7f8e..cf25056 100644
--- a/org-fc-dashboard.el
+++ b/org-fc-dashboard.el
@@ -256,16 +256,20 @@ environment without svg support."
(interactive)
(org-fc-review org-fc-dashboard-context))
+(defun org-fc-dashboard-revert (_ignore-auto _noconfirm)
+ "Reload the current dashboard."
+ (interactive)
+ (org-fc-dashboard-view org-fc-dashboard-context))
+
(defvar org-fc-dashboard-mode-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "r") 'org-fc-dashboard-review)
(define-key map (kbd "q") 'quit-window)
- (define-key map (kbd "G") 'org-fc-dashboard-view)
map))
(define-derived-mode org-fc-dashboard-mode special-mode "org-fc main"
"Major mode providing an overview of the flashcard system"
- (set (make-local-variable 'revert-buffer-function) #'org-fc-dashboard-view)
+ (set (make-local-variable 'revert-buffer-function) #'org-fc-dashboard-revert)
(setq-local cursor-type nil))
;;;###autoload