[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/hyperbole efaedbf 3/4: Improve some kexport:html settin
From: |
ELPA Syncer |
Subject: |
[elpa] externals/hyperbole efaedbf 3/4: Improve some kexport:html settings |
Date: |
Sun, 26 Sep 2021 12:57:23 -0400 (EDT) |
branch: externals/hyperbole
commit efaedbf8fa31e2da469823b9b29425e2a8d370b3
Author: Bob Weiner <rsw@gnu.org>
Commit: Bob Weiner <rsw@gnu.org>
Improve some kexport:html settings
---
ChangeLog | 5 +++++
hsettings.el | 2 +-
kotl/kexport.el | 6 ++++--
3 files changed, 10 insertions(+), 3 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index d9eb33b..dc44578 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
2021-09-26 Bob Weiner <rsw@gnu.org>
+* kotl/kexport.el (kexport:html): Improve vertical alignment of expand/collapse
+ chevrons and kcell text.
+
+* hsettings.el (hyperbole-web-search-browser-function): Use 'function type.
+
* hui-mini.el (hui:menu-item-keys): Fix bug in catch fallthrough that returned
the item rather than nil, causing numbers and non-ASCII chars to not work.
diff --git a/hsettings.el b/hsettings.el
index 94d6f46..beb15ee 100644
--- a/hsettings.el
+++ b/hsettings.el
@@ -219,7 +219,7 @@ Hyperbole, and then restart Emacs."
(defcustom hyperbole-web-search-browser-function browse-url-browser-function
"*Function of one url argument called by any Hyperbole Find/Web search."
- :type browse-url--browser-defcustom-type
+ :type 'function
:group 'hyperbole-commands)
(defcustom hyperbole-web-search-alist
diff --git a/kotl/kexport.el b/kotl/kexport.el
index 3949206..9cd444d 100644
--- a/kotl/kexport.el
+++ b/kotl/kexport.el
@@ -468,7 +468,8 @@ hard newlines are not used. Also converts Urls and Klinks
into Html hyperlinks.
(princ "<ul>")
(setq i (1- i)))
(princ "<li list-style-type=none>\n<table><tr
valign=text-bottom>\n")
- (princ "<td width=1% valign=top>")
+ ;; (princ "<td width=1% valign=top>")
+ (princ "<td width=1%>")
(princ (format "<span class=\"fas fa-chevron-down
fa-fw\"%s></span>"
(if is-parent
""
@@ -476,7 +477,8 @@ hard newlines are not used. Also converts Urls and Klinks
into Html hyperlinks.
;; show collapsible chevron when not a parent
" style=\"visibility:hidden\"")))
(princ "</td>\n")
- (princ "<td width=2% valign=top>\n")
+ ;; (princ "<td width=2% valign=top>\n")
+ (princ "<td width=2%>\n")
(setq label (kcell-view:label))
(princ (format "<a id=\"k%s\"></a>" label))
(princ (format "<a id=\"k%s\"></a>\n" (kcell-view:idstamp)))