diff options
| -rw-r--r-- | Makefile | 3 | ||||
| -rw-r--r-- | NEWS | 1 | ||||
| -rw-r--r-- | gnosis.el | 10 | ||||
| -rw-r--r-- | manifest.scm | 2 |
4 files changed, 8 insertions, 8 deletions
@@ -17,9 +17,8 @@ doc: $(ORG) --eval "(with-current-buffer (find-file \"$(ORG)\") (org-texinfo-export-to-texinfo) (org-texinfo-export-to-info) (save-buffer))" \ --kill -test: +test: $(EMACS) --batch \ - rm *.elc \ -q \ --load $(TEST_FILE) \ --eval "(ert-run-tests-batch-and-exit)" @@ -1,4 +1,5 @@ -*- mode: org -*- + * 0.4.10 + Implement major performance improvements in gnosis-dashboard. @@ -2689,7 +2689,7 @@ Skips days where no note was reviewed." (interactive) (if gnosis-dashboard--selected-ids (gnosis-dashboard-marked-suspend) - (gnosis-suspend-note (string-to-number (tabulated-list-get-id))) + (gnosis-suspend-note (tabulated-list-get-id)) (gnosis-dashboard-output-notes gnosis-dashboard-note-ids) (revert-buffer t t t))) @@ -2698,7 +2698,7 @@ Skips days where no note was reviewed." (interactive) (if gnosis-dashboard--selected-ids (gnosis-dashboard-marked-delete) - (gnosis-delete-note (string-to-number (tabulated-list-get-id))) + (gnosis-delete-note (tabulated-list-get-id)) (gnosis-dashboard-output-notes gnosis-dashboard-note-ids) (revert-buffer t t t))) @@ -2754,7 +2754,7 @@ Skips days where no note was reviewed." ("Options" ,(/ (window-width) 6) t) ("Answer" ,(/ (window-width) 6) t) ("Tags" ,(/ (window-width) 5) t) - ("Type" ,(/ (window-width) 10) T) + ("Type" ,(/ (window-width) 10) t) ("Suspend" ,(/ (window-width) 6) t)] gnosis-dashboard-note-ids note-ids tabulated-list-entries nil) @@ -3004,7 +3004,7 @@ DASHBOARD-TYPE: either Notes or Decks to display the respective dashboard." (interactive) (when (y-or-n-p "Delete selected notes?") (cl-loop for note in gnosis-dashboard--selected-ids - do (gnosis-delete-note (string-to-number note) t)) + do (gnosis-delete-note note t)) (gnosis-dashboard-return))) (defun gnosis-dashboard-marked-suspend () @@ -3012,7 +3012,7 @@ DASHBOARD-TYPE: either Notes or Decks to display the respective dashboard." (interactive) (when (y-or-n-p "Toggle SUSPEND on selected notes?") (cl-loop for note in gnosis-dashboard--selected-ids - do (gnosis-suspend-note (string-to-number note) t)) + do (gnosis-suspend-note note t)) (gnosis-dashboard-return))) (transient-define-suffix gnosis-dashboard-suffix-query (query) diff --git a/manifest.scm b/manifest.scm index 3792cd6..07089c6 100644 --- a/manifest.scm +++ b/manifest.scm @@ -1,3 +1,3 @@ ;; (specifications->manifest - (list "make" "texinfo" "emacs-minimal" "emacs-org" "emacs-emacsql")) + (list "make" "texinfo" "emacs-next-pgtk" "emacs-org" "emacs-emacsql")) |