elisp/anki-editor
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Incorporate changes in PR#62

Browse source
This commit is contained in:
louie 2020-03-09 21:36:27 +08:00
parent c74e864a64
commit ff3230f32f
3 changed files with 17 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Changelog.org
View file

@ -26,6 +26,8 @@
4. Command ~anki-editor-remove-styles~ 4. Command ~anki-editor-remove-styles~
11. Updated anki-connect to version 6 11. Updated anki-connect to version 6
1. ~anki-editor-api-upgrade~ removed 1. ~anki-editor-api-upgrade~ removed
12. Added variable ~anki-editor-note-match~ to make matching note
entries customizable
** v0.3.3 ** v0.3.3

1
README.org
View file

@ -90,6 +90,7 @@ there are any ambiguity or grammatical mistakes ;-)/
| anki-editor-latex-style | builtin | The style of latex to translate into. | | anki-editor-latex-style | builtin | The style of latex to translate into. |
| anki-editor-include-default-style | t | Wheter or not to include `org-html-style-default' when using `anki-editor-copy-styles'. | | anki-editor-include-default-style | t | Wheter or not to include `org-html-style-default' when using `anki-editor-copy-styles'. |
| anki-editor-html-head | nil | Additional html tags to append to card stylings when using `anki-editor-copy-styles'. | | anki-editor-html-head | nil | Additional html tags to append to card stylings when using `anki-editor-copy-styles'. |
| anki-editor-note-match | nil | Additional matching string for mapping through anki note headings. |
** Functions and Macros ** Functions and Macros

17
anki-editor.el
View file

@ -118,6 +118,11 @@ provide your custom styles in `anki-editor-html-head'."
For example, you can put custom styles or scripts in this variable." For example, you can put custom styles or scripts in this variable."
:type 'string) :type 'string)
(defcustom anki-editor-note-match nil
"Additional matching string for mapping through anki note headings.
A leading logical operator like `+' or `&' is required."
:type 'string)
;;; AnkiConnect ;;; AnkiConnect
@ -451,12 +456,18 @@ as note types won't change in BODY."
(setq anki-editor--collection-data-updated nil))))) (setq anki-editor--collection-data-updated nil)))))
(defun anki-editor-map-note-entries (func &optional match scope &rest skip) (defun anki-editor-map-note-entries (func &optional match scope &rest skip)
"Simple wrapper that calls `org-map-entries' with "Simple wrapper that calls `org-map-entries' with entries that match
`&ANKI_NOTE_TYPE<>\"\"' appended to MATCH." `ANKI_NOTE_TYPE<>\"\"', `anki-editor-note-match' and MATCH.
A leading logical operator like `+' or `&' is required in MATCH."
;; disable property inheritance temporarily, or all subheadings of a ;; disable property inheritance temporarily, or all subheadings of a
;; note heading will be counted as note headings as well ;; note heading will be counted as note headings as well
(let ((org-use-property-inheritance nil)) (let ((org-use-property-inheritance nil))
(org-map-entries func (concat match "&" anki-editor-prop-note-type "<>\"\"") scope skip))) (org-map-entries func
(concat "+" anki-editor-prop-note-type "<>\"\""
match
anki-editor-note-match)
scope
skip)))
(defun anki-editor--insert-note-skeleton (prefix deck heading type fields) (defun anki-editor--insert-note-skeleton (prefix deck heading type fields)
"Insert a note subtree (skeleton) with HEADING, TYPE and FIELDS. "Insert a note subtree (skeleton) with HEADING, TYPE and FIELDS.