[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/eev 9417a58 08/10: Small changes in `find-here-links-3'
From: |
Stefan Monnier |
Subject: |
[elpa] externals/eev 9417a58 08/10: Small changes in `find-here-links-3'. |
Date: |
Tue, 25 Jun 2019 00:05:10 -0400 (EDT) |
branch: externals/eev
commit 9417a58afb0fa239dd0606722cb3b7b1b8314d78
Author: Eduardo Ochs <address@hidden>
Commit: Eduardo Ochs <address@hidden>
Small changes in `find-here-links-3'.
---
ChangeLog | 3 +++
VERSION | 4 ++--
eev-elinks.el | 19 +++++++++++++------
eev-intro.el | 3 ++-
4 files changed, 20 insertions(+), 9 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 72bc3b1..6d03de4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
2019-06-24 Eduardo Ochs <address@hidden>
+ * eev-elinks.el (find-here-links-3): ask if the user wants to
+ overwrite `ee-window-configuration-before-M-h-M-3'.
+
* eev-intro.el (find-here-links-intro): added some figures.
* eev-pdflike.el (ee-find-pdf-text, ee-find-pdftotext-text)
diff --git a/VERSION b/VERSION
index e0142bc..8587a80 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Mon Jun 24 20:16:05 GMT 2019
-Mon Jun 24 17:16:05 -03 2019
+Mon Jun 24 21:04:12 GMT 2019
+Mon Jun 24 18:04:12 -03 2019
diff --git a/eev-elinks.el b/eev-elinks.el
index dca994a..b8b07e3 100644
--- a/eev-elinks.el
+++ b/eev-elinks.el
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs <address@hidden>
;; Maintainer: Eduardo Ochs <address@hidden>
-;; Version: 2019jun23
+;; Version: 2019jun24
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-elinks.el>
@@ -1265,7 +1265,15 @@ This needs a temporary directory; see:
(find-prepared-intro)"
;; (find-refining-intro "4. A tip for beginners")
;; (find-refining-intro "4. A tip for beginners" "find-here-links-beginner")
;;
+(defun find-here-links-beginner (&optional arg)
+ "A variant of `find-here-links' that may create a three-window setting."
+ (interactive "P")
+ (if arg (find-here-links-3) (find-here-links)))
+
;; «find-here-links-3» (to ".find-here-links-3")
+;; See: (find-here-links-intro "4. `find-here-links-3'")
+;; (find-here-links-intro "5. `find-here-links-1'")
+;;
(defvar ee-window-configuration-before-M-h-M-3 nil)
(defun find-here-links-3 ()
@@ -1277,7 +1285,10 @@ not nil we abort instead of overwriting it.
See: (find-here-links-intro \"4. `find-here-links-3'\")"
(interactive)
(if ee-window-configuration-before-M-h-M-3
- (error))
+ (let ((overwrite
+ (yes-or-no-p "Overwrite `ee-window-configuration-before-M-h-M-3'?
")))
+ (if (not overwrite)
+ (error))))
(setq ee-window-configuration-before-M-h-M-3
(current-window-configuration))
(find-wset "13_o2_o_coo" nil '(find-here-links) '(eejump-1)))
@@ -1290,10 +1301,6 @@ See: (find-here-links-intro \"5. `find-here-links-1'\")"
(setq ee-window-configuration-before-M-h-M-3 nil))
-(defun find-here-links-beginner (&optional arg)
- "A variant of `find-here-links' that may create a three-window setting."
- (interactive "P")
- (if arg (find-here-links-3) (find-here-links)))
diff --git a/eev-intro.el b/eev-intro.el
index 3052d49..d897e95 100644
--- a/eev-intro.el
+++ b/eev-intro.el
@@ -262,6 +262,7 @@ Actually go to: (find-eev \"eev-intro.el\"
\"find-foo-intro\" (ee-last-kill))."
\(Re)generate: (find-eev-quick-intro)
Source code: (find-efunction 'find-eev-quick-intro)
More intros: (find-emacs-keys-intro)
+ (find-here-links-intro)
(find-eev-intro)
(find-links-conv-intro)
(find-escripts-intro)
@@ -2579,7 +2580,7 @@ Note that `M-h M-1' undoes what `M-h M-3' did. In a
figure:
| | | | | | |
| | | | elinks | | |
| | | | buffer | | |
- | target | M-m M-3 | target |__________| M-h M-1 | target |
+ | target | M-h M-3 | target |__________| M-h M-1 | target |
| buffer | ------> | buffer | | ------> | buffer |
| | | | notes | | |
| | | | buffer | | |
- [elpa] externals/eev updated (3c15e4b -> e836949), Stefan Monnier, 2019/06/25
- [elpa] externals/eev e89c18c 01/10: Added more tutorial links to `find-code-pdf-links'., Stefan Monnier, 2019/06/25
- [elpa] externals/eev b6940a2 02/10: Rewrote the section "The first line regenerates the buffer" in (find-links-intro)., Stefan Monnier, 2019/06/25
- [elpa] externals/eev 7b8924c 04/10: make `find-pdf-page' use texworks on M$ Windows., Stefan Monnier, 2019/06/25
- [elpa] externals/eev 0ac2da4 07/10: Added some figures to (find-here-links-intro)., Stefan Monnier, 2019/06/25
- [elpa] externals/eev 5b27f53 09/10: Added `find-urlretrieve'., Stefan Monnier, 2019/06/25
- [elpa] externals/eev 153017a 06/10: Fixed some typos in eev-pdflike.el., Stefan Monnier, 2019/06/25
- [elpa] externals/eev 38a290a 03/10: Added `M-h M-3' and documentation for it., Stefan Monnier, 2019/06/25
- [elpa] externals/eev 26bd206 05/10: New section: (find-eev-quick-intro "4.2. `find-ekey-links' and friends"), Stefan Monnier, 2019/06/25
- [elpa] externals/eev 9417a58 08/10: Small changes in `find-here-links-3'.,
Stefan Monnier <=
- [elpa] externals/eev e836949 10/10: Merge remote-tracking branch 'eev/UTF-8' into externals/eev, Stefan Monnier, 2019/06/25