[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org-modern a1b42d6177 4/5: Fix issues mentioned in #60
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org-modern a1b42d6177 4/5: Fix issues mentioned in #60 |
Date: |
Sun, 5 Jun 2022 06:57:44 -0400 (EDT) |
branch: externals/org-modern
commit a1b42d6177b7add4a7e4d485a839b2bb3b213569
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Fix issues mentioned in #60
---
org-modern.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/org-modern.el b/org-modern.el
index 29348f3020..1770720cdf 100644
--- a/org-modern.el
+++ b/org-modern.el
@@ -174,7 +174,7 @@ used as replacement for \"#+keyword:\", with t the default
key."
:value-type (choice (string :tag "Replacement")
(const :tag "Hide prefix" t)))))
-(defcustom org-modern-footnote '((height 0.7) (raise 0.3))
+(defcustom org-modern-footnote (cadr org-script-display)
"Prettify footnotes."
:type '(choice (const nil) sexp))
@@ -571,7 +571,7 @@ You can specify a font `:family'. The font families
`Iosevka', `Hack' and
`((,(concat "^\\*+.*?\\( \\)\\(:\\(?:" org-tag-re ":\\)+\\)[ \t]*$")
(0 (org-modern--tag)))))
(when org-modern-footnote
- `(("\\(\\[fn:\\)[^]]+\\]"
+ `(("\\(\\[fn:\\)[[:word:]-_]+\\]"
(0 '(face nil display ,org-modern-footnote))
(1 '(face nil display ,(propertize "[" 'display
org-modern-footnote))))))
(when org-modern-internal-target