summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorUlrich Müller <ulm@gentoo.org>2011-11-24 17:59:55 +0000
committerUlrich Müller <ulm@gentoo.org>2011-11-24 17:59:55 +0000
commit99926d8c72d45d7c74effce367b306e27535b9b8 (patch)
tree55f712dc9cfd5cb950b721d41b3208c06192c8ef /app-emacs
parentDefine variable for display table. (diff)
downloademacs-99926d8c72d45d7c74effce367b306e27535b9b8.tar.gz
emacs-99926d8c72d45d7c74effce367b306e27535b9b8.tar.bz2
emacs-99926d8c72d45d7c74effce367b306e27535b9b8.zip
Moved to Portage tree.
svn path=/emacs-overlay/; revision=1756
Diffstat (limited to 'app-emacs')
-rw-r--r--app-emacs/teco/ChangeLog11
-rw-r--r--app-emacs/teco/Manifest16
-rw-r--r--app-emacs/teco/files/50teco-gentoo.el4
-rw-r--r--app-emacs/teco/files/teco-7-minibuffer-prompt.patch84
-rw-r--r--app-emacs/teco/metadata.xml5
-rw-r--r--app-emacs/teco/teco-7.ebuild28
6 files changed, 0 insertions, 148 deletions
diff --git a/app-emacs/teco/ChangeLog b/app-emacs/teco/ChangeLog
deleted file mode 100644
index 6ce3b90..0000000
--- a/app-emacs/teco/ChangeLog
+++ /dev/null
@@ -1,11 +0,0 @@
-# ChangeLog for app-emacs/teco
-# Copyright 1999-2011 Gentoo Foundation; Distributed under the GPL v2
-# $Header: $
-
-*teco-7 (19 Nov 2011)
-
- 19 Nov 2011; Ulrich Mueller <ulm@gentoo.org> +teco-7.ebuild,
- +files/teco-7-minibuffer-prompt.patch, +files/50teco-gentoo.el,
- +metadata.xml:
- Initial import. Ebuild contributed by me.
-
diff --git a/app-emacs/teco/Manifest b/app-emacs/teco/Manifest
deleted file mode 100644
index db18836..0000000
--- a/app-emacs/teco/Manifest
+++ /dev/null
@@ -1,16 +0,0 @@
------BEGIN PGP SIGNED MESSAGE-----
-Hash: SHA1
-
-AUX 50teco-gentoo.el 257 RMD160 9e07ed5ff32e761178685b7341f20c9b1b792726 SHA1 82ca1a321853d6a66bcf160938b50bd578d22257 SHA256 0f5462dbf8632c898192ab09a9874a4adabbc2a2a96861a19e4dda3e61708dad
-AUX teco-7-minibuffer-prompt.patch 2951 RMD160 1f0b98a27ce7af5070dffca10a649f496c47458e SHA1 02429452037778d4917b5b88494773f827c3ee4b SHA256 14e708a859985f65d96eb11f9d64605e0a74be88b42b0a61ed0fa9631579125c
-DIST teco-7.el.bz2 16372 RMD160 73ca72286844171548303979b274843a550335bc SHA1 98707cf208484e01d082c2313dde4f880a2a7eb5 SHA256 28c04c00f36bc04ffd31291fa2718538a549a5d86dc372a427fba60b40801570
-EBUILD teco-7.ebuild 753 RMD160 11f59c73e1de47dab5b05e089116d1198d9f0320 SHA1 0c08fddccc0514e9cf1d3f476d18c99ec4261934 SHA256 d6443cbdbaa7a7f8cb06be6e3dd924c62abbd7d3a1a0b866dcb7782340d6e1f4
-MISC ChangeLog 329 RMD160 84246a026ca64c81de4995cc3aca038cf7c08866 SHA1 8c6ee961d4bcd2cdd39f43d2e8c581f3bff3b09f SHA256 0a65c4871146ddc65f5d3ef7fed196145bd21e61b30406b478fe99f798dfc63b
-MISC metadata.xml 158 RMD160 415d172437ca754d24fc5ab186ba8e77934d96e4 SHA1 61f6eff9729cd87a725c2a70c81aca4270a17fc4 SHA256 1393bdef3a74343fdb40a112c7096a1af16f67e7a43413250de28dfe73810eab
------BEGIN PGP SIGNATURE-----
-Version: GnuPG v2.0.18 (GNU/Linux)
-
-iEYEARECAAYFAk7NMy0ACgkQOeoy/oIi7uw1OACfSX1+Bt2BFWPdu3vyfgPjWl1S
-F4cAoNAwOKyYty81bJqea1tBjt3KpOhu
-=sURX
------END PGP SIGNATURE-----
diff --git a/app-emacs/teco/files/50teco-gentoo.el b/app-emacs/teco/files/50teco-gentoo.el
deleted file mode 100644
index 6992ef1..0000000
--- a/app-emacs/teco/files/50teco-gentoo.el
+++ /dev/null
@@ -1,4 +0,0 @@
-(add-to-list 'load-path "@SITELISP@")
-(autoload 'teco:command "teco" "Read and execute a Teco command string." t)
-(autoload 'teco "teco" "Read and execute a Teco command string." t)
-(autoload 'teco:copy-to-q-reg "teco" "Copy region into Teco q-reg REG." t)
diff --git a/app-emacs/teco/files/teco-7-minibuffer-prompt.patch b/app-emacs/teco/files/teco-7-minibuffer-prompt.patch
deleted file mode 100644
index 22702ce..0000000
--- a/app-emacs/teco/files/teco-7-minibuffer-prompt.patch
+++ /dev/null
@@ -1,84 +0,0 @@
---- teco.el
-+++ teco.el
-@@ -2202,6 +2202,12 @@
- (list 'keymap (make-vector 128 'teco:command-self-insert))
- "Keymap used while reading teco commands.")
-
-+(defvar teco:command-display-table
-+ (let ((table (make-display-table)))
-+ (aset table ?\e [?$])
-+ table)
-+ "Display table used while reading teco commands.")
-+
- (define-key teco:command-keymap "\^c" 'teco:command-quit)
- (define-key teco:command-keymap "\^g" 'teco:command-quit)
- (define-key teco:command-keymap "\^l" 'teco:command-ctrl-l)
-@@ -2213,10 +2219,6 @@
- (define-key teco:command-keymap "/" 'teco:command-slash)
- (define-key teco:command-keymap "*" 'teco:command-star)
-
--(defvar teco:command-escapes nil
-- "Records where ESCs are, since they are represented in the command buffer
--by $.")
--
- (defun teco:copy-to-q-reg (char start end)
- "Copy region into Teco q-reg REG.
- When called from program, takes three args: REG, START, and END.
-@@ -2244,15 +2246,10 @@
-
- (defun teco:read-command ()
- "Read a teco command string from the user."
-- (let* ((teco:command-escapes nil)
-- (command (catch 'teco:command-quit
-- (read-from-minibuffer teco:prompt nil
-- teco:command-keymap))))
-- (if command
-- (while teco:command-escapes
-- (aset command (car teco:command-escapes) ?\e)
-- (setq teco:command-escapes (cdr teco:command-escapes))))
-- command))
-+ (minibuffer-with-setup-hook
-+ (lambda () (setq buffer-display-table teco:command-display-table))
-+ (catch 'teco:command-quit
-+ (read-from-minibuffer teco:prompt nil teco:command-keymap))))
-
- (defun teco:command-self-insert ()
- (interactive)
-@@ -2276,16 +2273,13 @@
- (interactive)
- ;; Two ESCs in a row terminate the command string
- (if (eq last-command 'teco:command-escape)
-- (throw 'teco:command-quit (buffer-string)))
-+ (throw 'teco:command-quit (minibuffer-contents-no-properties)))
- (teco:command-insert-character last-command-char))
-
- (defun teco:command-ctrl-u ()
- (interactive)
- ;; delete the characters
- (kill-line 0)
-- ;; forget that they were ESCs
-- (while (and teco:command-escapes (<= (point) (car teco:command-escapes)))
-- (setq teco:command-escapes (cdr teco:command-escapes)))
- ;; decide whether to shrink the window
- (while (let ((a (insert ?\n))
- (b (pos-visible-in-window-p))
-@@ -2297,9 +2291,6 @@
- (interactive)
- ;; delete the character
- (backward-delete-char 1)
-- ;; forget that it was an ESC
-- (if (and teco:command-escapes (= (1- (point)) (car teco:command-escapes)))
-- (setq teco:command-escapes (cdr teco:command-escapes)))
- ;; decide whether to shrink the window
- (insert ?\n)
- (if (prog1 (pos-visible-in-window-p)
-@@ -2362,9 +2353,6 @@
-
- ;; Insert a single command character
- (defun teco:command-insert-character (c)
-- (if (eq c ?\e)
-- (setq teco:command-escapes (cons (1- (point)) teco:command-escapes)
-- c ?$))
- (insert c)
- (if (not (pos-visible-in-window-p))
- (enlarge-window 1)))
diff --git a/app-emacs/teco/metadata.xml b/app-emacs/teco/metadata.xml
deleted file mode 100644
index bc306fe..0000000
--- a/app-emacs/teco/metadata.xml
+++ /dev/null
@@ -1,5 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<!DOCTYPE pkgmetadata SYSTEM "http://www.gentoo.org/dtd/metadata.dtd">
-<pkgmetadata>
-<herd>emacs</herd>
-</pkgmetadata>
diff --git a/app-emacs/teco/teco-7.ebuild b/app-emacs/teco/teco-7.ebuild
deleted file mode 100644
index a194fa9..0000000
--- a/app-emacs/teco/teco-7.ebuild
+++ /dev/null
@@ -1,28 +0,0 @@
-# Copyright 1999-2011 Gentoo Foundation
-# Distributed under the terms of the GNU General Public License v2
-# $Header: $
-
-EAPI=4
-
-inherit elisp
-
-DESCRIPTION="TECO interpreter for GNU Emacs"
-HOMEPAGE="http://www.emacswiki.org/emacs/TECO"
-# taken from: http://www.emacswiki.org/emacs/teco.el
-SRC_URI="http://dev.gentoo.org/~ulm/distfiles/${P}.el.bz2"
-
-LICENSE="public-domain"
-SLOT="0"
-KEYWORDS="~amd64 ~x86"
-IUSE=""
-
-ELISP_PATCHES="${P}-minibuffer-prompt.patch"
-SITEFILE="50${PN}-gentoo.el"
-
-pkg_postinst() {
- elisp-site-regen
- elog "To be able to invoke Teco directly, define a key binding"
- elog "for teco:command in your ~/.emacs file, e.g.:"
- elog " (global-set-key \"\\C-z\" 'teco:command)"
- elog "See ${SITELISP}/${PN}/teco.el for documentation."
-}