From 0af2b58c50eb42decdbbf3b967dc3c10a8c97484 Mon Sep 17 00:00:00 2001 From: Jen-Chieh Date: Mon, 25 Jan 2021 14:09:51 +0800 Subject: [PATCH 1/7] Add flag for force refresh --- dashboard.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/dashboard.el b/dashboard.el index 6870c7a7..fb7f893b 100644 --- a/dashboard.el +++ b/dashboard.el @@ -84,6 +84,9 @@ (defvar dashboard--section-starts nil "List of section starting positions.") +(defvar dashboard-force-refresh nil + "If non-nil, force refresh dashboard buffer.") + (defun dashboard-previous-section () "Navigate back to previous section." (interactive) @@ -195,7 +198,8 @@ Optional prefix ARG says how many lines to move; default is one line." ;; disabling/enabling recentf-mode) (when recentf-is-on (setq recentf-list (seq-take recentf-list dashboard-num-recents))) - (when (or (not (eq dashboard-buffer-last-width (window-width))) + (when (or dashboard-force-refresh + (not (eq dashboard-buffer-last-width (window-width))) (not buffer-exists)) (setq dashboard-banner-length (window-width) dashboard-buffer-last-width dashboard-banner-length) @@ -240,9 +244,7 @@ Optional prefix ARG says how many lines to move; default is one line." (defun dashboard-refresh-buffer () "Refresh buffer." (interactive) - (when (get-buffer dashboard-buffer-name) - (kill-buffer dashboard-buffer-name)) - (dashboard-insert-startupify-lists) + (let ((dashboard-force-refresh t)) (dashboard-insert-startupify-lists)) (switch-to-buffer dashboard-buffer-name)) (defun dashboard-resize-on-hook (&optional _) From da2916306b3d9cad4a18e337b885870fc600d5c6 Mon Sep 17 00:00:00 2001 From: Jen-Chieh Date: Mon, 25 Jan 2021 14:15:40 +0800 Subject: [PATCH 2/7] Test ci --- dashboard.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dashboard.el b/dashboard.el index fb7f893b..8f4e32ad 100644 --- a/dashboard.el +++ b/dashboard.el @@ -9,7 +9,7 @@ ;; ;; This file is not part of GNU Emacs. ;; -;;; License: GPLv3 +;;; License: GPLv3c ;; ;; Created: October 05, 2016 ;; Package-Version: 1.8.0-SNAPSHOT From 920de1e4f0a34142d5e3e22958c368751fb4847b Mon Sep 17 00:00:00 2001 From: Jen-Chieh Date: Mon, 25 Jan 2021 14:15:56 +0800 Subject: [PATCH 3/7] Test CI, remove CircleCI --- dashboard.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dashboard.el b/dashboard.el index 8f4e32ad..fb7f893b 100644 --- a/dashboard.el +++ b/dashboard.el @@ -9,7 +9,7 @@ ;; ;; This file is not part of GNU Emacs. ;; -;;; License: GPLv3c +;;; License: GPLv3 ;; ;; Created: October 05, 2016 ;; Package-Version: 1.8.0-SNAPSHOT From 6eadb1e0df8c703c0ea7231dd5f275308fa34988 Mon Sep 17 00:00:00 2001 From: Jen-Chieh Date: Mon, 25 Jan 2021 14:19:00 +0800 Subject: [PATCH 4/7] Attempt remove CI --- dashboard.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dashboard.el b/dashboard.el index fb7f893b..a3422adf 100644 --- a/dashboard.el +++ b/dashboard.el @@ -21,7 +21,7 @@ ;; bookmarks, projects (projectile or project.el), org-agenda and more. ;;; Code: - + (require 'seq) (require 'recentf) From 3e00b897f06a11d849475d8872d6613a1f13cb29 Mon Sep 17 00:00:00 2001 From: Jen-Chieh Date: Mon, 25 Jan 2021 14:19:52 +0800 Subject: [PATCH 5/7] Revert --- dashboard.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dashboard.el b/dashboard.el index a3422adf..fb7f893b 100644 --- a/dashboard.el +++ b/dashboard.el @@ -21,7 +21,7 @@ ;; bookmarks, projects (projectile or project.el), org-agenda and more. ;;; Code: - + (require 'seq) (require 'recentf) From 9b0a6c687b750aefdeb5ee1491aa9ae6a91923bd Mon Sep 17 00:00:00 2001 From: JenChieh Date: Mon, 25 Jan 2021 16:56:24 +0800 Subject: [PATCH 6/7] Test 1 --- dashboard.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dashboard.el b/dashboard.el index fb7f893b..e87ace42 100644 --- a/dashboard.el +++ b/dashboard.el @@ -243,7 +243,7 @@ Optional prefix ARG says how many lines to move; default is one line." (defun dashboard-refresh-buffer () "Refresh buffer." - (interactive) + (interactive) (let ((dashboard-force-refresh t)) (dashboard-insert-startupify-lists)) (switch-to-buffer dashboard-buffer-name)) From 4fe9dafe747043eb3857dd6c7ab29d1b2d505e9e Mon Sep 17 00:00:00 2001 From: JenChieh Date: Mon, 25 Jan 2021 16:56:33 +0800 Subject: [PATCH 7/7] Test if CI passed --- dashboard.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dashboard.el b/dashboard.el index e87ace42..fb7f893b 100644 --- a/dashboard.el +++ b/dashboard.el @@ -243,7 +243,7 @@ Optional prefix ARG says how many lines to move; default is one line." (defun dashboard-refresh-buffer () "Refresh buffer." - (interactive) + (interactive) (let ((dashboard-force-refresh t)) (dashboard-insert-startupify-lists)) (switch-to-buffer dashboard-buffer-name))