branch: externals/hyperbole commit 89ccef8e863458d5aad8ff93276ed733e788557c Merge: 1078846a45 f1fa9363e8 Author: Bob Weiner <r...@gnu.org> Commit: Bob Weiner <r...@gnu.org>
Merge branch 'rsw' of hyperbole into rsw --- hib-debbugs.el | 8 +++++--- hyrolo.el | 31 ++++++++++++++++++++++++++++--- 2 files changed, 33 insertions(+), 6 deletions(-) diff --git a/hib-debbugs.el b/hib-debbugs.el index f649fa8d5e..34d4343919 100644 --- a/hib-debbugs.el +++ b/hib-debbugs.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 21-Jun-16 at 14:24:53 -;; Last-Mod: 21-Jan-24 at 10:32:46 by Bob Weiner +;; Last-Mod: 2-Feb-24 at 22:44:22 by Mats Lidell ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -90,8 +90,10 @@ ;;; ************************************************************************ (eval-after-load "debbugs-gnu" - '(progn (push "hyperbole" debbugs-gnu-all-packages) - (push "oo-browser" debbugs-gnu-all-packages))) + '(progn + (defvar debbugs-gnu-all-packages) + (push "hyperbole" debbugs-gnu-all-packages) + (push "oo-browser" debbugs-gnu-all-packages))) ;;; ************************************************************************ ;;; Public implicit button types diff --git a/hyrolo.el b/hyrolo.el index dc021b1143..b7c6cd6ccc 100644 --- a/hyrolo.el +++ b/hyrolo.el @@ -3,7 +3,7 @@ ;; Author: Bob Weiner ;; ;; Orig-Date: 7-Jun-89 at 22:08:29 -;; Last-Mod: 4-Feb-24 at 15:50:54 by Bob Weiner +;; Last-Mod: 5-Feb-24 at 00:46:01 by Bob Weiner ;; ;; SPDX-License-Identifier: GPL-3.0-or-later ;; @@ -104,6 +104,30 @@ (defvar google-contacts-buffer-name) ; "ext:google-contacts.el" (defvar hbut:source-prefix) ; "hbut.el" +;; markdown-mode.el +(defvar markdown-regex-header) +(defvar markdown-hide-markup) +(defvar markdown-nested-imenu-heading-index) +(defvar markdown-indent-function) +(defvar markdown-make-gfm-checkboxes-buttons) +(declare-function markdown--edit-indirect-after-commit-function "ext:markdown-mode") +(declare-function markdown--indent-region "ext:markdown-mode") +(declare-function markdown--inhibit-electric-quote "ext:markdown-mode") +(declare-function markdown-adaptive-fill-function "ext:markdown-mode") +(declare-function markdown-beginning-of-defun "ext:markdown-mode") +(declare-function markdown-end-of-defun "ext:markdown-mode") +(declare-function markdown-fill-forward-paragraph "ext:markdown-mode") +(declare-function markdown-fill-paragraph "ext:markdown-mode") +(declare-function markdown-gfm-checkbox-after-change-function "ext:markdown-mode") +(declare-function markdown-imenu-create-flat-index "ext:markdown-mode") +(declare-function markdown-imenu-create-nested-index "ext:markdown-mode") +(declare-function markdown-line-is-reference-definition-p "ext:markdown-mode") +(declare-function markdown-live-preview-if-markdown "ext:markdown-mode") +(declare-function markdown-live-preview-remove-on-kill "ext:markdown-mode") +(declare-function markdown-make-gfm-checkboxes-buttons "ext:markdown-mode") +(declare-function markdown-pipe-at-bol-p "ext:markdown-mode") +(declare-function markdown-remove-gfm-checkbox-overlays "ext:markdown-mode") + ;; Forward declarations (defvar consult-grep-args) (defvar consult-ripgrep-args) @@ -130,6 +154,7 @@ (defvar hyrolo-mode-map) (defvar hyrolo-mode-prefix-map) (defvar hyrolo-mode-syntax-table) +(defvar hyrolo-reveal-ignore-this-command) ;;; ************************************************************************ ;;; Public variables @@ -1565,7 +1590,7 @@ Return number of matching entries found." (insert "No result.") (print contacts (get-buffer-create "*contacts-data*")) (dolist (contact contacts) - (let* ( + (let* ((child nil) (name-value (nth 0 (xml-get-children contact 'gd:name))) (fullname (xml-node-child-string (nth 0 (xml-get-children name-value 'gd:fullName)))) (givenname (xml-node-child-string (nth 0 (xml-get-children name-value 'gd:givenName)))) @@ -2735,7 +2760,7 @@ Entry is inserted before point. The region is between START to END." "Return t if any file from `hyrolo-file-list' has an unusable format. The list of unusable files is displayed in a HyRolo error window -unless 'hyrolo-boolean-only-flag' is set to t (used for testing). +unless `hyrolo-boolean-only-flag' is set to t (used for testing). This will install `markdown-mode' if any Markdown files are specified and the package is not installed."