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

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

[elpa] externals/eev b85ad0040d: Added dummy versions of find-angg and f


From: ELPA Syncer
Subject: [elpa] externals/eev b85ad0040d: Added dummy versions of find-angg and find-es.
Date: Wed, 10 Aug 2022 01:57:39 -0400 (EDT)

branch: externals/eev
commit b85ad0040da399f283a78070cd46f31c95d66e95
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>

    Added dummy versions of find-angg and find-es.
---
 ChangeLog     |  5 +++++
 VERSION       |  4 ++--
 eev-tlinks.el | 15 +++++++++++++++
 3 files changed, 22 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index e99f523650..794c8f8d10 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2022-08-10  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-tlinks.el (find-angg-not-configured)
+       (find-es-not-configured): new functions.
+
 2022-08-01  Eduardo Ochs  <eduardoochs@gmail.com>
 
        * eepitch.el (find-slyprocess, eepitch-sly): new functions.
diff --git a/VERSION b/VERSION
index ad4272864d..1e51905a4c 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Mon Aug  1 03:56:06 GMT 2022
-Mon Aug  1 00:56:06 -03 2022
+Wed Aug 10 05:19:02 GMT 2022
+Wed Aug 10 02:19:02 -03 2022
diff --git a/eev-tlinks.el b/eev-tlinks.el
index a74ecfb53d..9f991dd074 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -3116,6 +3116,21 @@ This function is used by `ee-0x0-upload-region'."
    pos-spec-list))
 
 
+;; Based on this suggestion by Quiliro Ordoñez, but simpler:
+;; https://lists.gnu.org/archive/html/eev/2022-08/msg00005.html
+;;
+(defun find-angg-not-configured (&rest rest) (interactive)
+  (error "`find-angg' not configured! Run: (find-angg-es-links)"))
+
+(defun find-es-not-configured (&rest rest) (interactive)
+  (error "`find-es' not configured! Run: (find-angg-es-links)"))
+
+(if (not (fboundp 'find-angg)) (defalias 'find-angg 'find-angg-not-configured))
+(if (not (fboundp 'find-es))   (defalias 'find-es   'find-es-not-configured))
+
+
+
+
 
 ;; «find-1stclassvideo-links»  (to ".find-1stclassvideo-links")
 ;; Skel: (find-find-links-links-new "1stclassvideo" "c" "body")



reply via email to

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