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

[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."



reply via email to

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