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

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

[elpa] externals/eev 10a6a09a5e 4/4: Merge branch 'UTF-8'


From: ELPA Syncer
Subject: [elpa] externals/eev 10a6a09a5e 4/4: Merge branch 'UTF-8'
Date: Mon, 7 Nov 2022 23:57:40 -0500 (EST)

branch: externals/eev
commit 10a6a09a5e10efc3cf1d17bfebf2728f6b5c2c65
Merge: cfdb7eaa12 7d12683d6e
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>

    Merge branch 'UTF-8'
---
 ChangeLog         | 23 +++++++++++++++++++++++
 VERSION           |  5 +++++
 eev-pdflike.el    |  7 ++++++-
 eev-plinks.el     |  8 ++++++++
 eev-rstdoc.el     | 15 +++++++++------
 eev-tlinks.el     | 12 +++++++-----
 eev-videolinks.el | 29 ++++++++++++++++++++++++++++-
 eev.el            |  2 +-
 8 files changed, 87 insertions(+), 14 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 6cd1764b6d..ea8b8c7c25 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,26 @@
+<<<<<<< HEAD
+=======
+2022-11-08  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-videolinks.el (ee-1stclassvideos-info): added an indication
+       that the video "2022tikz" has subtitles.
+
+2022-11-07  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-videolinks.el (find-2022tikzvideo): new function.
+       (ee-1stclassvideos-info): added an entry for "2022tikz".
+
+2022-11-05  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-videolinks.el (ee-1stclassvideos-info): added an indication
+       that the video "oficina2021a" has subtitles.
+
+2022-11-02  Eduardo Ochs  <eduardoochs@gmail.com>
+
+       * eev-rstdoc.el (ee-code-rstdoc): made some functions interactive.
+       (ee-rstdoc-rst): fixed the behavior when str is nil.
+
+>>>>>>> UTF-8
 2022-11-01  Eduardo Ochs  <eduardoochs@gmail.com>
 
        * eepitch.el (eepitch-php): new function.
diff --git a/VERSION b/VERSION
index 7eaec550db..391d20a743 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,7 @@
+<<<<<<< HEAD
 Tue Nov  1 07:32:45 GMT 2022
 Tue Nov  1 04:32:45 -03 2022
+=======
+Tue Nov  8 04:36:40 GMT 2022
+Tue Nov  8 01:36:40 -03 2022
+>>>>>>> UTF-8
diff --git a/eev-pdflike.el b/eev-pdflike.el
index cf1952d3dc..1cb363073d 100644
--- a/eev-pdflike.el
+++ b/eev-pdflike.el
@@ -202,7 +202,10 @@
 
 ;; Autoloads for external functions.
 ;; See: (find-elnode "Autoload")
