emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/hyperbole 89ccef8e86 121/143: Merge branch 'rsw' of hyp


From: ELPA Syncer
Subject: [elpa] externals/hyperbole 89ccef8e86 121/143: Merge branch 'rsw' of hyperbole into rsw
Date: Mon, 19 Feb 2024 15:59:26 -0500 (EST)

branch: externals/hyperbole
commit 89ccef8e863458d5aad8ff93276ed733e788557c
Merge: 1078846a45 f1fa9363e8
Author: Bob Weiner <rsw@gnu.org>
Commit: Bob Weiner <rsw@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."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]