[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/hyperbole cefd1e4 2/3: Make hyrolo-file-list customizab
From: |
ELPA Syncer |
Subject: |
[elpa] externals/hyperbole cefd1e4 2/3: Make hyrolo-file-list customizable (#102) |
Date: |
Sun, 20 Jun 2021 16:57:12 -0400 (EDT) |
branch: externals/hyperbole
commit cefd1e438d3f5c4cae4af868d8f4c90e098091e8
Author: Mats Lidell <mats.lidell@lidells.se>
Commit: GitHub <noreply@github.com>
Make hyrolo-file-list customizable (#102)
---
ChangeLog | 2 ++
hyrolo.el | 8 +++++---
2 files changed, 7 insertions(+), 3 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 56e49d7..cee61a4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
2021-06-19 Mats Lidell <matsl@gnu.org>
+* hyrolo.el (hyrolo-file-list): Make variable customizable.
+
* hsettings.el: Do not set user customizable properties
hproperty:but-highlight-flag, hproperty:but-emphasize-flag,
hproperty:but-flash-time.
diff --git a/hyrolo.el b/hyrolo.el
index 84a15b1..98b44d3 100644
--- a/hyrolo.el
+++ b/hyrolo.el
@@ -4,7 +4,7 @@
;;
;; Orig-Date: 7-Jun-89 at 22:08:29
;;
-;; Copyright (C) 1991-2019 Free Software Foundation, Inc.
+;; Copyright (C) 1991-2021 Free Software Foundation, Inc.
;; See the "HY-COPY" file for license information.
;;
;; This file is part of GNU Hyperbole.
@@ -119,7 +119,7 @@ executable must be found as well (for Oauth security)."
list))
(define-obsolete-variable-alias 'rolo-file-list 'hyrolo-file-list "06.00")
-(defvar hyrolo-file-list (hyrolo-initialize-file-list)
+(defcustom hyrolo-file-list (hyrolo-initialize-file-list)
"*List of files containing rolo entries.
The first file should be a user-specific rolo file, typically in the home
directory.
@@ -128,7 +128,9 @@ A hyrolo-file consists of:
(1) an optional header beginning with and ending with a line which matches
hyrolo-hdr-regexp;
(2) one or more rolo entries which each begin with
- hyrolo-entry-regexp and may be nested.")
+ hyrolo-entry-regexp and may be nested."
+ :group 'hyperbole-rolo
+ :type '(repeat file))
(defcustom hyrolo-highlight-face 'match
"*Face used to highlight rolo search matches."