diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2022-11-30 13:23:38 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2022-11-30 13:23:38 +0100 |
| commit | c3466099c5f44c52ec73a1bbbb2b42de6f29ac7f (patch) | |
| tree | 2598fbcb70ba9cd2ae09fe3972647a3f828cfb47 /lisp/org/org-element.el | |
| parent | 33a244097c3754f48b4959bfc0f36713af836bbc (diff) | |
| download | emacs-c3466099c5f44c52ec73a1bbbb2b42de6f29ac7f.tar.gz | |
Org regexp style fixes
* lisp/org/org-element.el (org-element--get-node-properties):
Escape literal `+`.
* lisp/org/org-persist.el (org-persist-load:index):
Replace line-start with string-start when the latter is meant.
Diffstat (limited to 'lisp/org/org-element.el')
| -rw-r--r-- | lisp/org/org-element.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org/org-element.el b/lisp/org/org-element.el index bc2fa0b9854..a290b4121fa 100644 --- a/lisp/org/org-element.el +++ b/lisp/org/org-element.el @@ -1040,7 +1040,7 @@ parse properties for property drawer at point." (property-value (match-string-no-properties 3))) (cond ((and (plist-member properties property-name-symbol) - (string-match-p "+$" property-name)) + (string-match-p "\\+$" property-name)) (let ((val (plist-get properties property-name-symbol))) (if (listp val) (setq properties |