[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/eev 1c1afba74b 2/2: Added some things for MacPorts.
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/eev 1c1afba74b 2/2: Added some things for MacPorts. |
|
Date: |
Thu, 21 Dec 2023 21:57:44 -0500 (EST) |
branch: externals/eev
commit 1c1afba74be395e86451dfd51005f84929cf6fa7
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>
Added some things for MacPorts.
---
ChangeLog | 4 ++++
VERSION | 4 ++--
eev-intro.el | 7 +++---
eev-multiwindow.el | 8 ++++---
eev-tlinks.el | 62 ++++++++++++++++++++++++++++++++++++++++++------------
5 files changed, 64 insertions(+), 21 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 294f30bb1c..89dc215f3e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
2023-12-21 Eduardo Ochs <eduardoochs@gmail.com>
+ * eev-tlinks.el (find-macports-links): new function.
+
+ * eev-multiwindow.el (find-4eee, find-4EEE): new functions.
+
* eev-intro.el (find-templates-intro): rewrote many sections.
2023-12-20 Eduardo Ochs <eduardoochs@gmail.com>
diff --git a/VERSION b/VERSION
index 87947bd4de..e462cda692 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Fri Dec 22 00:59:04 GMT 2023
-Thu Dec 21 21:59:04 -03 2023
+Fri Dec 22 02:00:45 GMT 2023
+Thu Dec 21 23:00:45 -03 2023
diff --git a/eev-intro.el b/eev-intro.el
index 897ac6e8c4..cd912351ab 100644
--- a/eev-intro.el
+++ b/eev-intro.el
@@ -16291,9 +16291,9 @@ sudo pacman -S texlive-latexextra
(find-lpegremanual)
-2.3. MacOS
-----------
- Make sure that we have the Homebrew packages that we need.
+2.3. MacOS (MacPorts)
+---------------------
+ Make sure that we have the MacPorts packages that we need.
(eepitch-shell)
(eepitch-kill)
(eepitch-shell)
@@ -16315,6 +16315,7 @@ sudo port install lua-lpeg lua51-lpeg lua52-lpeg
+
3. Installation (on Debian)
===========================
diff --git a/eev-multiwindow.el b/eev-multiwindow.el
index 98cbfa0616..e93a629aca 100644
--- a/eev-multiwindow.el
+++ b/eev-multiwindow.el
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs <eduardoochs@gmail.com>
;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version: 20230127
+;; Version: 20231221
;; Keywords: e-scripts
;;
;; Latest version: <http://anggtwu.net/eev-current/eev-multiwindow.el>
@@ -135,8 +135,10 @@ that. This is mainly for `find-wset'."
;; and "E" is more aggressive than "e" (it yells at you).
(defun find-wset-e () (ee-here (car sexps)) (setq sexps (cdr sexps)))
(defun find-wset-E () (ee-here-reset (car sexps)) (setq sexps (cdr sexps)))
-(defun find-3ee (b c) (find-wset "13o2eoeo" b c))
-(defun find-3EE (b c) (find-wset "13o2EoEo" b c))
+(defun find-3ee (b c) (find-wset "13o2eoeo" b c))
+(defun find-3EE (b c) (find-wset "13o2EoEo" b c))
+(defun find-4eee (b c d) (find-wset "13o2eo2+eoeo" b c d))
+(defun find-4EEE (b c d) (find-wset "13o2Eo2+EoEo" b c d))
;; When I invented this I used "=" and "!" instead of "e" and "E" -
;; but I think that "e" and "E" are better.
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 85fef31f73..fc9767cc61 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: 20231219
+;; Version: 20231221
;; Keywords: e-scripts
;;
;; Latest version: <http://anggtwu.net/eev-current/eev-tlinks.el>
@@ -90,6 +90,7 @@
;;
;; «.find-debpkg-links» (to "find-debpkg-links")
;; «.find-pacman-links» (to "find-pacman-links")
+;; «.find-macports-links» (to "find-macports-links")
;; «.find-homebrew-links» (to "find-homebrew-links")
;; «.find-eev-install-links» (to "find-eev-install-links")
;; «.find-eev-update-links» (to "find-eev-update-links")
@@ -788,6 +789,50 @@ sudo pacman -S {pkg}
+;;; __ __ ____ _
+;;; | \/ | __ _ ___| _ \ ___ _ __| |_ ___
+;;; | |\/| |/ _` |/ __| |_) / _ \| '__| __/ __|
+;;; | | | | (_| | (__| __/ (_) | | | |_\__ \
+;;; |_| |_|\__,_|\___|_| \___/|_| \__|___/
+;;;
+;; «find-macports-links» (to ".find-macports-links")
+;; Skel: (find-find-links-links-new "macports" "pkg" "")
+;; Test: (find-macports-links)
+;;
+(defun find-macports-links (&optional pkg &rest pos-spec-list)
+"Visit a temporary buffer containing hyperlinks for macports."
+ (interactive)
+ (setq pkg (or pkg "{pkg}"))
+ (apply
+ 'find-elinks
+ `((find-macports-links ,pkg ,@pos-spec-list)
+ ;; Convention: the first sexp always regenerates the buffer.
+ (find-efunction 'find-macports-links)
+ ""
+ ,(ee-template0 "\
+# (find-sh \"port contents {pkg}\")
+# (find-sh \"find /opt/local | grep {pkg} | sort\")
+# (find-sh \"port echo all | grep {pkg} | sort\")
+# (find-sh \"port echo installed\")
+# (find-sh \"port help echo\")
+# (find-sh \"port help contents\")
+# (find-sh \"port help provides\")
+# (find-sh \"port provides /opt/local/an/existing/file\")
+# (find-man \"1 port\")
+
+# https://ports.macports.org/port/{pkg}/
+
+ (eepitch-shell)
+ (eepitch-kill)
+ (eepitch-shell)
+sudo port install {pkg}
+sudo brew install {pkg}
+")
+ )
+ pos-spec-list))
+
+
+
;;; _ _ _
;;; | | | | ___ _ __ ___ ___| |__ _ __ _____ __
;;; | |_| |/ _ \| '_ ` _ \ / _ \ '_ \| '__/ _ \ \ /\ / /
@@ -810,24 +855,15 @@ sudo pacman -S {pkg}
(find-efunction 'find-homebrew-links)
""
,(ee-template0 "\
-# (find-sh \"port contents {pkg}\")
-# (find-sh \"find /opt/local | grep {pkg} | sort\")
-# (find-sh \"port echo all | grep {pkg} | sort\")
-# (find-sh \"port echo installed\")
-# (find-sh \"port help echo\")
-# (find-sh \"port help contents\")
-# (find-sh \"port help provides\")
-# (find-sh \"port provides /opt/local/an/existing/file\")
-# (find-man \"1 port\")
+# See:
+# (find-macports-links \"{pkg}\")
# https://formulae.brew.sh/formula/{pkg}
# https://formulae.brew.sh/formula/lua@5.1#default
-# https://ports.macports.org/port/{pkg}/
(eepitch-shell)
(eepitch-kill)
(eepitch-shell)
-sudo port install {pkg}
-sudo brew install {pkg}
+brew install {pkg}
")
)
pos-spec-list))