From 99a297f8f30ceabd20b5605a840da16450a388e9 Mon Sep 17 00:00:00 2001 From: Jason Dufair Date: Thu, 28 Feb 2019 19:01:19 -0500 Subject: [PATCH 1/2] Fix opening org mode "links" --- dashboard-widgets.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/dashboard-widgets.el b/dashboard-widgets.el index df5b8990..e0824900 100644 --- a/dashboard-widgets.el +++ b/dashboard-widgets.el @@ -401,9 +401,9 @@ date part is considered." list-size "a" `(lambda (&rest ignore) - (let ((buffer (find-file-other-window (nth 4 ,el)))) + (let ((buffer (find-file-other-window (nth 4 ',el)))) (with-current-buffer buffer - (goto-char (nth 3 ,el))) + (goto-char (nth 3 ',el))) (switch-to-buffer buffer))) (format "%s" (nth 0 el))) (and (not agenda) From f6119e8ac68057b04028abf8f81e4a0b86d6da60 Mon Sep 17 00:00:00 2001 From: Jason Dufair Date: Thu, 28 Feb 2019 19:28:25 -0500 Subject: [PATCH 2/2] Only require org-agenda if it's going to be used --- dashboard-widgets.el | 1 + dashboard.el | 1 - 2 files changed, 1 insertion(+), 1 deletion(-) diff --git a/dashboard-widgets.el b/dashboard-widgets.el index e0824900..5e116806 100644 --- a/dashboard-widgets.el +++ b/dashboard-widgets.el @@ -393,6 +393,7 @@ date part is considered." (defun dashboard-insert-agenda (list-size) "Add the list of LIST-SIZE items of agenda." + (require 'org-agenda) (let ((agenda (dashboard-get-agenda))) (dashboard-insert-section (or (and (boundp 'show-week-agenda-p) show-week-agenda-p "Agenda for the coming week:") diff --git a/dashboard.el b/dashboard.el index 4ef94345..cbfd7648 100644 --- a/dashboard.el +++ b/dashboard.el @@ -23,7 +23,6 @@ (require 'bookmark) (require 'calendar) -(require 'org-agenda) (require 'page-break-lines) (require 'recentf) (require 'register)