-(autoload 'pdf-loader-install "pdf-tools")
+;; See also my temporary hack in:
+;;   (find-eev "eev-pdflike.el" "find-pdftools-page")
+;;   (find-eev "eev-pdflike.el" "find-pdftools-page" "require")
+;;(autoload 'pdf-loader-install "pdf-tools")
 
 
 
@@ -802,6 +805,8 @@ current page."
   ;;   (find-efunction 'pdf-tools-install)
   ;;
   ;; Old way: (pdf-tools-install)
+  (require 'pdf-tools)
+  (require 'pdf-loader)
   (pdf-loader-install)
   ;;
   ;; Open PDFFILE. You will get weird results if it is not a PDF.
diff --git a/eev-plinks.el b/eev-plinks.el
index 9ced6eb216..2bd4932158 100644
--- a/eev-plinks.el
+++ b/eev-plinks.el
@@ -113,6 +113,8 @@
 
 ;; «.find-urlretrieve» (to "find-urlretrieve")
 ;; «.find-wget»                (to "find-wget")
+;; «.find-anggwget»    (to "find-anggwget")
+;; «.find-anggwgeta»   (to "find-anggwgeta")
 ;; «.find-gitk»                (to "find-gitk")
 ;; «.find-tkdiff»      (to "find-tkdiff")
 ;; «.find-osm»         (to "find-osm")
@@ -415,6 +417,12 @@ If wget can't download URL then this function runs 
`error'."
 ;; (find-wget  "http://angg.twu.net/eev-current/DOESNOTEXIST";)
 ;; (find-wget-elisp  "http://angg.twu.net/eev-current/eev-plinks.el"; 
"find-wget")
 ;; (find-wgeta-elisp "http://angg.twu.net/eev-current/eev-plinks.el"; 
"find-wget")
+;;
+;; «find-anggwget»   (to ".find-anggwget")
+;; «find-anggwgeta»  (to ".find-anggwgeta")
+;; See: (find-2022findeevanggvideo "10:54" "Let me now show something else.")
+;;      (find-2022findeevanggvideo "11:30"   "(find-angg-es-links)")
+;;      (find-angg-es-links)
 
 (defun find-anggwget (fname &rest pos-spec-list)
   "See `find-wget' and this: (find-angg-es-links)"
diff --git a/eev-rstdoc.el b/eev-rstdoc.el
index 031b71b234..a859eb4e94 100644
--- a/eev-rstdoc.el
+++ b/eev-rstdoc.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    20221009
+;; Version:    20221102
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-rstdoc.el>
@@ -371,11 +371,11 @@
 
 (defun ee-rstdoc-rst (kw &optional str)
   (if (not str)
-      (setq str (ee-rstdoc-getfield kw :base)))
-  (format "%s%s%s"
-         (ee-rstdoc-getfield kw :base-rst)
-         (ee-rstdoc-stem kw str)
-         (ee-rstdoc-getfield kw :rst)))
+      (ee-rstdoc-getfield kw :base-rst)
+    (format "%s%s%s"
+           (ee-rstdoc-getfield kw :base-rst)
+           (ee-rstdoc-stem kw str)
+           (ee-rstdoc-getfield kw :rst))))
 
 
 ;; «around-point»  (to ".around-point")
@@ -446,16 +446,19 @@
 (defun find-{c}doc (&optional str &rest rest)
   \"Open the local html page associated to the rstdoc STR.
 This function uses the data in `{var}' to transform STR.\"
+  (interactive)
   (ee-rstdoc-browse-url (ee-rstdoc-html {kw} str)))
 
 (defun find-{c}docw (&optional str &rest rest)
   \"Open the remote html page associated to the rstdoc STR.
 This function uses the data in `{var}' to transform STR.\"
+  (interactive)
   (ee-rstdoc-browse-url (ee-rstdoc-web {kw} str)))
 
 (defun find-{c}docr (&optional str &rest rest)
   \"Open the local .rst.txt file associated to the rstdoc STR
 This function uses the data in `{var}' to transform STR.\"
+  (interactive)
   (apply 'find-fline (ee-rstdoc-rst {kw} str) rest))
 
 (code-c-d \"{c}docr\" \"{base-rst}\")
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 12dc554f17..d540693d6e 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -3007,12 +3007,13 @@ This function is used by `ee-0x0-upload-region'."
 
 
 
-;; To make eepitch blocks use the red bullets by default,
-;; add this block to your ~/.emacs.  Note that this will make
-;; bullets appear in red in other places too, like in info manuals -
-;; for example here: (find-enode \"Using Region\")
-;; See: (find-red-star-links)
+;; To make eepitch blocks use red bullets by default, add the
+;; block below to your ~/.emacs (including the line with the
+;; \"See:\"). Note that this will make bullets appear in red in
+;; other places too, like in info manuals - for example here:
+;;   (find-enode \"Using Region\")
 ;;
+;; See: (find-red-star-links)
 \(eepitch-set-glyph0 ?• ?• 'eepitch-star-face)
 \(defun ee-adjust-red-stars (str) (replace-regexp-in-string \"\" \"•\" str))
 
@@ -3056,6 +3057,7 @@ This function is used by `ee-0x0-upload-region'."
 ;; «find-angg-es-links»  (to ".find-angg-es-links")
 ;; Skel: (find-find-links-links-new "angg-es" "" "")
 ;; Test: (find-angg-es-links)
+;;  See: http://angg.twu.net/eev-find-angg.html
 ;;
 (defun find-angg-es-links (&rest pos-spec-list)
 "Show an e-script for configuring `find-angg' and `find-es'."
diff --git a/eev-videolinks.el b/eev-videolinks.el
index d07e0abb9a..5d1b7ad021 100644
--- a/eev-videolinks.el
+++ b/eev-videolinks.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author:     Eduardo Ochs <eduardoochs@gmail.com>
 ;; Maintainer: Eduardo Ochs <eduardoochs@gmail.com>
-;; Version:    2022oct21
+;; Version:    20221107
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://angg.twu.net/eev-current/eev-videolinks.el>
@@ -68,6 +68,7 @@
 ;;   «.find-2022eevwconfigpt2video»    (to "find-2022eevwconfigpt2video")
 ;;   «.find-2022eevwconfigvideo»       (to "find-2022eevwconfigvideo")
 ;;   «.find-2022yttranscriptvideo»     (to "find-2022yttranscriptvideo")
+;;   «.find-2022tikzvideo»             (to "find-2022tikzvideo")
 ;; «.more-info»                                (to "more-info")
 ;; «.ee-1stclassvideos-info»           (to "ee-1stclassvideos-info")
 ;;   «.eev2019»                                (to "eev2019")
@@ -98,6 +99,7 @@
 ;;   «.2022eevwconfigpt2»              (to "2022eevwconfigpt2")
 ;;   «.2022eevwconfig»                 (to "2022eevwconfig")
 ;;   «.2022yttranscript»               (to "2022yttranscript")
+;;   «.2022tikz»                       (to "2022tikz")
 ;; «.ee-1stclassvideos-field»          (to "ee-1stclassvideos-field")
 ;; «.second-class-videos»              (to "second-class-videos")
 ;;   «.code-eevvideo»                  (to "code-eevvideo")
@@ -618,6 +620,16 @@ For more info on this particular video, run:
   (interactive)
   (find-1stclassvideo-video "2022yttranscript" time))
 
+;; «find-2022tikzvideo»  (to ".find-2022tikzvideo")
+;; Info: (find-1stclassvideo-links "2022tikz")
+;; Play: (find-2022tikzvideo "0:00")
+(defun find-2022tikzvideo (&optional time &rest rest)
+  "Play one of the first-class videos of eev starting at TIME.
+For more info on this particular video, run:
+  (find-1stclassvideo-links \"2022tikz\")"
+  (interactive)
+  (find-1stclassvideo-video "2022tikz" time))
+
 
 
 
@@ -780,6 +792,7 @@ For more info on this particular video, run:
      :yt    "http://www.youtube.com/watch?v=acFPMuZ5Jf4";
      :page  "http://angg.twu.net/2021-oficina.html";
      :lang  "portuguese"
+     :subs   ".vtt"
      :date    "2021nov05"
      :length  "14:58"
      :comment "A very good introduction in Portuguese for beginners.")
@@ -1006,6 +1019,20 @@ For more info on this particular video, run:
      :length  "28:28"
      :comment "A video about `find-yttranscript-links'.")
     ;;
+    ;; «2022tikz»  (to ".2022tikz")
+    ;; Play: (find-2022tikzvideo "0:00")
+    ;; Index: (find-1stclassvideoindex "2022tikz")
+    ("2022tikz"
+     :title "Eev and TikZ, or: how to learn TikZ using a REPL"
+     :mp4   "http://angg.twu.net/eev-videos/2022-eev-tikz.mp4";
+     :yt    "http://www.youtube.com/watch?v=d7nIzpXcV6c";
+     :page  "http://angg.twu.net/eev-tikz.html";
+     :lang  "portuguese"
+     :date    "2022nov02"
+     :subs    ".vtt"
+     :length  "1:36:27"
+     :comment "A way to learn TikZ using examples from the manual.")
+    ;;
     ))
 
 
diff --git a/eev.el b/eev.el
index ed95725dfe..c073e6e354 100644
--- a/eev.el
+++ b/eev.el
@@ -6,7 +6,7 @@
 ;; Package-Requires: ((emacs "24.4"))
 ;; Keywords: lisp e-scripts
 ;; URL: http://angg.twu.net/#eev
-;; Version: 20221015
+;; Version: 20221108
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by



reply via email to

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