[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/eev 3537b3363c: Now `find-ebufferlocalvars' sorts its e
From: |
ELPA Syncer |
Subject: |
[elpa] externals/eev 3537b3363c: Now `find-ebufferlocalvars' sorts its entries. |
Date: |
Sun, 19 Jun 2022 22:57:33 -0400 (EDT) |
branch: externals/eev
commit 3537b3363cb3614d01421c4e2aca7a0fc24ff8cb
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>
Now `find-ebufferlocalvars' sorts its entries.
---
ChangeLog | 14 ++++++++++++++
VERSION | 4 ++--
eev-audiovideo.el | 4 ++--
eev-blinks.el | 9 +++++++--
eev-bounded.el | 2 ++
eev-brxxx.el | 3 +--
eev-code.el | 5 +++++
eev-mode.el | 3 ++-
eev-prepared.el | 1 +
eev-tlinks.el | 10 ++++------
10 files changed, 40 insertions(+), 15 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 0b2278546d..e26b0a37f6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,19 @@
+2022-06-18 Eduardo Ochs <eduardoochs@gmail.com>
+
+ * eev-blinks.el (ee-buffer-local-variables): new function.
+ (find-ebufferlocalvars): use `ee-buffer-local-variables'.
+
+2022-06-08 Eduardo Ochs <eduardoochs@gmail.com>
+
+ * eev-audiovideo.el (ee-code-mpv-audio): Fixed a typo.
+
2022-06-05 Eduardo Ochs <eduardoochs@gmail.com>
+ * eev-tlinks.el (ee-git-dir): converted the setq to a defvar.
+
+ * eev-mode.el (eev-mode-map-set): moved the `define-key' for
+ `find-git-links' from eev-tlinks.el to here.
+
* eev-blinks.el (ee-find-eejumps-header): added a pointer to
`(find-elisp-intro)'.
diff --git a/VERSION b/VERSION
index 0384bbfcd2..647937b41d 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Sun Jun 5 23:03:36 GMT 2022
-Sun Jun 5 20:03:36 -03 2022
+Mon Jun 20 02:22:14 GMT 2022
+Sun Jun 19 23:22:14 -03 2022
diff --git a/eev-audiovideo.el b/eev-audiovideo.el
index aa0cd96aa6..2dd30eb074 100644
--- a/eev-audiovideo.el
+++ b/eev-audiovideo.el
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs <eduardoochs@gmail.com>
;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version: 20211107
+;; Version: 20220608
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-audiovideo.el>
@@ -540,7 +540,7 @@ See: (find-audiovideo-intro \"`eev-avadj-mode'\")"
;;
(defun find-{c} (&optional time &rest rest)
(interactive (list (ee-time-around-point)))
- (setq ee-audioaudio-last 'find-{c})
+ (setq ee-audiovideo-last 'find-{c})
(if (eq time t)
\"Just setting the default audio\"
(find-mpv-audio {(ee-S fname)} time)))
diff --git a/eev-blinks.el b/eev-blinks.el
index df487b8045..e639f5f438 100644
--- a/eev-blinks.el
+++ b/eev-blinks.el
@@ -21,7 +21,7 @@
;;
;; Author: Eduardo Ochs <eduardoochs@gmail.com>
;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version: 20220605
+;; Version: 20220618
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-blinks.el>
@@ -1324,9 +1324,14 @@ Example: (find-ekeymapdescr (ee-minor-mode-keymap
'eev-mode))"
";; See:
;; (find-elnode \"Creating Buffer-Local\" \"buffer-local-variables\")
;; (find-efunction 'find-ebufferlocalvars)\n\n"
- (buffer-local-variables)
+ (ee-buffer-local-variables)
pos-spec-list)))
+(defun ee-buffer-local-variables ()
+ "Like `(buffer-local-variables)', but sorts the entries alphabetically."
+ (sort (buffer-local-variables)
+ (lambda (a b) (string< (car a) (car b)))))
+
;; Broken? See: (find-efile "international/ccl.el")
(defun find-eccldump (ccl-code &rest pos-spec-list)
"Hyperlink to the result of running `ccl-dump' on CCL-CODE.
diff --git a/eev-bounded.el b/eev-bounded.el
index 87c8ad13ee..e0800df497 100644
--- a/eev-bounded.el
+++ b/eev-bounded.el
@@ -46,6 +46,8 @@
;; «.obsolete» (to "obsolete")
+(require 'eev-code)
+
;;; _ _ _ _ _
diff --git a/eev-brxxx.el b/eev-brxxx.el
index 31102a7ed5..1099b7d60a 100644
--- a/eev-brxxx.el
+++ b/eev-brxxx.el
@@ -131,8 +131,7 @@
;; «.code-brxxxs» (to "code-brxxxs")
-
-(require 'eev-code) ; (find-eev "eev-code.el")
+(require 'eev-code) ; (find-eev "eev-code.el")
(autoload 'browse-url-interactive-arg "browse-url")
diff --git a/eev-code.el b/eev-code.el
index add61fefc2..df6ac44cfd 100644
--- a/eev-code.el
+++ b/eev-code.el
@@ -53,6 +53,11 @@
;; «.eev-version» (to "eev-version")
+(require 'eepitch) ; For: `ee-read'
+(require 'eev-template0) ; See: (find-eev "eev-template0.el")
+(require 'eev-wrap) ; For: `ee-S'
+
+
diff --git a/eev-mode.el b/eev-mode.el
index 8d07e968b8..3f98a60f8f 100644
--- a/eev-mode.el
+++ b/eev-mode.el
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs <eduardoochs@gmail.com>
;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version: 20211031
+;; Version: 20220605
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-mode.el>
@@ -129,6 +129,7 @@ and: (find-eval-intro \"`M-k'\")"
(define-key eev-mode-map "\M-h\M-p" 'find-pdf-links)
(define-key eev-mode-map "\M-h\M-v" 'find-evariable-links)
(define-key eev-mode-map "\M-hf" 'find-file-links)
+ (define-key eev-mode-map "\M-hg" 'find-git-links)
(define-key eev-mode-map "\M-hM" 'find-ekbmacro-links)
;; (define-key eev-mode-map "\M-h\M-m" 'find-manpage-links)
;; (define-key eev-mode-map "\M-hm" 'find-last-manpage-links)
diff --git a/eev-prepared.el b/eev-prepared.el
index 24180c6cb2..c282138e0b 100644
--- a/eev-prepared.el
+++ b/eev-prepared.el
@@ -46,6 +46,7 @@
(require 'eev-env)
+(require 'eev-code)
(ee-setenv "EEVTMPDIR" "$HOME/.eev") ; ee.sh and other temp scripts
(ee-setenv "EEVRCDIR" "$EEVDIR/rcfiles")
diff --git a/eev-tlinks.el b/eev-tlinks.el
index df73927807..31458016de 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs <eduardoochs@gmail.com>
;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version: 20220601
+;; Version: 20220605
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-tlinks.el>
@@ -1434,8 +1434,8 @@ If a local copy of C is not found, run
`find-psne-1stclassvideo-links'."
;; «find-git-links» (to ".find-git-links")
;; (find-find-links-links "g" "git" "usrc/ git/ gitname")
;; (find-find-links-links "g" "git" "url c")
-(define-key eev-mode-map "\M-hg" 'find-git-links-1)
-(define-key eev-mode-map "\M-hg" 'find-git-links)
+
+(defvar ee-git-dir "~/usrc/" "See `find-git-links'.")
(defun ee-git-url-stem (url)
(replace-regexp-in-string "^\\(.*/\\)\\([^/]+?\\)\\(\\.git\\)?$" "\\2" url))
@@ -1447,8 +1447,6 @@ If a local copy of C is not found, run
`find-psne-1stclassvideo-links'."
thing-at-point-url-path-regexp)))
(thing-at-point 'url)))
-(setq ee-git-dir "~/usrc/") ;; Used by find-git-links
-
(defun find-git-links (&optional url c &rest pos-spec-list)
"Visit a temporary buffer containing a script for downloading a git repo."
(interactive)
@@ -2487,7 +2485,7 @@ os.exit()
;; «find-emacs-tangents-links» (to ".find-emacs-tangents-links")
;; Skel: (find-find-links-links-new "emacs-tangents" "yyyy mm dd msg txtstem"
"")
-;; Test: (find-emacs-tangents-links "2020" "10" "05")
+;; Test: (find-emacs-tangents-links "2022" "06" "06")
;;
(defun find-emacs-tangents-links (&optional yyyy mm dd msg txtstem &rest
pos-spec-list)
"Visit a temporary buffer with hyperlinks to a post in emacs-tangents."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/eev 3537b3363c: Now `find-ebufferlocalvars' sorts its entries.,
ELPA Syncer <=