[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/eev 4b2e5aa 18/64: Added eev-codings.el, started to con
From: |
Stefan Monnier |
Subject: |
[elpa] externals/eev 4b2e5aa 18/64: Added eev-codings.el, started to convert files to UTF-8 |
Date: |
Sun, 7 Apr 2019 16:59:04 -0400 (EDT) |
branch: externals/eev
commit 4b2e5aa5b9f0e5344c0aafd3ba2963f762377565
Author: Eduardo Ochs <address@hidden>
Commit: Eduardo Ochs <address@hidden>
Added eev-codings.el, started to convert files to UTF-8
---
ChangeLog | 10 ++++++++
VERSION | 4 ++--
eev-anchors.el | 36 +++++++---------------------
eev-codings.el | 76 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
eev2-all.el | 1 +
5 files changed, 97 insertions(+), 30 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 4d15863..7db4315 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,13 @@
+2018-05-16 Eduardo Ochs <address@hidden>
+
+ * eev-codings.el (ee-to-coding,ee-tolatin1): new file, with these
+ two functions plus comments.
+
+ * eev-anchors.el (ee-to-coding,ee-tolatin1): moved to
+ eev-codings.el.
+
+ * eev2-all.el: load eev-codings.el.
+
2018-01-05 Eduardo Ochs <address@hidden>
* eev-blinks.el (ee-eejump-symbols): add a test for `fboundp'.
diff --git a/VERSION b/VERSION
index 429c51d..bee9842 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Qua Mai 16 03:31:56 GMT 2018
-Qua Mai 16 00:31:56 -03 2018
+Qua Mai 16 04:40:40 GMT 2018
+Qua Mai 16 01:40:40 -03 2018
diff --git a/eev-anchors.el b/eev-anchors.el
index ab963b1..26f9b3c 100644
--- a/eev-anchors.el
+++ b/eev-anchors.el
@@ -1,6 +1,6 @@
;;; eev-anchors.el -- hyperlinks to anchors.
-;; Copyright (C) 2012 Free Software Foundation, Inc.
+;; Copyright (C) 2012,2018 Free Software Foundation, Inc.
;;
;; This file is (not yet?) part of GNU eev.
;;
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs <address@hidden>
;; Maintainer: Eduardo Ochs <address@hidden>
-;; Version: 2012nov02
+;; Version: 2018mai16
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-anchors.el>
@@ -32,10 +32,14 @@
;;; Commentary:
+;; See the tutorial on anchors here:
+;; (find-eev-quick-intro "8. Anchors")
+
(require 'eepitch) ; (find-eev "eepitch.el")
+(require 'eev-codings) ; (find-eev "eev-codings.el")
@@ -64,31 +68,6 @@
-;;; _ _ _ _ _
-;;; ___ ___ | |_ ___ | | __ _| |_(_)_ __ / |
-;;; / _ \/ _ \_____| __/ _ \| |/ _` | __| | '_ \| |
-;;; | __/ __/_____| || (_) | | (_| | |_| | | | | |
-;;; \___|\___| \__\___/|_|\__,_|\__|_|_| |_|_|
-;;;
-;; 2017jul29: this is a low-level hack to allow anchors like "�tag�"
-;; to work on both unibyte and multibyte buffers and files without
-;; requiring the user to set the variable `ee-anchor-format' in the
-;; local variables section.
-
-(defun ee-to-coding (coding str)
- (ee-no-properties (decode-coding-string str coding)))
-
-(defun ee-tolatin1 (str)
- "Make STR compatible with both unibyte and multibyte buffers.
-Convert STR to a multibyte format that works in both
-unibyte (raw-text) and multibyte (e.g., utf-8) buffers. This may
-fail if STR contains chars that are not in the latin-1 range.
-This function is used by `ee-format-as-anchor'."
- (ee-to-coding 'latin-1 str))
-
-
-
-
;;; _ __ _
;;; __ _ _ __ ___| |__ ___ _ __ / _| ___ _ __ _ __ ___ __ _| |_
;;; / _` | '_ \ / __| '_ \ / _ \| '__|____| |_ / _ \| '__| '_ ` _ \ / _` | __|
@@ -117,7 +96,8 @@ This function is used by `ee-format-as-anchor'."
;;; | _| | | | | (_| |_____| (_| | | | | (__| | | | (_) | |
;;; |_| |_|_| |_|\__,_| \__,_|_| |_|\___|_| |_|\___/|_|
;;;
-;; See: (find-eval-intro "Anchors and pages")
+;; See: (find-eev-quick-intro "8. Anchors")
+;; (find-eval-intro "Anchors and pages")
(defun ee-goto-anchor (&optional tag &rest rest)
"Like `ee-goto-position', but TAG is converted to an anchor.
diff --git a/eev-codings.el b/eev-codings.el
new file mode 100644
index 0000000..ee13a5c
--- /dev/null
+++ b/eev-codings.el
@@ -0,0 +1,76 @@
+;;; eev-codings.el -- tricks to support both the UTF8 coding system and unibyte
+
+;; Copyright (C) 2018 Free Software Foundation, Inc.
+;;
+;; This file is (not yet?) part of GNU eev.
+;;
+;; GNU eev is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; GNU eev is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
+;;
+;; Author: Eduardo Ochs <address@hidden>
+;; Maintainer: Eduardo Ochs <address@hidden>
+;; Version: 2018mai16
+;; Keywords: e-scripts
+;;
+;; Latest version: <http://angg.twu.net/eev-current/eev-coding.el>
+;; htmlized: <http://angg.twu.net/eev-current/eev-coding.el.html>
+;; See also: <http://angg.twu.net/eev-intros/find-eev-intro.html>
+
+;;; Commentary:
+
+;; Until mid-2017 a user who wanted to use anchors (like "«tag»") in
+;; both unibyte and multibyte buffers had to put something like this
+;;
+;; ee-anchor-format: "«%s»"
+;;
+;; in the local variables section at the end of (at least some) of his
+;; files; the functions defined here make the local variables section
+;; trick unneccessary - `ee-format-as-anchor' now uses `ee-tolatin1'
+;; to produce a search string that works both unibyte, on UTF-8, on
+;; latin-1 files and some (most?) other encodings.
+
+
+
+;;; _ _ _ _ _
+;;; ___ ___ | |_ ___ | | __ _| |_(_)_ __ / |
+;;; / _ \/ _ \_____| __/ _ \| |/ _` | __| | '_ \| |
+;;; | __/ __/_____| || (_) | | (_| | |_| | | | | |
+;;; \___|\___| \__\___/|_|\__,_|\__|_|_| |_|_|
+;;;
+;; Original comment:
+;;
+;; 2017jul29: this is a low-level hack to allow anchors like "«tag»"
+;; to work on both unibyte and multibyte buffers and files without
+;; requiring the user to set the variable `ee-anchor-format' in the
+;; local variables section.
+
+(defun ee-to-coding (coding str)
+ (ee-no-properties (decode-coding-string str coding)))
+
+(defun ee-tolatin1 (str)
+ "Make STR compatible with both unibyte and multibyte buffers.
+Convert STR to a multibyte format that works in both
+unibyte (raw-text) and multibyte (e.g., utf-8) buffers. This may
+fail if STR contains chars that are not in the latin-1 range.
+This function is used by `ee-format-as-anchor'."
+ (ee-to-coding 'latin-1 str))
+
+
+
+(provide 'eev-codings)
+
+
+
+;; Local Variables:
+;; coding: utf-8-unix
+;; End:
diff --git a/eev2-all.el b/eev2-all.el
index f4624cd..1935b2d 100644
--- a/eev2-all.el
+++ b/eev2-all.el
@@ -70,6 +70,7 @@
(require 'eev-brxxx) ; (find-eev "eev-brxxx.el")
(require 'eev-pdflike) ; (find-eev "eev-pdflike.el")
(require 'eev-audiovideo) ; (find-eev "eev-audiovideo.el")
+(require 'eev-codings) ; (find-eev "eev-codings.el")
(require 'eev-anchors) ; (find-eev "eev-anchors.el")
;; User stuff.
- [elpa] branch externals/eev created (now fb9f4c6), Stefan Monnier, 2019/04/07
- [elpa] externals/eev 99d0c67 03/64: Changes in `find-videos-intro'; `ee-copy-after-and' -> `ee-copy-rest', Stefan Monnier, 2019/04/07
- [elpa] externals/eev 5320469 04/64: `eepitch-do' and `find-wget', Stefan Monnier, 2019/04/07
- [elpa] externals/eev 834e074 10/64: `find-customizegroup', Stefan Monnier, 2019/04/07
- [elpa] externals/eev 301db1e 13/64: Make some arguments optional, Stefan Monnier, 2019/04/07
- [elpa] externals/eev 95397ce 02/64: Added `ee-copy-after-and' and `find-eejumps', Stefan Monnier, 2019/04/07
- [elpa] externals/eev b30a527 15/64: Corrected typos in `find-eev-quick-intro'., Stefan Monnier, 2019/04/07
- [elpa] externals/eev 19623c4 05/64: Rewrote eev-rcirc.el., Stefan Monnier, 2019/04/07
- [elpa] externals/eev 70964f1 20/64: Add `find-eev-install-intro' and `find-eev-install-links', Stefan Monnier, 2019/04/07
- [elpa] externals/eev 23f0366 22/64: Added instructions for using the git repository., Stefan Monnier, 2019/04/07
- [elpa] externals/eev 4b2e5aa 18/64: Added eev-codings.el, started to convert files to UTF-8,
Stefan Monnier <=
- [elpa] externals/eev 2009036 21/64: Added text to `find-escripts-intro', Stefan Monnier, 2019/04/07
- [elpa] externals/eev e4964a3 06/64: Rewrote `find-brxxx-intro'., Stefan Monnier, 2019/04/07
- [elpa] externals/eev 4a7bfcf 11/64: High-level words for `find-wset' (code and docs), Stefan Monnier, 2019/04/07
- [elpa] externals/eev a334821 08/64: `ee-mplayer-{audio, video}-options', `find-here-links', Stefan Monnier, 2019/04/07
- [elpa] externals/eev d77a040 24/64: Added `find-sh-at-dir'; added new sections to `find-eev-quick-intro', Stefan Monnier, 2019/04/07
- [elpa] externals/eev 1b0d1dd 25/64: Added several sections to `find-eev-quick-intro'., Stefan Monnier, 2019/04/07
- [elpa] externals/eev b17c70b 29/64: Small changes in README.md, Stefan Monnier, 2019/04/07
- [elpa] externals/eev 655f894 23/64: Added a "$*" to the shell script "~/eev"., Stefan Monnier, 2019/04/07
- [elpa] externals/eev 9f22dff 14/64: Added `find-eev-quick-intro'., Stefan Monnier, 2019/04/07
- [elpa] externals/eev cca8307 09/64: `find-here-links' (code and docs), Stefan Monnier, 2019/04/07