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

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

[elpa] externals/hyperbole 127a5c8212 2/4: kimport.el - Allow for indent


From: ELPA Syncer
Subject: [elpa] externals/hyperbole 127a5c8212 2/4: kimport.el - Allow for indented start outline headings
Date: Sun, 6 Nov 2022 18:57:45 -0500 (EST)

branch: externals/hyperbole
commit 127a5c82123ff9c0043d08495f3ad27239616e38
Author: Bob Weiner <rsw@gnu.org>
Commit: Bob Weiner <rsw@gnu.org>

    kimport.el - Allow for indented start outline headings
---
 ChangeLog       |  4 ++++
 kotl/kimport.el | 13 +++++++------
 2 files changed, 11 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 5a2a60ca0a..bbdaade5cf 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2022-10-31  Bob Weiner  <rsw@gnu.org>
+
+* kotl/kimport.el (kimport:star-heading): Allow for indented headings.
+
 2022-10-30  Bob Weiner  <rsw@gnu.org>
 
 * hypb.el (hypb:activate-interaction-log-mode): Add to configure and
diff --git a/kotl/kimport.el b/kotl/kimport.el
index 6ec9b06497..b61b4531f1 100644
--- a/kotl/kimport.el
+++ b/kotl/kimport.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:    15-Nov-93 at 11:57:05
-;; Last-Mod:     28-Aug-22 at 14:07:09 by Bob Weiner
+;; Last-Mod:      5-Nov-22 at 10:24:36 by Bob Weiner
 ;;
 ;; Copyright (C) 1993-2022  Free Software Foundation, Inc.
 ;; See the "../HY-COPY" file for license information.
@@ -67,9 +67,9 @@ imported cells as the initial set of children of the current 
cell, if any.
    .aug  - import format is an Augment post-numbered outline
            (see https://dougengelbart.org/content/view/148/).")
 
-(defconst kimport:star-heading "^\\(\\*+\\)"
+(defconst kimport:star-heading "^[ \t]*\\(\\*+\\)"
   "Regular expression matching a star outline heading.
-The number of stars is given by groupoing 1.")
+The number of stars is given by grouping 1.")
 
 ;;; ************************************************************************
 ;;; Public functions
@@ -247,9 +247,10 @@ on."
 ;;;###autoload
 (defun kimport:star-outline (import-from output-to &optional children-p)
   "Insert star outline nodes from IMPORT-FROM into koutline OUTPUT-TO.
-Displays and leaves point in OUTPUT-TO.  See documentation for
-`kimport:initialize' for valid values of IMPORT-FROM and OUTPUT-TO and for
-an explanation of where imported cells are placed.
+Display and leave point in OUTPUT-TO.  See documentation for
+`kimport:initialize' for valid values of IMPORT-FROM and
+OUTPUT-TO and for an explanation of where imported cells are
+placed.
 
 \"* \" = level 1, \"** \" = level 2 in outline and so on."
   (interactive "FImport from star delimited cells buffer/file: \nFBuffer/file 
to insert cells into: \nP")



reply via email to

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