summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPhilip Kaludercic <philip.kaludercic@fau.de>2023-07-19 20:14:19 +0000
committerPhilip Kaludercic <philip.kaludercic@fau.de>2023-07-19 20:14:19 +0000
commit9d2ead6890b5b8b7052fcadbf7685cc37300772b (patch)
treebfb313b5f7e43221ab067da88201273505be7b87
parent90d17919619f95835bd373de98396803025339c7 (diff)
Fix 'do-at-point-actions-type' to work with inherited actions
-rw-r--r--do-at-point.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/do-at-point.el b/do-at-point.el
index 9a28fd1..807e776 100644
--- a/do-at-point.el
+++ b/do-at-point.el
@@ -5,7 +5,7 @@
;; Author: Philip Kaludercic <philipk@posteo.net>
;; Maintainer: Philip Kaludercic <philipk@posteo.net>
;; URL: https://wwwcip.cs.fau.de/~oj14ozun/src+etc/do-at-point.el
-;; Version: $Id: do-at-point.el,v 1.19 2023/07/19 20:07:52 oj14ozun Exp oj14ozun $
+;; Version: $Id: do-at-point.el,v 1.20 2023/07/19 20:08:58 oj14ozun Exp oj14ozun $
;; Package-Version: 1
;; Package-Requires: ((emacs "26.1"))
;; Keywords: convenience
@@ -66,8 +66,10 @@
(defconst do-at-point-actions-type
'(alist :value-type
(alist :value-type
- (list :tag "Action"
- (string :tag "Description") function)
+ (choice
+ (const :tag "Inherit" nil)
+ (list :tag "Action"
+ (string :tag "Description") function))
:key-type character)
:key-type symbol)
"User option type for `do-at-point' actions.")