--- emacs-goodies-el-29.4.orig/make-orig.sh +++ emacs-goodies-el-29.4/make-orig.sh @@ -0,0 +1,36 @@ +#! /bin/sh + +set -e + +dh_testdir +dh_clean +rm -f `find . -name "*~"` +rm -f `find . -name "#*"` +rm -f `find . -name ".#*"` +rm -fR elisp/emacs-goodies-el/info +rm -fR elisp/debian-el/info + +SOURCE=$(dpkg-parsechangelog | awk '/^Source:/ { print $2 }') +FULLVERSION=$(dpkg-parsechangelog | awk '/^Version:/ { print $2 }') +UPSTREAM_VERSION=${FULLVERSION%-*} +DEBIAN_VERSION=${FULLVERSION##*-} +THIS=$(basename $0) +THISDIR=$(basename $PWD) + +#tar cvzfC ../${SOURCE}_$UPSTREAM_VERSION.orig.tar.gz ../ \ +# --exclude=$THISDIR/debian --exclude=$SOURCE/$THIS --exclude=CVS \ +# $THISDIR +rm -fR ../${SOURCE}-${UPSTREAM_VERSION} +mkdir ../${SOURCE}-${UPSTREAM_VERSION} +tar cf - --exclude=CVS elisp | ( cd ../${SOURCE}-${UPSTREAM_VERSION} ; tar xf -) +(cd .. ; tar zcf ${SOURCE}_$UPSTREAM_VERSION.orig.tar.gz ${SOURCE}-${UPSTREAM_VERSION}) +rm -fR ../${SOURCE}-${UPSTREAM_VERSION} +mkdir ../${SOURCE}-${UPSTREAM_VERSION} +tar cf - --exclude=CVS debian make-orig.sh | ( cd ../${SOURCE}-${UPSTREAM_VERSION} ; tar xf -) +(cd .. ; tar zcf debian-${UPSTREAM_VERSION}-${DEBIAN_VERSION}.tar.gz ${SOURCE}-${UPSTREAM_VERSION}) +rm -fR ../${SOURCE}-${UPSTREAM_VERSION} + +(cd .. ; mkdir build_${UPSTREAM_VERSION}-${DEBIAN_VERSION}) +(cd .. ; mv ${SOURCE}_$UPSTREAM_VERSION.orig.tar.gz debian-${UPSTREAM_VERSION}-${DEBIAN_VERSION}.tar.gz build_${UPSTREAM_VERSION}-${DEBIAN_VERSION}) +(cd ../build_${UPSTREAM_VERSION}-${DEBIAN_VERSION} ; tar zxf ${SOURCE}_$UPSTREAM_VERSION.orig.tar.gz) +(cd ../build_${UPSTREAM_VERSION}-${DEBIAN_VERSION} ; tar zxf debian-${UPSTREAM_VERSION}-${DEBIAN_VERSION}.tar.gz) --- emacs-goodies-el-29.4.orig/elisp/dpkg-dev-el/debian-changelog-mode.el +++ emacs-goodies-el-29.4/elisp/dpkg-dev-el/debian-changelog-mode.el @@ -863,7 +863,11 @@ ("stable-security" 5) ("oldstable-security" 6) ("experimental" 7) - ("UNRELEASED" 8)) + ("jaunty" 8) + ("jaunty-proposed" 9) + ("intrepid-proposed" 10) + ("hardy-proposed" 11) + ("UNRELEASED" 12)) nil t nil))) (if (not (equal str "")) (debian-changelog-setdistribution str)))) --- emacs-goodies-el-29.4.orig/debian/debian-el.install +++ emacs-goodies-el-29.4/debian/debian-el.install @@ -0,0 +1,8 @@ +elisp/debian-el/apt-sources.el /usr/share/emacs/site-lisp/debian-el/ +elisp/debian-el/apt-utils.el /usr/share/emacs/site-lisp/debian-el/ +elisp/debian-el/deb-view.el /usr/share/emacs/site-lisp/debian-el/ +elisp/debian-el/debian-bug.el /usr/share/emacs/site-lisp/debian-el/ +elisp/debian-el/debian-el.el /usr/share/emacs/site-lisp/debian-el/ +elisp/debian-el/debian-el-loaddefs.el /usr/share/emacs/site-lisp/debian-el/ +elisp/debian-el/gnus-BTS.el /usr/share/emacs/site-lisp/debian-el/ +elisp/debian-el/preseed.el /usr/share/emacs/site-lisp/debian-el/ --- emacs-goodies-el-29.4.orig/debian/vm-bonus-el.README.Debian +++ emacs-goodies-el-29.4/debian/vm-bonus-el.README.Debian @@ -0,0 +1,66 @@ + This is an introductory starter for the various goodies included in +vm-bonus-el. It does not intend to replace reading the documentation that +is made available in the files themselves. + +You may customize files in this package by using: + + M-x customize-group [RET] vm-bonus-el [RET] + +------------------------------------ +Introduction to files in vm-bonus-el +------------------------------------ + +u-vm-color.el +------------- + + Author Commentary: + + This package provides a simple way for configuring faces for VM. + All faces are customizable. + + For the VM summary buffer this is done using `font-lock', for the + message buffer by a "proprietary" fontifier. + + For vm-summary-mode font-lock-keywords are created from the value of + `vm-summary-format'. All vm format-specifiers are understood (as of VM + 6.88), as well as the user-defined specifier `%UB', provided by BBDB. + + To install and use place this file somewhere in your load-path and put + the following in your VM startup file (~/.emacs or ~/.vm) + + (require 'u-vm-color) + (add-hook 'vm-summary-mode-hook 'u-vm-color-summary-mode) + (add-hook 'vm-select-message-hook 'u-vm-color-fontify-buffer) + + It may be necessary to add the following, which probably comes from + a bug in my code... + (defadvice vm-decode-mime-message (after u-vm-color activate) + (u-vm-color-fontify-buffer-even-more)) + + If you are using auto-fill, ie when the variable + `vm-fill-paragraphs-containing-long-lines' is not nil, you should + also add this: + (defadvice vm-fill-paragraphs-containing-long-lines + (after u-vm-color activate) + (u-vm-color-fontify-buffer)) + + It will make sure that buffers/messages, which have been re-filled + are fontified properly. + + It is possible to use the face definitions from Gnus by adding + (setq u-vm-color-use-gnus-faces t) + However, this is irreversible. At least for that Emacs session. + + All faces are customizable: Just say + M-x customize-group u-vm-color + + In order to prevent Emacs from locking I strongly recommend to use + lazy-lock or jit-mode. + + Disclaimer: `u-vm-color' may show unexpected results, or even fail, if + vm-summary-format is sufficiently complex=strange. + + XEmacs users might want to turn off `vm-use-lucid-highlighting', if + this package works... + + -- Sven Joachim , Thu, 6 Mar 2008 21:55:24 +0100 --- emacs-goodies-el-29.4.orig/debian/emacs-goodies-el.install +++ emacs-goodies-el-29.4/debian/emacs-goodies-el.install @@ -0,0 +1,86 @@ +elisp/emacs-goodies-el/align-string.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/all.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/apache-mode.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/ascii.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/auto-fill-inhibit.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/bar-cursor.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/boxquote.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/browse-huge-tar.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/browse-kill-ring.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/cfengine.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/coffee.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/color-theme.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/clipper.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/csv-mode.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/ctypes.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/cua.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/cyclebuffer.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/cwebm.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/dedicated.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/df.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/dict.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/diminish.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/dirvars.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/edit-env.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/egocentric.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/emacs-goodies-custom.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/emacs-goodies-loaddefs.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/emacs-goodies-el.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/ff-paths.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/filladapt.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/floatbg.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/folding.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/framepop.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/highlight-beyond-fill-column.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/highlight-completion.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/highlight-current-line.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/home-end.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/htmlize.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/ido.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/ibuffer.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/initsplit.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/joc-toggle-buffer.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/joc-toggle-case.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/keydef.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/keywiz.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/lcomp.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/maplev.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/map-lines.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/markdown-mode.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/marker-visit.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/matlab.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/minibuf-electric.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/minibuffer-complete-cycle.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/mutt-alias.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/muttrc-mode.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/newsticker.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/nuke-trailing-whitespace.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/obfusurl.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/pack-windows.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/perldoc.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/pod-mode.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/projects.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/protbuf.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/protocols.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/rfcview.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/services.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/session.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/setnu.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/shell-command.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/show-wspace.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/silly-mail.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/slang-mode.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/sys-apropos.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/tabbar.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/table.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/tail.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/tc.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/thinks.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/tlc.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/tld.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/todoo.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/toggle-option.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/twiddle.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/under.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/wdired.el /usr/share/emacs/site-lisp/emacs-goodies-el/ +elisp/emacs-goodies-el/xrdb-mode.el /usr/share/emacs/site-lisp/emacs-goodies-el/ --- emacs-goodies-el-29.4.orig/debian/emacs-goodies-el.emacsen-startup +++ emacs-goodies-el-29.4/debian/emacs-goodies-el.emacsen-startup @@ -0,0 +1,19 @@ +;; -*-emacs-lisp-*- +;; +;; Emacs startup file for the Debian GNU/Linux emacs-goodies-el package + +(cond + ((not (file-exists-p "/usr/share/emacs/site-lisp/emacs-goodies-el")) + (message + "Package emacs-goodies-el removed but not purged. Skipping setup.")) + ((not (file-exists-p (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/emacs-goodies-el/xrdb-mode.elc"))) + (message "Package emacs-goodies-el not fully installed. Skipping setup.")) + (t + (debian-pkg-add-load-path-item + (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/emacs-goodies-el")) + + (require 'emacs-goodies-el))) --- emacs-goodies-el-29.4.orig/debian/debian-el.emacsen-install.in +++ emacs-goodies-el-29.4/debian/debian-el.emacsen-install.in @@ -0,0 +1,34 @@ +#! /bin/bash -e +# /usr/lib/emacsen-common/packages/install/debian-el + +# Written by Jim Van Zandt , borrowing heavily +# from the install scripts for gettext by Santiago Vila +# and octave by Dirk Eddelbuettel . +# +# Patched by Roland Mas to add support for lists of +# flavor-dependently included/excluded files and by Peter S Galbraith +# to add a STAMPFILE (to only byte-compile once) and +# APPEND_LOAD_PATH ton augment the load-path for byte-compilation. + +FLAVOR=$1 +PACKAGE=debian-el +STAMPFILE=debian-el.elc + +# INCLUDED_emacs20="" +# INCLUDED_emacs21="" +# INCLUDED_xemacs21="" +# INCLUDED_emacs_snapshot="" + +# EXCLUDED_emacs20="" +# EXCLUDED_emacs21="" +# EXCLUDED_xemacs21="" +# EXCLUDED_emacs_snapshot="" + +# Don't byte-compile gnus-BTS.el since it uses gnus macros and will break +# if compiled and then used with different versions of gnus (e.g. as +# shipped wth Emacs vs package separately). +SOURCEONLY_emacs20="gnus-BTS.el" +SOURCEONLY_emacs21="gnus-BTS.el" +SOURCEONLY_emacs22="gnus-BTS.el" +SOURCEONLY_xemacs21="gnus-BTS.el" +SOURCEONLY_emacs_snapshot="gnus-BTS.el" --- emacs-goodies-el-29.4.orig/debian/debian-el.README.Debian +++ emacs-goodies-el-29.4/debian/debian-el.README.Debian @@ -0,0 +1,35 @@ + The file you're currently reading is mostly meant as an introductory +starter for the various goodies included in debian-el. Consult the Info +node `debian-el' for more complete information. + +To customize all files in this package, use: + + M-x customize-group [RET] debian-el [RET] + + +Introduction to files in debian-el +---------------------------------- + +apt-sources.el provides apt-sources-mode, a major mode to help the +edition of /etc/apt/sources.list (and suchlike) files. To use it, +either open a file named sources.list and it will be autoloaded, or +add a local variables section to the end of your file to specify the +mode to be "apt-sources". + +apt-utils.el provides an interface to APT. Start things off using e.g.: +M-x apt-utils-show-package RET emacs21 RET + +debian-bug.el provides M-x debian-bug (and variants), to submit bugs +to the Debian bug tracking system. + +deb-view.el presents the contents of debian package archive files for +viewing (similar to tar-mode). + +gnus-BTS.el makes bug numbers clickable in messages viewed in Gnus. +It expects to see bug references in the form of (for example): +"#48273", "closes: 238742" or similar. To use, add the following to +your .gnus: "(require 'gnus-BTS)". + +preseed.el is a major mode for editing debian-installer preseed files. + + -- Peter S Galbraith , Mon Oct 24 21:10:25 2005 --- emacs-goodies-el-29.4.orig/debian/compat +++ emacs-goodies-el-29.4/debian/compat @@ -0,0 +1 @@ +4 --- emacs-goodies-el-29.4.orig/debian/gnus-bonus-el.install +++ emacs-goodies-el-29.4/debian/gnus-bonus-el.install @@ -0,0 +1,10 @@ +elisp/gnus-bonus-el/gnus-eyecandy.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/gnus-filterhist.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/gnus-junk.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/gnus-outlook-deuglify.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/gnus-pers.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/message-x.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/nnir.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/nnnil.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/nntodo.el /usr/share/emacs/site-lisp/gnus-bonus-el/ +elisp/gnus-bonus-el/spam-stat.el /usr/share/emacs/site-lisp/gnus-bonus-el/ --- emacs-goodies-el-29.4.orig/debian/devscripts-el.emacsen-startup +++ emacs-goodies-el-29.4/debian/devscripts-el.emacsen-startup @@ -0,0 +1,35 @@ +;; -*-emacs-lisp-*- +;; +;; Emacs startup file for the Debian GNU/Linux devscripts-el package + +(cond + ((not (file-exists-p "/usr/share/emacs/site-lisp/devscripts-el")) + (message "Package devscripts-el removed but not purged. Skipping setup.")) + ((not (file-exists-p (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/devscripts-el/pbuilder-mode.elc"))) + (message "Package devscripts-el not fully installed. Skipping setup.")) + (t + + (debian-pkg-add-load-path-item + (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/devscripts-el")) + + ;; autoloads for devscripts.el + (autoload 'debuild "devscripts" "Run debuild in the current directory." t) + (autoload 'debc "devscripts" "Run debc in the current directory." t) + (autoload 'debi "devscripts" "Run debi in the current directory." t) + (autoload 'debit "devscripts" "Run debit in the current directory." t) + (autoload 'debdiff "devscripts" "Compare contents of CHANGES-FILE-1 and CHANGES-FILE-2." t) + (autoload 'debdiff-current "devscripts" "Compare the contents of .changes file of current version with previous version; +requires access to debian/changelog, and being in debian/ dir." t) + (autoload 'debclean "devscripts" "Run debclean in the current directory." t) + (autoload 'pdebuild "pbuilder-mode" "Run pdebuild in the current directory." t) + (autoload 'pdebuild-user-mode-linux "pbuilder-mode" "Run pdebuild-user-mode-linux in the current directory." t) + (autoload 'pbuilder-log-view-elserv "pbuilder-log-view-mode" "Run a elserv session with log view. + +Running this requires elserv. Use elserv, and do `elserv-start' before invoking this command." t) + (autoload 'debuild-pbuilder "pbuilder-mode" "Run debuild-pbuilder in the current directory." t) + (autoload 'pbuilder-build "pbuilder-mode" "Run pbuilder-build for the given filename." t) + (autoload 'pbuilder-user-mode-linux-build "pbuilder-mode" "Run pbuilder-user-mode-linux for the given filename." t))) --- emacs-goodies-el-29.4.orig/debian/vm-bonus-el.copyright +++ emacs-goodies-el-29.4/debian/vm-bonus-el.copyright @@ -0,0 +1,21 @@ +This package was first debianized by Peter S Galbraith +It is co-maintained by Ulf Jasper + +The text of the GNU GPL can be found in /usr/share/common-licenses. + + +Copyright info for files in vm-bonus-el +----------------------------------------- + +Author/copyright info for u-vm-color.el +,---- +| ;;; u-vm-color.el --- Font-lock support for VM. +| +| ;; Copyright (C) 2001-2005 by Ulf Jasper +| ;; Author: Ulf Jasper +| +| ;; 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 the +| ;; Free Software Foundation; either version 2 of the License, or (at your +| ;; option) any later version. +`---- --- emacs-goodies-el-29.4.orig/debian/emacsen-install.template +++ emacs-goodies-el-29.4/debian/emacsen-install.template @@ -0,0 +1,97 @@ + +eval included_here=\$$(echo INCLUDED_$FLAVOR | tr - _) +eval excluded_here=\$$(echo EXCLUDED_$FLAVOR | tr - _) +eval sourceonly_here=\$$(echo SOURCEONLY_$FLAVOR | tr - _) + +included_all=$(for i in ${!INCLUDED_*} ; do + eval echo \$$i + done | sort -u) + +excluded_all=$(for i in ${!EXCLUDED_*} ; do + eval echo \$$i + done | sort -u) + +sourceonly_all=$(for i in ${!SOURCEONLY_*} ; do + eval echo \$$i + done | sort -u) + +if [ ${FLAVOR} = emacs ]; then exit 0; fi + +# Install-info-altdir does not actually exist. +# Maybe somebody will write it. +if test -x /usr/sbin/install-info-altdir; then + echo install/${PACKAGE}: install Info links for ${FLAVOR} + install-info-altdir --quiet --section "" "" --dirname=${FLAVOR} /usr/info/${PACKAGE}.info.gz +fi + +LOG=`tempfile -pelc_ -s.log -m644` +ELDIR=/usr/share/emacs/site-lisp/${PACKAGE} +ELCDIR=/usr/share/${FLAVOR}/site-lisp/${PACKAGE} +if test -e "${ELCDIR}/${STAMPFILE}"; then + echo "${PACKAGE} files already compiled in ${ELCDIR}." + rm -f ${LOG} + exit +fi +echo install/${PACKAGE}: Handling ${FLAVOR}, logged in ${LOG} + +if [ -z "$FLAGS" ] ; then + FLAGS="-q -no-site-file --no-site-file -batch -l path.el -f batch-byte-compile" +fi + +install -m 755 -d ${ELCDIR} +cd ${ELDIR} + +# Now to compute the list of files to install... + +FILES=$(ls -1 *.el) +# Here we have all of them + +PATTERN="" +for i in $included_all $excluded_all $sourceonly_all; do + [ ! -z "$PATTERN" ] && PATTERN="${PATTERN}\|" + PATTERN="${PATTERN}^$i\$" +done +FILES2=$FILES +if [ ! -z "$PATTERN" ] ; then + FILES=$(for i in $FILES2 ; do echo $i | grep -v $PATTERN || true ; done) +fi +# Here we only have those not explicitly included or excluded by any flavour + +FILES="$FILES $included_here" +# Here we also have those included for the current flavour + +for i in $excluded_all ; do + include_i="yes" + for j in $excluded_here ; do + [ $i = $j ] && include_i="no" + done + [ $include_i = "yes" ] && FILES="$FILES $i" +done +# And now we have those excluded by other flavours but not the current one + +FILES=$(for i in $FILES ; do echo $i ; done | sort -u) +# And now for my last trick... The list is now uniquified! + +# Symlinks instead of copying... +cd ${ELCDIR} +for i in $FILES $sourceonly_all; do + ln -fs /usr/share/emacs/site-lisp/${PACKAGE}/$i +done + +cat << EOF > path.el +(setq load-path (cons "." load-path) byte-compile-warnings nil) +EOF +if test "${APPEND_LOAD_PATH}" != "" +then + cat << EOF >> path.el +(setq load-path (append ${APPEND_LOAD_PATH} load-path)) +EOF +fi + +echo ${FLAVOR} ${FLAGS} ${FILES} >> ${LOG} +"${FLAVOR}" ${FLAGS} ${FILES} >> ${LOG} 2>&1 +egrep -s -e "While compiling|\*\*" ${LOG} || /bin/true +echo install/${PACKAGE}: Deleting ${LOG} +rm -f path.el ${LOG} + +exit 0 --- emacs-goodies-el-29.4.orig/debian/control +++ emacs-goodies-el-29.4/debian/control @@ -0,0 +1,197 @@ +Source: emacs-goodies-el +Section: editors +Priority: optional +Maintainer: Ubuntu Core Developers +XSBC-Original-Maintainer: Peter S Galbraith +Build-Depends: debhelper (>= 4.0.0), dpatch (>=1.5) +Build-Depends-Indep: texinfo +Standards-Version: 3.7.2 +Vcs-Cvs: :pserver:anonymous@cvs.alioth.debian.org:/cvsroot/pkg-goodies-el co emacs-goodies-el +Vcs-Browser: http://alioth.debian.org/plugins/scmcvs/cvsweb.php/?cvsroot=pkg-goodies-el + +Package: emacs-goodies-el +Architecture: all +Depends: emacs22 | emacsen, bash (>= 2.05a) | bash-static +Recommends: dict, wget, perl-doc +Replaces: emacs-goodies-extra-el +Provides: emacs-goodies-extra-el +Description: Miscellaneous add-ons for Emacs + This package contains: + align-string - align string components over several lines; + all - edit all lines matching a given regexp; + apache-mode - major mode for editing Apache configuration files; + ascii - ASCII code display for character under point; + auto-fill-inhibit - finer grained control over auto-fill-mode; + bar-cursor - change your cursor to a bar instead of a block; + boxquote - quote texts in nice boxes; + browse-huge-tar - browse tar files without reading them memory; + browse-kill-ring - browse, search, modify the kill ring; + clipper - save strings of data for further use; + coffee - now Emacs can even brew coffee; + color-theme - changes the colors used within Emacs; + csv-mode - major mode for comma-separated value files; + ctypes - enhanced Font lock support for custom defined types; + cua - emulate CUA key bindings (C-z undo, C-x cut, C-c copy, C-v paste); + cyclebuffer - select buffer by cycling through; + cwebm - a modified CWEB/WEB modified mode; + dedicated - make a window dedicated to a single buffer; + df - display in the mode line space left on devices; + dict - wrapper around the 'dict' command. (Depends on bash and dict) + diminish - shorten or erase modeline presence of minor modes; + dirvars - provides directory-wide local variables; + edit-env - display, edit, delete and add environment variables; + egocentric - highlight your name inside emacs buffers; + ff-paths - $PATH-like searching in C-x C-f; + filladapt - enhances Emacs's built-in adaptive fill; + floatbg - slowly modify background color; + framepop - display temporary buffers in a dedicated frame; + highlight-beyond-fill-column - highlight lines that are too long; + highlight-completion - highlight completions in the minibuffer; + highlight-current-line - highlight line where the cursor is; + home-end - alternative Home and End commands; + htmlize - HTML-ize font-lock buffers; + initsplit - split customizations into different files; + joc-toggle-buffer - fast switching between two buffers; + joc-toggle-case - a set of functions to toggle the case of characters; + keydef - a simpler way to define key mappings; + keywiz - Emacs key sequence quiz; + lcomp - list-completion hacks; + maplev - major mode for Maple; + map-lines - map a command over lines matching a regexp; + markdown-mode - major mode for editing Markdown files; + marker-visit - navigate through a buffer's marks in order; + matlab - major mode for MatLab dot-m files; + minibuf-electric - electric minibuffer behavior from XEmacs; + minibuffer-complete-cycle - cycle through the *Completions* buffer; + mutt-alias - lookup and insert the expansion of mutt mail aliases; + muttrc-mode - major mode for editing Mutt config files; + nuke-trailing-whitespace - kill the trailing blanks at end of lines; + obfusurl - obfuscate an URL; + pack-windows - resize all windows to display as much info as possible; + perldoc - show help for Perl functions and modules. (Depends on perl-doc) + pod-mode - major mode for editing POD files + projects - create project-based meaningful buffer names; + prot-buf - protect buffers from accidental killing; + protocols - perform lookups in /etc/protocols; + rfcview - view IETF RFCs with readability-improved formatting; + services - perform lookups in /etc/services; + session - menu to restore files visited in previous editing session; + setnu - setnu-mode, a vi-style line number mode; + shell-command - enables tab-completion for shell-command; + show-wspace - highlight whitespaces of various kinds; + silly-mail - generate bozotic mail headers; + slang-mode.el - a major-mode for editing S-Lang scripts; + sys-apropos - interface for the *nix apropos command; + tabbar - Display a tab bar in the header line; + tail - "tail -f" a file or a command form within Emacs; + tc - cite text with proper filling; + thinks - quote texts in cartoon-like think bubbles; + tlc - major mode for editing Target Language Compiler scripts; + tld - explain top-level domain names; + todoo - major mode for editing TODO files; + toggle-option - easily toggle frequently toggled options; + twiddle - mode line hacks to keep you awake; + under - underline a region with ^ characters; + wdired - rename files editing their names in dired buffers; + xrdb-mode - mode for editing X resource database files. + . + As well as some packages included in emacs22 for use in other flavours: + cfengine - major mode for editing cfengine scripts; + ibuffer - advanced replacement for the `buffer-menu'; + ido - a faster way to switch buffers and get files; + newsticker - a newsticker for Emacs. (Depends on wget) + newsticker - a newsticker for Emacs. (Depends on wget) + table - create and edit WYSIWYG text based embedded tables; + . + See /usr/share/doc/emacs-goodies-el/README.Debian.gz for a short + description of all files, or the Info node `emacs-goodies-el' for details. + +Package: gnus-bonus-el +Architecture: all +Depends: emacs22 | emacsen, gnus | emacs22 | emacs21 | xemacs21 | emacs-snapshot +Section: news +Description: Miscellaneous add-ons for Gnus + This package contains a few Emacs-Lisp files, obtained from various + sources, including the gnu.emacs.sources newsgroup and a few + websites, that provide various functions to Gnus, the Emacs mail and + news reader. + . + This package contains: + gnus-eyecandy - enhance the group buffer by adding icons. + gnus-filterhist - add a buffer which display the message filtering + gnus-junk - semi-automatic replies to junk e-mails; + gnus-pers - an alternative to gnus-posting-styles. + message-x - customizable completion in message headers; + nnir - searchable mail backend; + nnnil - empty, read-only backend; + nntodo - manage to-do items; + spam-stat - spam-detector based on statistics. + . + See /usr/share/doc/gnus-bonus-el/README.Debian for a short description + of all files. + +Package: devscripts-el +Architecture: all +Depends: emacs22 | emacsen, bash (>= 2.05a), devscripts, dpkg-dev-el, apel +Recommends: elserv +Description: Emacs wrappers for the commands in devscripts + This package contains: + devscripts - wrappers around the debuild, debc and debi commands; + pbuilder-log-view - wrappers around viewing pbuilder logs; + pbuilder - wrappers around pbuilder + . + See /usr/share/doc/devscripts-el/README.Debian for a short description. + +Package: debian-el +Architecture: all +Depends: emacs22 | emacsen, reportbug (>= 1.41.1), binutils +Recommends: wget, dlocate, groff-base +Suggests: gnus +Replaces: debbugs-el, debview +Provides: debbugs-el, debview +Section: utils +Description: Emacs helpers specific to Debian users + This package contains: + . + apt-sources - major mode for editing Debian sources.list files; + apt-utils - interface to APT (Debian package management); + debian-bug - an Emacs command to submit a bug report; + deb-view - view contents of Debian package, similarly to tar-mode; + gnus-BTS - provides buttons for bug numbers seen in Gnus messages; + preseed - major mode for editing debian-installer preseed files. + . + See /usr/share/doc/debian-el/README.Debian for a short description of + all files, or the Info node `debian-el' for details. + +Package: dpkg-dev-el +Architecture: all +Depends: emacs22 | emacsen, debian-el (>= 24.0-1) +Suggests: dpkg-dev +Recommends: wget +Conflicts: dpkg-dev (<< 1.7.2) +Section: utils +Description: Emacs helpers specific to Debian development + This package contains: + . + debian-bts-control - builds control@bugs.debian.org email messages; + debian-changelog-mode - a helper mode for Debian changelogs; + debian-control-mode - a helper mode for debian/control files; + debian-copyright - major mode for Debian package copyright files; + readme-debian - major mode for editing README.Debian files. + . + See /usr/share/doc/dpkg-dev-el/README.Debian for a short description of + all files. + +Package: vm-bonus-el +Architecture: all +Depends: vm (>= 8.0.9-1) +Section: mail +Description: Miscellaneous add-ons for VM + This package contains a few Emacs-Lisp files that provide various + functions to VM, a mail user agent for Emacs. + . + This package contains: + u-vm-color.el - font-lock support for VM; + . + See /usr/share/doc/vm-bonus-el/README.Debian for a short description + of all files. --- emacs-goodies-el-29.4.orig/debian/devscripts-el.emacsen-install.in +++ emacs-goodies-el-29.4/debian/devscripts-el.emacsen-install.in @@ -0,0 +1,23 @@ +#! /bin/bash -e +# /usr/lib/emacsen-common/packages/install/devscripts-el + +# Written by Jim Van Zandt , borrowing heavily +# from the install scripts for gettext by Santiago Vila +# and octave by Dirk Eddelbuettel . +# +# Patched by Roland Mas to add support for lists +# of flavor-dependently included/excluded files + +FLAVOR=$1 +STAMPFILE=devscripts.elc +# We need elserv, flim, apel, etc. So use full Debian setup of packages +FLAGS="-q -batch -l path.el -f batch-byte-compile" +PACKAGE=devscripts-el + +# INCLUDED_emacs20="" +# INCLUDED_emacs21="" +# INCLUDED_xemacs21="" + +# EXCLUDED_emacs20="" +# EXCLUDED_emacs21="" +# EXCLUDED_xemacs21="" --- emacs-goodies-el-29.4.orig/debian/dpkg-dev-el.emacsen-startup +++ emacs-goodies-el-29.4/debian/dpkg-dev-el.emacsen-startup @@ -0,0 +1,51 @@ +;; -*-emacs-lisp-*- +;; +;; Emacs startup file for the Debian GNU/Linux dpkg-dev-el package + +(cond + ((not (file-exists-p "/usr/share/emacs/site-lisp/dpkg-dev-el")) + (message "Package dpkg-dev-el removed but not purged. Skipping setup.")) + ((not (file-exists-p (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/dpkg-dev-el/readme-debian.elc"))) + (message "Package dpkg-dev-el not fully installed. Skipping setup.")) + (t + (debian-pkg-add-load-path-item + (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/dpkg-dev-el")) + + (require 'dpkg-dev-el) + + ;; other useful automode + (add-to-list 'auto-mode-alist + '("/debian/[^/]*emacsen-startup\\'" . emacs-lisp-mode)) + + (when (member 'utf-8 (coding-system-list)) + ;; default to utf-8 for debian changelog files + (modify-coding-system-alist 'file "/changelog\\.Debian\\'" 'utf-8) + (modify-coding-system-alist 'file "/debian/control\\'" 'utf-8) + +;;; (modify-coding-system-alist 'file "/debian/changelog\\'" 'utf-8) +;;; Instead use this. See http://bugs.debian.org/457047 by Trent W. Buck + (modify-coding-system-alist 'file "/debian/\\([[:lower:][:digit:].+-]\\.\\)?changelog\\'" 'utf-8) + + ;; Handle Debian native package, from Kevin Ryde in bug #317597 and #416218 + (defun debian-changelog-coding-system (args) + "Return the coding system for a /usr/share/doc/[package]/changelog file. +If [package] is a debian native (no separate changelog.Debian) then answer +`utf-8', otherwise remove ourselves from `file-coding-system-alist' and see +what other rules say." + (let ((filename (if (consp (cadr args)) + (car (cadr args)) ;; ("filename" . buffer) in emacs 22 + (cadr args))) ;; "filename" in emacs 21 + (dirname (file-name-directory filename))) + (if (file-exists-p (concat dirname "changelog.Debian.gz")) + (let ((file-coding-system-alist + (remove '("/usr/share/doc/[^/]+/changelog\\'" + . debian-changelog-coding-system) + file-coding-system-alist))) + (apply 'find-operation-coding-system args)) + 'utf-8)))))) + + --- emacs-goodies-el-29.4.orig/debian/dpkg-dev-el.README.Debian +++ emacs-goodies-el-29.4/debian/dpkg-dev-el.README.Debian @@ -0,0 +1,35 @@ + This file is an introductory starter for the various goodies included in +dpkg-dev-el. It does not intend to replace reading the documentation that +is made available in the files themselves (or not available at all, except +insofar as code is self-documenting). + +To customize all files in this package, use: + + M-x customize-group [RET] dpkg-dev-el [RET] + +Introduction to files in dpkg-dev-el +------------------------------------ + +debian-bts-control.el provides an interface for composing email messages to +the Debian BTS control interface (control@bugs.debian.org). Tab completions +works for all possible commands and their options. + +debian-changelog-mode.el provides a mode for editing debian/changelog +files. This mode adds colouring, a few commands to manipulate +changelog entries and bug reports, and a nice filling function. This +mode can also be used to add colours to buffers visiting the +changelogs in /usr/share/doc//changelog.Debian files. + +debian-copyright.el provides a mode for editing debian/copyright files. +This mode adds a bit of colouring and if `goto-addr' is loaded, it will +make the URLs clickable. + +debian-control-mode.el provides a mode for editing debian/control +files. This mode adds a bit of colouring, a working filling function +(bound to "M-q" by default), tab-completion for adding fields (bound +to "C-c C-a" by default), and viewing bugs (bound to "C-c C-b"). + +readme-debian.el provides readme-debian-mode, a major mode to +highlight README.Debian files. + + -- Peter S Galbraith , Mon Oct 24 21:08:04 2005 --- emacs-goodies-el-29.4.orig/debian/vm-bonus-el.emacsen-remove.in +++ emacs-goodies-el-29.4/debian/vm-bonus-el.emacsen-remove.in @@ -0,0 +1,5 @@ +#!/bin/sh -e +# /usr/lib/emacsen-common/packages/remove/gnus-bonus-el + +FLAVOR=$1 +PACKAGE=vm-bonus-el --- emacs-goodies-el-29.4.orig/debian/emacs-goodies-extra-el.copyright +++ emacs-goodies-el-29.4/debian/emacs-goodies-extra-el.copyright @@ -0,0 +1,8 @@ +The content of the package emacs-goodies-extra-el has been moved to the +package emacs-goodies-el. + +This package ensures that emacs-goodies-el is installed during upgrades +and should thereafter be removed. + +The contents are in the public domain. +Peter S Galbraith --- emacs-goodies-el-29.4.orig/debian/vm-bonus-el.emacsen-startup +++ emacs-goodies-el-29.4/debian/vm-bonus-el.emacsen-startup @@ -0,0 +1,37 @@ +;; -*-emacs-lisp-*- +;; +;; Emacs startup file for the Debian GNU/Linux vm-bonus-el package + +(cond + ((not (file-exists-p "/usr/share/emacs/site-lisp/vm-bonus-el")) + (message "Package vm-bonus-el removed but not purged. Skipping setup.")) + ((not (file-exists-p (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/vm-bonus-el/u-vm-color.elc"))) + (message "Package vm-bonus-el not fully installed. Skipping setup.")) + (t + (debian-pkg-add-load-path-item + (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/vm-bonus-el")) + + (defgroup vm-bonus-el nil + "Customize vm-bonus-el Debian packages." + :group 'vm) + + ;; u-vm-color.el + (defgroup u-vm-color nil + "Font-lock support for vm." + :group 'vm + :group 'vm-bonus-el + :load 'u-vm-color) + + (autoload 'u-vm-color-summary-mode "u-vm-color" + "Configure `font-lock-keywords' and add some hooks for vm-buffers. +Optional argument ARG is not used!" + t) + + (autoload 'u-vm-color-fontify-buffer "u-vm-color" + "Fontifies mail-buffers." + t) + )) --- emacs-goodies-el-29.4.orig/debian/gnus-bonus-el.emacsen-install.in +++ emacs-goodies-el-29.4/debian/gnus-bonus-el.emacsen-install.in @@ -0,0 +1,26 @@ +#! /bin/bash -e +# /usr/lib/emacsen-common/packages/install/gnus-bonus-el + +# Written by Jim Van Zandt , borrowing heavily +# from the install scripts for gettext by Santiago Vila +# and octave by Dirk Eddelbuettel . + +FLAVOR=$1 +PACKAGE=gnus-bonus-el +STAMPFILE=gnus-junk.elc +APPEND_LOAD_PATH="'(\"/usr/share/emacs/site-lisp/gnus/lisp/\")" + +# INCLUDED_emacs20="" +# INCLUDED_emacs21="" +# INCLUDED_xemacs21="" + +# EXCLUDED_emacs20="" +# EXCLUDED_emacs21="" +# EXCLUDED_xemacs21="" +EXCLUDED_emacs_snapshot="nnnil.el spam-stat.el" +EXCLUDED_emacs22="nnnil.el spam-stat.el" + +if [ ${FLAVOR} = emacs20 ]; then + echo "Skipping byte-compilation for emacs20" + exit 0; +fi --- emacs-goodies-el-29.4.orig/debian/debbugs-el.copyright +++ emacs-goodies-el-29.4/debian/debbugs-el.copyright @@ -0,0 +1,7 @@ +The package debbugs-el has been renamed debian-el. + +This package ensures that debian-el is installed during upgrades and +should thereafter be removed. + +The contents are in the public domain. +Peter S Galbraith --- emacs-goodies-el-29.4.orig/debian/debian-el.copyright +++ emacs-goodies-el-29.4/debian/debian-el.copyright @@ -0,0 +1,94 @@ +This package was first debianized by Roland Mas +It is currently maintained by Peter S Galbraith + + This collection of files was assembled by Roland Mas +from various messages posted on the gnu.emacs.sources newsgroup, as well as +from various collections of Emacs Lisp files found on the web. Some +authors contacted Roland directly, some users sent me the files by email. +Most of them are covered by the GNU GPL, but the individual licences can +vary. Here is a list of excerpts of the included files covering this +matter. + + The text of the GNU GPL can be found in /usr/share/common-licenses. + +Copyright info for files in debian-el +------------------------------------- + +Author/copyright info for apt-sources.el: +,---- +| ;;; apt-sources.el --- Mode for editing apt source.list file +| [...] +| ;; Author: Dr. Rafael Sepúlveda. +| ;; Mantainer: Dr. Rafael Sepúlveda. +| +| ;; Copyright (C) 2001-2002, Dr. Rafael Sepúlveda +| +| ;; 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 +| ;; the Free Software Foundation. +`---- + + +Author/copyright info for apt-utils.el: +,- +| ;;; Copyright (C) 2002, 03 Matthew P. Hodges +| +| ;; apt-utils.el 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 2, or (at +| ;; your option) any later version. +| +| ;; apt-utils.el 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. +`- + + +Author/copyright info for debian-bug.el: +,---- +| ;; Copyright (C) 1998, 1999 Free Software Foundation, Inc. +| ;; Copyright (C) 2001, 2002 Peter S Galbraith +| +| ;; Author (Up to version 1.7): Francesco Potortì +| ;; Maintainer from version 1.8 onwards: Peter S Galbraith +| ;; Keywords: debian, bug, reporter +| +| ;; debian-bug.el 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for deb-view.el +,---- +| ;; Author: Rick Macdonald (rickm@vsl.com) +| +| ;; deb-view 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for gnus-BTS.el: +,---- +| ;; Copyright (C) 2001 Andreas Fuchs +| [...] +| ;; gnus-BTS.el 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for preseed.el +,---- +| ;; Copyright (C) 2004 W. Borgert +| +| ;; This package 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 2, or (at your option) +| ;; any later version. +`---- --- emacs-goodies-el-29.4.orig/debian/emacsen-remove.template +++ emacs-goodies-el-29.4/debian/emacsen-remove.template @@ -0,0 +1,10 @@ + +if [ ${FLAVOR} != emacs ]; then + if test -x /usr/sbin/install-info-altdir; then + echo remove/${PACKAGE}: removing Info links for ${FLAVOR} + install-info-altdir --quiet --remove --dirname=${FLAVOR} /usr/info/${PACKAGE}.info.gz + fi + + echo remove/${PACKAGE}: purging byte-compiled files for ${FLAVOR} + rm -rf /usr/share/${FLAVOR}/site-lisp/${PACKAGE} +fi --- emacs-goodies-el-29.4.orig/debian/vm-bonus-el.install +++ emacs-goodies-el-29.4/debian/vm-bonus-el.install @@ -0,0 +1 @@ +elisp/vm-bonus-el/u-vm-color.el /usr/share/emacs/site-lisp/vm-bonus-el/ --- emacs-goodies-el-29.4.orig/debian/README.Debian +++ emacs-goodies-el-29.4/debian/README.Debian @@ -0,0 +1,335 @@ +Emacs Goodies for Debian +------------------------ + + The file you're currently reading is mostly meant as an introductory +starter for the various goodies included in emacs-goodies-el. Consult the +Info node `emacs-goodies-el' for more complete information. + + +Introduction to files in emacs-goodies-el +----------------------------------------- + +,----[ nice title ] +| boxquote.el allows the easy creation of boxes that look like this, +| with a nice title and all. Look for the M-x boxquote-* commands. +`---- + +align-string.el provides M-x align-string and M-x align-all-strings, +to align vertically the first occurences of a regexp over several +lines. + +all.el provides M-x all, a way to see all lines matching a regexp +pattern in a special buffer. Editing these lines in that buffer +propagates the changes back to the original buffer. + +apache-mode.el provides fontification when editing Apache configuration +files. + +ascii.el provides a way to display ASCII code on a window, that is, display +in another window an ASCII table highlighting the current character code. + +auto-fill-inhibit.el provides a finer grained control over +auto-fill-mode activation. Tu use it, simply load the file. For +instance, adding (load-library "auto-fill-inhibit") to your .emacs +should do the trick. You'll need to set the auto-fill-inhibit-list +variable to an appropriate value. + +bar-cursor.el allows you to change your cursor from a block to a +vertical bar in insert mode, and back to a block in overwrite mode. +Try M-x bar-cursor-mode. + +browse-huge-tar.el allows you to browse large tar files without reading +them into memory. The trade off is memory usage vs. speed. + +browse-kill-ring.el provides M-x browse-kill-ring.el, to, well, browse +through your kill ring, perform searches on it, and insert items into +a buffer. + +cfengine.el is an Emacs major-mode for editing cfengine scripts. + +clipper.el provides the M-x clipper-* commands to save strings of data +and insert them afterwards. Each string is labeled with a name, and +can involve some basic template replacement. + +color-theme.el changes the colors used within Emacs. They are lots of +themes to choose from. + +csv-mode.el is a major mode for editing files of CSV type, which provides +commands, key bindings and a menu to sort records by field, kill and yank +columns, align and unalign fields, and transpose rows and columns. + +ctypes.el can search through source files hunting down typedefs. When +found, font-lock is informed and your source code will be even more +beautifully colored than before. + +coffee.el provides an Emacs interface to RFC2324-compliant coffee +devices + +cua.el almost transparently allows you to use C-z, C-x, C-c, and C-v for undo, +cut, copy, and paste, without interfering with the use of Ctrl-x and Ctrl-c as +prefix keys. It supports Shift- to highlight and extend the +selected region. It also includes a rectangle-selection mode, activated with +Shift-Enter. + +cyclebuffer.el provides M-x cyclebuffer-forward, to switch to other +buffers in the most-recently-visited-first order. If you accidentally +overshoot, calling cyclebuffer-backward goes back. You might want to +bind these commands to your favourite keys. + +cwebm.el is a modified CWEB/WEB modified mode. + +dedicated.el allows you to toggle a window's "dedicated" flag. +When a window is "dedicated", Emacs will not select files into that window. + +df.el provides M-x df, to display in the mode line space left on +devices. + +dict.el is an Emacs wrapper around `dict' command to provide access to +a dictd server from within Emacs. The package provides several +(customisable) key bindings, here are two of the default ones: `C-c d +d' runs dict on the word at point. `C-c d r' runs dict on region as a +single word. + +diminish.el provides M-x diminish, M-x diminish-undo and M-x +diminished-modes. Diminished modes are minor modes with a shorter or +no modeline display. + +dirvars.el provides a functionality similar to the local variables +defined in a file, but for an entire directory tree. Use (require +'dirvars) in your .emacs to activate it. + +edit-env.el lets you display, edit, delete and add environment variables. + +egocentric.el provides M-x egocentric-mode, a mode to highlight your +name (or other keywords) in buffers. If you use Gnus, you might want +to add (add-hook 'gnus-article-prepare-hook 'egocentric-mode) to your +Gnus init file. + +ff-paths.el allows you to use C-x C-f normally most of the time, +except that if the requested file doesn't exist, it is checked against +a list of patterns for special paths to search for a file of the same +name. Use (require 'ff-paths) in your .emacs to activate it. + +filladapt.el enhances the behavior of Emacs's fill functions by +guessing the proper fill prefix in many contexts. Emacs has a +built-in adaptive fill mode but Filladapt is said to be much better. +Use `M-x filladapt-mode' to toggle Filladapt mode on/off in the current +buffer. Use 'turn-on-filladapt-mode in mode hooks. + +folding.el provides a minor mode for folding (hiding) parts of the edited +text or program. Folding mode handles a document as a tree, where each +branch is bounded by special markers `{{{' and `}}}'. + +framepop.el makes temporary buffers such as *Help* or *Completions* appear +in a separate frame which is easily dismissed when no longer needed. + +floatbg.el provides M-x floatbg-mode, to slowly modify the background +color of your Emacs. + +highlight-beyond-fill-column.el highlights (with a face you choose) text +that is beyond the fill-column, therefore providing a visual indication of +where the fill-* functions would wrap the lines. Enable it on a buffer +using `M-x highlight-beyond-fill-column.' You may use that command in a +hook (e.g. text-mode-hook) + +highlight-current-line.el highlights the line the cursor is in. Enable a +buffer using the command `M-x highlight-current-line-minor-mode'. You may +enable the minor-mode automatically for (almost) all buffers by + +home-end.el provides some useful bindings for Home and End keys: hit the +key once to go to the beginning/end of a line, hit it twice in a row to go +to the beginning/end of the window, three times in a row goes to the +beiginning/end of the buffer. To enable it, customize the variable +`home-end-enable'. + +htmlize.el provides many M-x htmlize-* commands that turn files, +buffers, or region of font-lock colorised text into an HTML +representation. + +ibuffer.el is an advanced replacement for the `buffer-menu' which is +normally distributed with Emacs. Its interface is intended to be +analogous to that of Dired. + +ido.el provides replacements for the switch-buffer and find-file functions +(and the various versions of these functions) for switching between buffers +and opening files with an absolute minimum of keystrokes. + +initsplit.el allows you to split Emacs customizations (set via M-x +customize) into different files, based on the names of the variables. +To use it, just load the file in your .emacs: (load "initsplit"). +Note that that you *must* load each file that contains your various +customizations from your .emacs. + +joc-toggle-buffer.el provides M-x joc-toggle-buffer, a command that can be +bound to a key in order to speed up the switching between two buffers. + +joc-toggle-case.el provides a sophisticated (over-engineered?) set of +functions to toggle the case of the character under point, with which +you can emulate vi's ~ function. Look for the M-x joc-toggle-case and +M-x joc-toggle-case-* commands. + +keydef.el provides the `keydef' macro for use in .emacs files (or +similar). It is an alternative (simpler) way to define keys, with kbd +syntax. You should read the doc in keydef.el, as it is not intended +for interactive use. + +keywiz.el drills you about Emacs key-bindings. You're presented with +the name of a command and the docstring, and then prompted for the +correct key sequence. You'll earn one point for each correct answer +during the time limit. Invoke with `M-x keywiz'. + +lcomp.el adds useful keybindings to the completions buffer. + +maplev.el is a major mode for Maple. + +map-lines.el provides M-x map-lines, a command to iterate a given +command over lines matching a regexp. + +markdown-mode.el provides support for editing Markdown files. It +provides syntax highlighting and basic element insertion commands. + +marker-visit.el provides a simple way to navigate among marks in a buffer. +All the marks you've left while editing a buffer serve as bread crumb +trails of areas in the buffer you've edited. It is convenient to navigate +back and forth among these marks in order. This file provides two methods +to do just that, marker-visit-prev and marker-visit-next to visit the +nearest mark in either direction. + +matlab.el provides support for editing MATLAB dot-m files. It +automatically indents for block structures, line continuations (e.g., ...), +and comments. + +minibuf-electric.el eases minibuffer typing. When you type "//", it clears +the minibuffer back to the start, leaving only a single "/". When you type +a "~", it does the similar, leaving only "~/". This is nicer than having +to explicitly erase the contents of the minibuffer. + +minibuffer-complete-cycle.el makes `minibuffer-complete' select each of the +possible completions in turn, inserting it into the minibuffer and +highlighting it in the *Completions* buffer. + +mutt-alias.el provides M-x mutt-alias-insert and M-x +mutt-alias-lookup, two commands to lookup and insert the expansion of +mutt mail aliases. + +muttrc-mode.el provides muttrc-mode, a major mode to help the edition +of Mutt configuration files. To use it, either open a file named +muttrc, or add a local variables section to the end of your file to +specify the mode to be "muttrc". + +newsticker.el is a newsticker for Emacs. A newsticker is a thing that +asynchronously retrieves a list of headlines (which are contained in RDF +Site Summary (RSS) files) from a list of news sites, displays these +headlines, and allows for loading the corresponding articles in a web +browser. + +nuke-trailing-whitespace.el (renamed from whitespace.el) provides M-x +nuke-trailing-whitespace, a command that deletes trailing whitespaces in +buffers. + +obfusurl.el provides M-x obfuscate-url, a command that will obfuscate +an URL under the cursor. + +pack-windows.el resizes all windows vertically to display as much +information as possible with the command `M-x pack-windows'. + +perldoc.el provides an interface to the "perldoc" command in your +Perl-mode or CPerl-mode buffers. Use (require 'perldoc) in your +.emacs to activate it, then place point over a word and press F1. + +pod-mode.el provides support for editing Plain Old Documentation +(Perl documentation) files. It provides syntax highlighting. + +projects.el provides M-x add-project, remove-project and +list-projects, and introduces the concept of PROJECT ROOTS that allow +the user to define logical project names and get abbreviated yet +meaningful buffer names in the modeline. + +protbuf.el provides M-x protect-buffer-from-kill-mode and M-x +protect-process-buffer-from-kill-mode, two commands to protect buffers +from being accidentally killed. + +protocols.el provides M-x protocols-lookup, to search for info in your +/etc/protocols. + +rfcview.el formats IETF RFCs for improved readability. + +services.el provides M-x services-lookup, to search for info in your +/etc/services. + +session.el restores various variables (e.g., input histories) from your +last session. It also provides a menu containing recently changed/visited +files and restores the places (e.g., point) of such a file when you revisit +it. + +setnu.el provides M-x setnu-mode, a vi-style line number mode. + +shell-command.el is an an enhancement for shell-command, enabling +tab-completion of commands and dir/filenames within the shell-command input +context. + +show-wspace.el is a minor mode to highlight whitespaces of various kinds. + +slang-mode.el is a major mode for editing S-Lang files. + +silly-mail.el provides M-x add-sm-* commands to add various headers to +your email messages. + +sys-apropos.el provides M-x sys-apropos, an interface to the "apropos" +command. + +tabbar.el displays buffers as tabs in the header line, and provides commands +to switch between them. You can bind keys to M-x tabbar-forward and M-x +tabbar-backward, and use these to quickly switch between buffers. By default, +tabbar-mode will group buffers into various groups, and only display one group +at a time on the tabbar; you can change this by customizing tabbar. + +table.el provides a text based table creation and editing feature. +With this package Emacs is capable of editing tables that are embedded +inside a text document, the feature similar to the ones seen in modern +WYSIWYG word processors. Invoke it with M-x table-insert. You might +also want to add (add-hook 'text-mode-hook 'table-recognize) to your +.emacs, please read the table.el file for more documentation on this. + +tail.el provides the commands M-x tail-file and M-x tail-command, to +follow the output of a command (or to follow a log file) without using +any terminals. + +tc.el provides a nice way to quote cited texts, with proper filling +and attribution. You can use it for instance by setting the cite +function to 'trivial-cite: (setq message-cite-function 'trivial-cite). + + +thinks.el provides cartoon-like think bubbles . o O ( like this ). +Look for M-x thinks* commands. + +tlc.el is a major mode for editing Target Language Compiler scripts. It +automatically indents the programming constructs. + +tld.el provides M-x tld, for easy access to all those top-level +domains you just can't remember, and to the corresponding countries. + +todoo.el provides M-x todoo and M-x todoo-mode, to conveniently edit +TODO lists. + +toggle-option.el provides M-x toggle-option, a command to rapidly +toggle an option. You should set the toggle-option-list variable to +an appropriate value. + +twiddle.el provides mode-line hacks. There are two user commands of +interest: twiddle-start and twiddle-compile. + +under.el provides M-x underline-region, to underline a bit of text +with ^ characters like this. + ^^^^^^^^^ + +wdired.el provides M-x wdired-change-to-wdired-mode (when in a dired +buffer) and allows you to edit the filenames and permission bits +easily. + +xrdb-mode.el provides the xrdb-mode major mode, to help you editing X +resource database files. To use it, simple open a file named .Xdefaults, +.Xenvironment, .Xresources or *.ad after having enabled it by customising +`xrdb-mode-setup-auto-mode-alist'. + + -- Peter S Galbraith , Sat, 12 Apr 2008 09:45:15 -0400 --- emacs-goodies-el-29.4.orig/debian/debian-el.emacsen-remove.in +++ emacs-goodies-el-29.4/debian/debian-el.emacsen-remove.in @@ -0,0 +1,5 @@ +#!/bin/sh -e +# /usr/lib/emacsen-common/packages/remove/debian-el + +FLAVOR=$1 +PACKAGE=debian-el --- emacs-goodies-el-29.4.orig/debian/gnus-bonus-el.emacsen-startup +++ emacs-goodies-el-29.4/debian/gnus-bonus-el.emacsen-startup @@ -0,0 +1,42 @@ +;; -*-emacs-lisp-*- +;; +;; Emacs startup file for the Debian GNU/Linux gnus-bonus-el package + +;; The gnus-bonus-el package follows the Debian/GNU Linux 'emacsen' policy and +;; byte-compiles its elisp files for each 'emacs flavor' (emacs19, +;; xemacs19, emacs20, xemacs20...). The compiled code is then +;; installed in a subdirectory of the respective site-lisp directory. + +(cond + ((not (file-exists-p "/usr/share/emacs/site-lisp/gnus-bonus-el")) + (message "Package gnus-bonus-el removed but not purged. Skipping setup.")) + ((not (file-exists-p (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/gnus-bonus-el/nntodo.elc"))) + (message "Package gnus-bonus-el not fully installed. Skipping setup.")) + (t + (debian-pkg-add-load-path-item + (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/gnus-bonus-el")) + + ;; autoloads for gnus-junk.el + (autoload 'gnus-junk-complain "gnus-junk" + "Mail a complaint about next messages to (hopefully) relevant people." + t) + + ;; autoloads for gnus-pers.el + (autoload 'gnus-personality-init "gnus-pers" + "Install Personality functionality into message mode." + t) + + ;; autoloads for gnus-eyecandy.el + (autoload 'gnus-group-line-add-icon "gnus-eyecandy" + "Highlight the current line according to `gnus-group-icon-list'." + nil) + + ;; autoloads for gnus-filterhist.el + (autoload 'gnus-filter-history "gnus-filterhist" + "Create a buffer *Filter History* with the results of the latest nnmail split." + t) + )) --- emacs-goodies-el-29.4.orig/debian/debian-el.emacsen-startup +++ emacs-goodies-el-29.4/debian/debian-el.emacsen-startup @@ -0,0 +1,18 @@ +;; -*-emacs-lisp-*- +;; +;; Emacs startup file for the Debian GNU/Linux devscripts-el package + +(cond + ((not (file-exists-p "/usr/share/emacs/site-lisp/debian-el")) + (message "Package debian-el removed but not purged. Skipping setup.")) + ((not (file-exists-p (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/debian-el/preseed.elc"))) + (message "Package debian-el not fully installed. Skipping setup.")) + (t + (debian-pkg-add-load-path-item + (concat "/usr/share/" + (symbol-name debian-emacs-flavor) + "/site-lisp/debian-el")) + + (require 'debian-el))) --- emacs-goodies-el-29.4.orig/debian/emacs-goodies-el.emacsen-remove.in +++ emacs-goodies-el-29.4/debian/emacs-goodies-el.emacsen-remove.in @@ -0,0 +1,5 @@ +#!/bin/sh -e +# /usr/lib/emacsen-common/packages/remove/emacs-goodies-el + +FLAVOR=$1 +PACKAGE=emacs-goodies-el --- emacs-goodies-el-29.4.orig/debian/gnus-bonus-el.emacsen-remove.in +++ emacs-goodies-el-29.4/debian/gnus-bonus-el.emacsen-remove.in @@ -0,0 +1,5 @@ +#!/bin/sh -e +# /usr/lib/emacsen-common/packages/remove/gnus-bonus-el + +FLAVOR=$1 +PACKAGE=gnus-bonus-el --- emacs-goodies-el-29.4.orig/debian/emacs-goodies-el.emacsen-install.in +++ emacs-goodies-el-29.4/debian/emacs-goodies-el.emacsen-install.in @@ -0,0 +1,23 @@ +#! /bin/bash -e +# /usr/lib/emacsen-common/packages/install/emacs-goodies-el + +# Written by Jim Van Zandt , borrowing heavily +# from the install scripts for gettext by Santiago Vila +# and octave by Dirk Eddelbuettel . +# +# Patched by Roland Mas to add support for lists +# of flavor-dependently included/excluded files + +FLAVOR=$1 +STAMPFILE=emacs-goodies-el.elc +PACKAGE=emacs-goodies-el + +# INCLUDED_emacs20="" +# INCLUDED_emacs21="" +# INCLUDED_xemacs21="" + +EXCLUDED_emacs20="cwebm.el tabbar.el newsticker.el session.el csv-mode.el maplev.el" +# EXCLUDED_emacs21="whitespace.el" +EXCLUDED_xemacs21="csv-mode.el cua.el ibuffer.el minibuf-electric.el tabbar.el todoo.el rfcview.el " +EXCLUDED_emacs_snapshot="cua.el cfengine.el ibuffer.el ido.el newsticker.el table.el wdired.el " +EXCLUDED_emacs22="cua.el cfengine.el ibuffer.el ido.el newsticker.el table.el wdired.el " --- emacs-goodies-el-29.4.orig/debian/gnus-bonus-el.README.Debian +++ emacs-goodies-el-29.4/debian/gnus-bonus-el.README.Debian @@ -0,0 +1,58 @@ + This is an introductory starter for the various goodies included in +gnus-bonus-el. It does not intend to replace reading the documentation +that is made available in the files themselves (or not available at all, +except insofar as code is self-documenting). + +You may customize files in this package by using: + + M-x customize-group [RET] gnus-bonus-el [RET] + +Introduction to files in gnus-bonus-el +-------------------------------------- + +gnus-eyecandy.el allows you to gratuitously add icons to your group +buffer in a manner similar to the way that you currently specify group +highlighting, ie a Form/File alist rather than a Form/Face alist. + +gnus-filterhist.el creates a buffer with a summary of the number of +messages you've received per mailbox. This summary is cleared every +time you check mail. + +gnus-junk.el provides a semi-automated way to deal with unsolicited +commercial e-mail (also known as "spam"). It provides the M-x +gnus-junk-complain command (use it in your *Summary* buffer). + +gnus-outlook-deuglify.el removes some of the ugliness introduced by +Outlook (and maybe other agents too) users in the quoting that appears +in their answers. To use: add (require 'gnus-outlook-deuglify) to +your Gnus and you're enabled to press `W k' in the Summary Buffer. + +gnus-pers.el is an alternative to gnus-postins-styles. It implements +personalities for Message mode. It allows you to define a personality +with any e-mail address, extra headers and signature you like, either +as strings, functions or variables (signatures may also be +files). Then it will chose a personality for you based on header info, +gnus-newsgroup-name or group parameter. Additionally, you can change a +personality in the middle of writing a message. + +message-x.el provides customizable completion in message headers. Add +(require 'message-x) to your .gnus. + +nnir.el provides the nnir backend, to search mail with various search +engines. Add (require 'nnir) to your .gnus. + +nnnil.el provides an empty, read-only backend for Gnus. This backend +is suitable for use as the primary server when real servers are to be +secondary or foreign. Add (require 'nnnil) to your .gnus. + +nntodo.el provides a backend to manage todo items with Gnus. Each +todo item is a message. Add (require 'nntodo) to your .gnus. + +spam-stat.el performs spam detection based on statistics. To use, add +(require 'spam-stat) and (spam-stat-load) to your .gnus file, use the +spam-stat-buffer-is-spam and spam-stat-buffer-is-non-spam functions +(or spam-stat-buffer-change-to-spam and +spam-stat-buffer-change-to-non-spam) in the appropriate buffers, and +add the rule (: gnus-spam-stat-split) to `nnmail-split-fancy'. + + -- Peter S Galbraith , Mon Oct 24 21:07:13 2005 --- emacs-goodies-el-29.4.orig/debian/debview.copyright +++ emacs-goodies-el-29.4/debian/debview.copyright @@ -0,0 +1,7 @@ +The content of the package debview has been moved to the package debian-el. + +This package ensures that debian-el is installed during upgrades and +should thereafter be removed. + +The contents are in the public domain. +Peter S Galbraith --- emacs-goodies-el-29.4.orig/debian/devscripts-el.emacsen-remove.in +++ emacs-goodies-el-29.4/debian/devscripts-el.emacsen-remove.in @@ -0,0 +1,5 @@ +#!/bin/sh -e +# /usr/lib/emacsen-common/packages/remove/devscripts-el + +FLAVOR=$1 +PACKAGE=devscripts-el --- emacs-goodies-el-29.4.orig/debian/dpkg-dev-el.emacsen-remove.in +++ emacs-goodies-el-29.4/debian/dpkg-dev-el.emacsen-remove.in @@ -0,0 +1,5 @@ +#!/bin/sh -e +# /usr/lib/emacsen-common/packages/remove/dpkg-dev-el + +FLAVOR=$1 +PACKAGE=dpkg-dev-el --- emacs-goodies-el-29.4.orig/debian/gnus-bonus-el.copyright +++ emacs-goodies-el-29.4/debian/gnus-bonus-el.copyright @@ -0,0 +1,159 @@ +This package was first debianized by Roland Mas +It is currently maintained by Peter S Galbraith + + This collection of files was assembled by Roland Mas +from various messages posted on the gnu.emacs.sources newsgroup, as well as +from various collections of Emacs Lisp files found on the web. Some +authors contacted Roland directly, some users sent me the files by email. +Most of them are covered by the GNU GPL, but the individual licences can +vary. Here is a list of excerpts of the included files covering this +matter. + + The text of the GNU GPL can be found in /usr/share/common-licenses. + + +Copyright info for files in gnus-bonus-el +----------------------------------------- + +Author/copyright info for gnus-eyecandy.el: +,---- +| ;;; gnus-eyecandy.el --- add some eyecandy to Gnus +| +| ;; Copyright (C) 1999 BrYan P. Johnson +| +| ;; Modified 2003-10-15 to work with GNU Emacs +| ;; by Johan Bockgård +| [...] +| ;; gnus-eyecandy.el 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 2, or (at your option) any later +| ;; version. +`---- + + +Author/copyright info for gnus-filterhist.el: +,---- +| ;;; gnus-filterhist.el --- Gnus Filter Histories -- parse nnmail-split-history to provide reports of mail splits. +| +| ;; Copyright (C) 1999 BrYan P. Johnson +| [...] +| ;; gnus-filterhist.el 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 2, or (at your option) any later +| ;; version. +`---- + + +Author/copyright info for gnus-junk.el: +,---- +| ;;; gnus-junk.el --- a response to junk e-mails +| +| ;; Copyright (C) 1996,1997 Robert Bihlmeyer +| +| ;; Author: Robert Bihlmeyer +| [...] +| ;; 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 the Free +| ;; Software Foundation; either version 2, or (at your option) any later +| ;; version. +`---- + + +Author/copyright info for gnus-outlook-deuglify.el: +,---- +| ;;; gnus-outlook-deuglify.el --- deuglify broken Outlook (Express) articles +| +| ;; Copyright (C) 2001,2002 Raymond Scholz +| +| ;; Author: Raymond Scholz +| ;; Thomas Steffen (unwrapping algorithm, +| ;; based on an idea of Stefan Monnier) +| [...] +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for gnus-pers.el: +,---- +| ;;; gnus-pers.el --- an alternative to gnus-posting-styles +| +| ;; Copyright (C) 1999 BrYan P. Johnson +| +| ;; Author: BrYan P. Johnson +| [...] +| ;; gnus-pers.el 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 2, or (at your option) any later +| ;; version. +`---- + + +Author/copyright info for message-x.el: +,---- +| ;; message-x.el -- customizable completion in message headers +| ;; Copyright (C) 1998 Kai Großjohann +| [...] +| ;; Author: Kai Grossjohann +| ;; Keywords: news, mail, compose, completion +| [...] +| ;; This 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for nnnil.el: +,---- +| ;;; nnnil.el: empty, read-only backend for Gnus -*- emacs-lisp -*- +| ;;; +| ;;; Written and placed in the public domain by Paul Jarc . +`---- + + +Author/copyright info for nnir.el: +,---- +| ;;; nnir.el --- search mail with various search engines -*- coding: iso-8859-1 -*- +| ;; Copyright (C) 1998 Kai Großjohann +| [...] +| ;; Author: Kai Großjohann +| [...] +| ;; This 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for nntodo.el: +,---- +| ;;; nntodo.el --- Manage todo items with Gnus +| +| ;; Copyright (C) 1999 by Kai Grossjohann. +| +| ;; Authors: Kai.Grossjohann@CS.Uni-Dortmund.DE, +| ;; John Wiegley +| [...] +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for spam-stat.el: +,---- +| ;;; spam-stat.el --- detecting spam based on statistics +| +| ;; Copyright (C) 2002 Alex Schroeder +| +| ;; Author: Alex Schroeder +| [...] +| ;; This 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 2, or (at your option) +| ;; any later version. +`---- --- emacs-goodies-el-29.4.orig/debian/vm-bonus-el.emacsen-install.in +++ emacs-goodies-el-29.4/debian/vm-bonus-el.emacsen-install.in @@ -0,0 +1,25 @@ +#! /bin/bash -e +# /usr/lib/emacsen-common/packages/install/vm-bonus-el + +# Written by Jim Van Zandt , borrowing heavily +# from the install scripts for gettext by Santiago Vila +# and octave by Dirk Eddelbuettel . + +FLAVOR=$1 +PACKAGE=vm-bonus-el +STAMPFILE=vm-rfaddons.elc +APPEND_LOAD_PATH="'(\"/usr/share/emacs/site-lisp/vm\")" + +# INCLUDED_emacs20="" +# INCLUDED_emacs21="" +# INCLUDED_xemacs21="" + +# EXCLUDED_emacs20="" +# EXCLUDED_emacs21="" +# EXCLUDED_xemacs21="" +# EXCLUDED_emacs_snapshot="" + +if [ ${FLAVOR} = emacs20 ]; then + echo "Skipping byte-compilation for emacs20" + exit 0; +fi --- emacs-goodies-el-29.4.orig/debian/emacs-goodies-el.copyright +++ emacs-goodies-el-29.4/debian/emacs-goodies-el.copyright @@ -0,0 +1,1229 @@ +This package was first debianized by Roland Mas +It is currently maintained by Peter S Galbraith + + This collection of files was assembled by Roland Mas +from various messages posted on the gnu.emacs.sources newsgroup, as well as +from various collections of Emacs Lisp files found on the web. Some +authors contacted Roland directly, some users sent me the files by email. +Most of them are covered by the GNU GPL, but the individual licences can +vary. Here is a list of excerpts of the included files covering this +matter. + + The text of the GNU GPL can be found in /usr/share/common-licenses. + +Copyright info for files in emacs-goodies-el +-------------------------------------------- + +Author/copyright info for align-string.el: +,---- +| ;; Copyright (c) 2001 Markus Bjartveit Krüger +| +| ;; Author: Markus Bjartveit Krüger +| [...] +| ;; X-URL: http://www.pvv.org/~markusk/align-string.el +| +| ;; This 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for all.el: +,---- +| ;;; all.el --- Edit all lines matching a given regexp. +| +| ;; Copyright (C) 1985, 1986, 1987, 1992, 1994 Free Software Foundation, Inc. +| ;; Copyright (C) 1994 Per Abrahamsen +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for apache-mode.el +from http://www.emacswiki.org/elisp/apache-mode.el +,---- +| ;;; apache-mode.el --- major mode for editing Apache configuration files +| +| ;; Author: Jonathan Marten +| ;; Author: Karl Chen +| [...] +| ;; +| ;; It 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for ascii.el: +,---- +| ;;; ascii --- ASCII code display. +| +| ;; Copyright (C) 1999, 2000, 2001 Vinicius Jose Latorre +| +| ;; 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 the Free +| ;; Software Foundation; either version 2, or (at your option) any later +| ;; version. +`---- + + +Author/copyright info for auto-fill-inhibit.el: +,---- +| ;;; auto-fill-mode-inhibit -- finer grained control over +| ;;; auto-fill-mode (de)activation +| ;;; Copyright (c) 2001 Michael Weber +| [...] +| ;;; This program is free software; you can redistribute it and/or +| ;;; modify it under the terms of the GNU General Public License +| ;;; version 2 as published by the Free Software Foundation. +| [...] +| ;;; NO-VIRUS CLAUSE: +| ;;; The intent of this license is to protect free redistribution and +| ;;; reuse of the source of the licensed distribution, not to prejudice +| ;;; the authorship rights of programmers of other code to control +| ;;; their original inventions. +| ;;; +| ;;; No portion of this license is to be interpreted as forbidding the +| ;;; reuse of this code or its constituent parts, algorithms, or +| ;;; inventions in commercial products. +| ;;; +| ;;; Nor shall such inclusion be construed to require the GPLing or +| ;;; disclosure of any portions of said commercial products other than +| ;;; those falling under the copyright of the licensed distribution. +`---- + + +Author/copyright info for bar-cursor.el: +,---- +| ;;; @(#) bar-cursor.el -- package used to switch block cursor to a bar +| [...] +| ;; Copyright (C) 2001 by Joseph L. Casadonte Jr. +| ;; Author: Joe Casadonte (emacs@northbound-train.com) +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for boxquote.el: +,---- +| ;;; boxquote.el --- Quote text with a semi-box. +| ;; Copyright 1999,2000,2001 by Dave Pearson +| ;; $Revision: 1.23 $ +| +| ;; boxquote is free software distributed under the terms of the GNU General +| ;; Public Licence, version 2. For details see the file COPYING. +`---- + + +Author/copyright info for browse-huge-tar.el: +,---- +| ;;; browse-huge-tar.el --- Browse files in a tarball memory-efficiently. +| ;; (c) Gareth Owen 1999 (hey I just typed `space' 1999. Ho ho.) +| +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for browse-kill-ring.el: +,---- +| ;;; browse-kill-ring.el --- interactively insert items from kill-ring +| +| ;; Copyright (C) 2001 Colin Walters +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for cfengine.el +http://www.loveshack.ukfsn.org/emacs/cfengine.el +,---- +;;; cfengine.el --- mode for editing Cfengine files +| +|;; Copyright (C) 2003, 2004, 2005 Free Software Foundation, Inc. +| +|;; Author: Dave Love +| +|;; GNU Emacs 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 2, or (at your option) +|;; any later version. +`---- + + +Author/copyright info for clipper.el: +,---- +| ;;; clipper.el --- save strings of data for further use. +| +| ;; Copyright (C) 1997-2000 Free Software Foundation, Inc. +| +| ;; Author: Kevin A. Burton (burton@openprivacy.org) +| ;; Maintainer: Kevin A. Burton (burton@openprivacy.org) +| ;; Location: http://relativity.yi.org +| [...] +| ;; This file is [not yet] part of GNU Emacs. +| +| ;; 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 the Free Software +| ;; Foundation; either version 2 of the License, or any later version. +`---- + + +Author/copyright info for csv-mode.el: + http://centaur.maths.qmul.ac.uk/Emacs/ + http://centaur.maths.qmul.ac.uk/Emacs/files/csv-mode.el +,---- +| ;;; csv-mode.el --- major mode for editing comma-separated value files +| +| ;; Copyright (C) 2003, 2004 Francis J. Wright +| +| ;; Author: Francis J. Wright +| [...] +| ;; This package 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for ctypes.el: +,---- +| ;;; ctypes.el --- Enhanced Font lock support for custom defined types. +| +| ;; Copyright (C) 1997, 1999 Anders Lindgren. +| +| ;; Author: Anders Lindgren +| [...] +| ;; CTypes 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for coffee.el: +,---- +| ;;; coffee.el --- Submit a BREW request to an RFC2324-compliant coffee device +| ;;; +| ;;; Author: Eric Marsden +| ;;; Version: 0.3 +| ;;; Copyright: (C) 1999, 2003 Eric Marsden +| ;;; Keywords: coffee brew kitchen-sink can't +| ;; +| ;; +| ;; 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 the Free Software Foundation; either version 2 of +| ;; the License, or (at your option) any later version. +`---- + + +Author/copyright info for color-theme.el +,---- +| ;;; color-theme.el --- install color themes +| +| ;; Copyright (C) 1999, 2000 Jonadab the Unsightly One +| ;; Copyright (C) 2000, 2001, 2002, 2003 Alex Schroeder +| ;; Copyright (C) 2003, 2004 Xavier Maillard +| +| ;; Author: Jonadab the Unsightly One +| ;; Maintainer: Xavier Maillard +| ;; URL: http://www.emacswiki.org/cgi-bin/wiki.pl?ColorTheme +| +| ;; This 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 2, or (at your option) any later +| ;; version. +`---- + + +Author/copyright info for cua.el: +,---- +| ;;; cua.el --- emulate CUA key bindings +| +| ;; Copyright (C) 1997-2001 Free Software Foundation, Inc. +| +| ;; Author: Kim F. Storm +| ;; Maintainer: Kim F. Storm +| ;; Location: http://www.cua.dk/ +| [...] +| ;; This file is not [yet] part of GNU Emacs, but is distributed under +| ;; the same terms. +| +| ;; GNU Emacs 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for cyclebuffer.el: +,---- +| ;;; cyclebuffer.el --- select buffer by cycling through +| [...] +| ;; Author: Kurt Partridge +| ;; Maintainer: Kurt Partridge +| [...] +| ;; Copyright (C) 1996 Kurt Partridge +| +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for cwebm.el +,---- +| ;;; cwebm.el --- CWEB/WEB modified mode +| ;; +| ;; This file is replacement for the cweb.el from the Levi' CWEB. +| ;; +| ;; Copyright (C) 1987,1990,1993,2000 Silvio Levy and Donald E. Knuth +| ;; Copyright (c) 2002,2003,2004,2005 Max Vasin +| ;; +| ;; Permission is granted to make and distribute verbatim copies of +| ;; this document provided that the copyright notice and this +| ;; permission notice are preserved on all copies. +| ;; +| ;; Permission is granted to copy and distribute modified versions of +| ;; this document under the conditions for verbatim copying, provided +| ;; that the entire resulting derived work is given a different name +| ;; and distributed under the terms of a permission notice identical to +| ;; this one. +`---- + + +Author/copyright info for dedicated.el: +,---- +| ;;; dedicated.el --- A very simple minor mode for dedicated buffers +| +| ;; Copyright (C) 2000 Eric Crampton +| +| ;; This 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 2, or (at your option) any later +| ;; version. +`---- + + +Author/copyright info for df.el: +,---- +| ;;; df.el --- Hack to display in the mode line space left on devices +| +| ;; Copyright (C) 1999 by Association April +| +| ;; Author: Benjamin Drieu +| [...] +| ;; GNU Emacs as this program are free software; you can redistribute +| ;; them and/or modify them under the terms of the GNU General Public +| ;; License as published by the Free Software Foundation; either +| ;; version 2, or (at your option) any later version. +`---- + + +Author/copyright info for dict.el: +,---- +| ;; dict.el - Emacs interface to dict client +| ;; +| +| ;; Copyright (c) 2002 Max Vasin +| ;; +| ;; 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 the Free Software Foundation; either version 2 +| ;; of the License, or (at your option) any later version. +`---- + + +Author/copyright info for diminish.el: +,---- +| ;; Copyright (C) 1998 Free Software Foundation, Inc. +| +| ;; Author: Will Mengarini +| ;; URL: +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for dirvars.el: +,---- +| ;;; dirvars.el --- Local variables that apply to an entire directory +| +| ;; Copyright (C) 2002 Matt Armstrong +| +| ;; Author: Matt Armstrong +| [...] +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for edit-env.el: +,---- +| ;;; edit-env.el --- display and edit environment variables +| +| ;; Copyright (C) 2001 Benjamin Rutt +| +| ;; This file 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 2, or (at your +| ;; option) any later version. +`---- + + +Author/copyright info for egocentric.el: +,---- +| ;;; @(#) egocentric.el --- highlight your name inside emacs buffers +| [...] +| ;; Copyright (C) 2001 by Benjamin Drieu +| ;; Author: Benjamin Drieu +| ;; Maintainer: Benjamin Drieu +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for ff-paths.el: +,---- +| ;;; ff-paths.el - find-file-using-paths searches certain paths to find files. +| +| ;; Copyright (C) 1994-2001 Peter S. Galbraith +| +| ;; Author: Peter S. Galbraith +| ;; +| [...] +| ;; This package 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for filladapt.el: +,---- +| ;;; Adaptive fill +| ;;; Copyright (C) 1989, 1995-1998 Kyle E. Jones +| ;;; +| ;;; 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 +| ;;; the Free Software Foundation; either version 2, or (at your option) +| ;;; any later version. +`---- + + +Author/copyright info for floatbg.el: +,---- +| ;;; floatbg.el --- slowly modify background color +| ;; Copyright (C) 2001 John Paul Wallington +| [...] +| ;; Author: John Paul Wallington +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for folding.el + http://cvs.sourceforge.net/viewcvs.py/tiny-tools/tiny-tools/lisp/other/ +,---- +| ;;; folding.el --- A folding-editor-like minor mode. +| ;; Copyright (C) 1994-2004 +| ;; Jari Aalto, Anders Lindgren, All rights reserved. +| ;; Copyright (C) 1992, 1993 +| ;; Jamie Lokier, All rights reserved. +| [...] +| ;; 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 the Free Software Foundation; either version 2 of the +| ;; License, or (at your option) any later version. +`---- + + +Author/copyright info for framepop.el +,---- +| ;; Copyright (C) 1993, 1995 Free Software Foundation, Inc. +| ;; Copyright (C) 2003 Peter S Galbraith +| +| ;; Author: David Smith +| ;; Maintainer: Peter S Galbraith +| [...] +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for highlight-beyond-fill-column.el: +,---- +| ;;; highlight-beyond-fill-column.el --- font-lock-add-keywords aid for Emacs +| +| ;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc. +| +| ;; Author: Sandip Chitale (sandip.chitale@blazesoft.com) +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for highlight-completion.el: +,---- +| ;;; highlight-completion.el --- completion with highlighted provisional text +| ;; Copyright (c) 1991-1996 Mark Haiman, Nick Reingold, John Palmieri +| ;; Copyright (c) 1997-2001 John Palmieri +| ;; +| ;; Author: John Palmieri +| [...] +| ;; This package 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for highlight-current-line.el: +,---- +| ;; Copyright (c) 1997 Christoph Conrad +| +| ;; Author: Christoph Conrad +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for home-end.el: +,---- +| ;;; home-end.el --- Alternative Home and End commands. +| ;; Copyright 1996 Kai Grossjohann and Toby Speight +| ;; Copyright 2002 Toby Speight +| +| ;; home-end.el is free software distributed under the terms of the GNU +| ;; General Public Licence, version 2. For details see the file COPYING. +| +| [...] +| ;; Kai Grossjohann +| [...] +| ;; Modified by Toby Speight > +`---- + + +Author/copyright info for htmlize.el: +,---- +| ;; Copyright (C) 1997,1998,1999,2000 Hrvoje Niksic +| +| ;; Author: Hrvoje Niksic +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for ibuffer.el: +,---- +| ;;; ibuffer.el --- operate on buffers like dired +| +| ;; Copyright (C) 2000, 2001 Free Software Foundation, Inc. +| +| ;; Author: Colin Walters +| [...] +| ;; This file is not currently part of GNU Emacs. +| +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for ido.el +,---- +| ;;; ido.el --- interactively do things with buffers and files. +| +| ;; Copyright (C) 1996-2001 Free Software Foundation, Inc. +| +| ;; GNU Emacs 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for initsplit.el: +,---- +| ;;; initsplit --- code to split customizations into different files +| +| ;; Copyright (C) 2000, 2001 John Wiegley +| +| ;; Author: John Wiegley +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for joc-toggle-buffer.el (eenamed from toggle-buffer.el) +,---- +| ;;; @(#) toggle-buffer.el --- flips back and forth between two buffers +| [...] +| ;; Copyright (C) 2001 by Joseph L. Casadonte Jr. +| +| ;; Author: Joe Casadonte (emacs@northbound-train.com) +| ;; Maintainer: Joe Casadonte (emacs@northbound-train.com) +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for joc-toggle-case.el (renamed from toggle-case.el): +,---- +| ;;; ************************************************************************** +| ;; @(#) toggle-case.el -- toggles case at poitn like ~ in vi +| [...] +| ;; Copyright (C) 2001 by Joseph L. Casadonte Jr. +| ;; Author: Joe Casadonte (emacs@northbound-train.com) +| ;; Maintainer: Joe Casadonte (emacs@northbound-train.com) +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for keydef.el: +,---- +| ;;; keydef.el --- a simpler way to define keys, with kbd syntax +| +| ;; Emacs Lisp Archive Entry +| ;; Filename: keydef.el +| ;; Author: Michael John Downes +| [...] +| ;; This program was placed in the public domain on 2001/01/18 by the +| ;; Author. The program 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. +`---- + + +Author/copyright info for keywiz.el: +,---- +| ;;; keywiz.el --- Emacs key sequence quiz +| +| ;; Copyright (C) 2002 Jesper Harder +| +| ;; Author: Jesper Harder +| [...] +| ;; 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 the Free Software Foundation; either version 2 of +| ;; the License, or (at your option) any later version. +`---- + + +Author/copyright info for lcomp.el +,---- +| ;;; lcomp.el --- list-completion hacks! +| +| ;; Copyright (C) 2002 by Taiki SUGAWARA +| +| ;; Author: Taiki SUGAWARA +| +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for maplev.el and maplev.texi +,---- +| ;;; maplev.el --- Maple mode for GNU Emacs +| ;; Copyright (C) 2001,2003 Joseph S. Riel +| +| ;; Authors: Joseph S. Riel +| ;; and Roland Winkler +| ;; X-URL: http://www.k-online.com/~joer/maplev/maplev.html +| +| ;; 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 the Free Software Foundation; either version 2 of the +| ;; License, or (at your option) any later version. +`---- + + +Author/copyright info for map-lines.el: +,---- +| ;; Copyright (C) 2002 Andreas Fuchs +| +| ;; Author: Andreas Fuchs +| [...] +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for matlab.el +,---- +| ;; Copyright (C) 1997-1999 Eric M. Ludlam +| ;; Copyright (C) 1991-1997 Matthew R. Wette +| ;; +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for markdown-mode.el: +,---- +| ;; Author: Jason Blevins +| ;; Created: May 24, 2007 +| ;; $Id: emacs-goodies-el.copyright,v 1.23 2007-11-28 01:00:11 kibi-guest Exp $ +| ;; Keywords: Markdown major mode +| ;; +| ;; Copyright (C) 2007 Jason Blevins +| ;; +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for marker-visit.el: +,---- +| ;;; marker-visit.el --- navigate through a buffer's marks in order +| +| ;; Copyright (C) 2001 Benjamin Rutt +| +| ;; This file 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 2, or (at your +| ;; option) any later version. +`---- + + +Author/copyright info for minibuf-electric.el +,---- +| ;; Extracted from minibuf.el --- Minibuffer functions for XEmacs +| ;; Copyright (C) 1992, 1993, 1994, 1997 Free Software Foundation, Inc. +| ;; Copyright (C) 1995 Tinker Systems. +| ;; Copyright (C) 1995, 1996, 2000 Ben Wing. +| +| ;; Modified by Karl Hegbloom for GNU Emacs. +| ;; GPL +`---- + + +Author/copyright info for minibuffer-complete-cycle.el +,---- +| ;; Copyright © 1997,1998,2000,2003 Kevin Rodgers +| +| ;; Author: Kevin Rodgers +| [...] +| ;; 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 the Free Software Foundation; either version 2 of +| ;; the License, or (at your option) any later version. +`---- + + +Author/copyright info for mutt-alias.el: +,---- +| ;;; mutt-alias.el --- Lookup/insert mutt mail aliases. +| ;; Copyright 1999,2000 by Dave Pearson +| [...] +| ;; mutt-alias is free software distributed under the terms of the GNU +| ;; General Public Licence, version 2. For details see the file COPYING. +`---- + + +Author/copyright info for muttrc-mode.el: +,---- +| ;;; muttrc-mode.el --- Major mode to edit muttrc under Emacs +| +| ;;; Copyright (C) 2000, 2001, 2002 Laurent Pelecq +| ;;; +| ;;; Author: Laurent Pelecq +| +| ;;; 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 +| ;;; the Free Software Foundation; either version 2, or (at your option) +| ;;; any later version. +`---- + + +Author/copyright info for newsticker.el +,---- +| ;;; newsticker.el --- A Newsticker for Emacs. +| ;; +| ;; Copyright (C) 2003 by Ulf Jasper +| ;; +| ;; +| ;; 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 the Free Software Foundation; either version 2 of the +| ;; License, or (at your option) any later version. +`---- + + +Author/copyright info for obfusurl.el: +,---- +| ;;; obfusurl.el --- Obfuscate URLs so they aren't spoilers +| ;; Copyright 2001 by Dave Pearson +| [..] +| ;; obfusurl.el is free software distributed under the terms of the GNU +| ;; General Public Licence, version 2. For details see the file COPYING. +`---- + + +Author/copyright info for pack-windows.el +,---- +| ;;; pack-windows.el --- Resize all windows to display as much info as possible. +| +| ;; Copyright (C) 2000 Michel Schinz +| +| ;; 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 the Free Software Foundation; either version 2 of +| ;; the License, or (at your option) any later version. +`---- + + +Author/copyright info for perldoc.el: +,---- +| ;;; perldoc.el --- Show help for Perl functions, builtins, and modules. +| +| ;; +| ;; Copyright (C) 2000-2002 Steve Kemp +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for pod-mode.el: +,---- +| ;;; pod-mode.el --- Major mode for editing .pod-files +| +| ;;; Copyright 2003-2005 Steffen Schwigon +| +| ;;; Author: Steffen Schwigon +| ;;; Version: 0.4 +| ;;; CVS Version: $Id: emacs-goodies-el.copyright,v 1.23 2007-11-28 01:00:11 kibi-guest Exp $ +| ;;; Keywords: perl pod +| ;;; X-URL: http://search.cpan.org/~schwigon/pod-mode/ +| +| ;;; 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 +| ;;; the Free Software Foundation; either version 2, or (at your option) +| ;;; any later version. +`---- + + +Author/copyright info for projects.el: +,---- +| ;;; projects.el -- Project-based buffer name management +| +| ;; Copyright 1998 Naggum Software +| +| ;; Author: Erik Naggum +| ;; Keywords: internal +| +| ;; This file is not part of GNU Emacs, but distributed under the same +| ;; conditions as GNU Emacs, and is useless without GNU Emacs. +| +| ;; GNU Emacs 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for protbuf.el: +,---- +| ;;; protbuf.el --- protect buffers from accidental killing +| +| ;; Copyright (C) 1994, 1999 Noah S. Friedman +| +| ;; Author: Noah Friedman +| ;; Maintainer: friedman@splode.com +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for protocols.el: +,---- +| ;;; protocols.el --- Protocol database access functions. +| ;; Copyright 2000,2001 by Dave Pearson +| [...] +| ;; protocols.el is free software distributed under the terms of the GNU +| ;; General Public Licence, version 2. For details see the file COPYING. +`---- + +Author/copyright info for rfcview.el: +,---- +| ;;; rfcview.el -- view IETF RFCs with readability-improved formatting +| +| ;; Copyright (C) 2001-2002 Neil W. Van Dyke +| +| ;; Author: Neil W. Van Dyke +| +| ;; This 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 2, or (at your option) any later version. +`---- + + +Author/copyright info for services.el: +,---- +| ;;; services.el --- Services database access functions. +| ;; Copyright 2000 by Dave Pearson +| [...] +| ;; services.el is free software distributed under the terms of the GNU +| ;; General Public Licence, version 2. For details see the file COPYING. +`---- + + +Author/copyright info for session.el +,---- +| ;;; session.el --- use variables, registers and buffer places across sessions +| +| ;; Copyright 1996-1999, 2001-2003 Free Software Foundation, Inc. +| ;; +| ;; Author: Christoph Wedler +| ;; X-URL: http://emacs-session.sourceforge.net/ +| +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for setnu.el: +,---- +| ;;; vi-style line number mode for Emacs +| ;;; (requires Emacs 19.29 or later, or XEmacs 19.14 or later) +| ;;; Copyright (C) 1994, 1995, 1997 Kyle E. Jones +| ;;; +| ;;; 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 +| ;;; the Free Software Foundation; either version 2, or (at your option) +| ;;; any later version. +`---- + + +Author/copyright info for shell-command.el: +,---- +| ;;; shell-command.el --- enabling (tab)completion for shell-command +| +| ;; Copyright (C) 1998-2003 TSUCHIYA Masatoshi +| +| ;; Author: TSUCHIYA Masatoshi +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for show-wspace.el: +,---- +| ;;; show-wspace.el --- Highlight whitespace of various kinds. +| +| ;; Author: Peter Steiner , Drew Adams +| ;; Maintainer: Drew Adams +| ;; Copyright (C) 2000-2007, Drew Adams, all rights reserved. +| ;; [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`--- + + +Author/copyright info for silly-mail.el: +,---- +| ;;; silly-mail.el --- generate bozotic mail headers +| +| ;; Compilation Copyright (C) 1993, 94, 95, 96, 97, 98, 99, 2000 Noah S. Friedman +| +| ;; Contributors: Noah Friedman, Jamie Zawinski, Jim Blandy, +| ;; Thomas Bushnell, Roland McGrath, +| ;; and a cast of dozens. +| ;; Maintainer: Noah Friedman +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for slang-mode.el + http://home.mchsi.com/~jmrobert5/files/slang-mode.el +,---- +| ;;; slang-mode.el --- a major-mode for editing slang scripts +| +| ;; Copyright (C) 1993, 1994, 1995 Free Software Foundation, Inc. +| +| ;; Modified By: Joe Robertson +| ;; Modified From: tcl-mode.el +| ;; +| ;; Original Author: Gregor Schmid +| ;; Keywords: languages, processes, tools +| +| ;; This file is part of GNU Emacs. +| +| ;; GNU Emacs 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for tabbar.el: +,---- +| ;;; tabbar.el --- Display a tab bar in the header line +| +| ;; Copyright (C) 2003 David Ponce +| +| ;; Author: David Ponce +| ;; Maintainer: David Ponce +| [...] +| ;; This file is not part of GNU Emacs. +| +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for table.el: +,---- +| ;;; table.el --- create and edit WYSIWYG text based embedded tables +| +| ;; Copyright (C) 2000, 2001 Takaaki "Tak" Ota +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for tail.el: +,---- +| ;;; tail.el --- Tail files within Emacs +| +| ;; Copyright (C) 2000 by Benjamin Drieu +| +| ;; Author: Benjamin Drieu +| [...] +| ;; This program as GNU Emacs are free software; you can redistribute +| ;; them and/or modify them under the terms of the GNU General Public +| ;; License as published by the Free Software Foundation; either +| ;; version 2, or (at your option) any later version. +`---- + + +Author/copyright info for tc.el: +,---- +| ;; trivial-cite -- cite text with proper filling +| [...] +| ;; This program is copyright (c) 1998 Lars R. Clausen +| [...] +| ;; Author: Lars R. Clausen +| [...] +| ;; trivial-cite 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for tlc.el +,---- +| ;; Copyright (c) 1997, 1998 by The MathWorks, Inc. +| ;; +| ;; This program is derived from 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 2, or +| ;; (at your option) any later version. +`---- + + +Author/copyright info for thinks.el: +,---- +| ;;; thinks.el --- Insert text in a think bubble. +| ;; Copyright 2000,2001 by Dave Pearson +| ;; $Revision: 1.23 $ +| +| ;; thinks is free software distributed under the terms of the GNU General +| ;; Public Licence, version 2. For details see the file COPYING. +`---- + + +Author/copyright info for tld.el: +,---- +| ;;; tld.el --- TLD lookup tool. +| ;; Copyright 2000 by Dave Pearson +| [...] +| ;; tld.el is free software distributed under the terms of the GNU +| ;; General Public Licence, version 2. For details see the file COPYING. +`---- + + + + +Author/copyright info for todoo.el: +,---- +| ;; todoo.el -- Major mode for editing TODO files +| +| ;; Copyright (C) 1999 Daniel Lundin +| [...] +| ;; This 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for toggle-option.el: +,---- +| ;;; toggle-option.el --- easily toggle frequently toggled options +| +| ;; Copyright (C) 2001 Cyprian Laskowski +| +| ;; Author: Cyprian Laskowski +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for twiddle.el: +,---- +| ;;; twiddle.el --- mode-line display hack +| +| ;; Copyright (C) 1997 Noah S. Friedman +| +| ;; Author: Noah Friedman +| ;; Maintainer: friedman@prep.ai.mit.edu +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for under.el: +,---- +| ;; Copyright (C) 1998 by Benjamin Drieu +| ;; Author: Benjamin Drieu +| ;; Maintainer: Benjamin Drieu +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for wdired.el: +,---- +| ;;; wdired.el --- Rename files editing their names in dired buffers +| ;; Copyright (C) 2001 Juan León Lahoz García +| [...] +| ;; Author: Juan León Lahoz García +| [...] +| ;; 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 the Free Software Foundation; either version 2, or (at +| ;; your option) any later version. +`---- + + +Author/copyright info for whitespace.el: + This file is renamed nuke-trailing-whitespace.el to avoid name-space collision + with whitespace.el packaged with Emacs21. +,---- +| ;;; whitespace.el --- strip trailing whitespace from buffers +| +| ;; Copyright (C) 1995, 1996, 1997, 2000 Noah S. Friedman +| +| ;; Author: Noah Friedman +| [...] +| ;; 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 +| ;; the Free Software Foundation; either version 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for xrdb-mode.el: +,---- +| ;;; xrdb-mode.el --- mode for editing X resource database files +| +| ;; Copyright (C) 1998,1999,2000 Free Software Foundation, Inc. +| +| ;; Author: 1994-2002 Barry A. Warsaw +| ;; Maintainer: barry@python.org +| [...] +| ;; 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 the Free Software Foundation; either version 2 +| ;; of the License, or (at your option) any later version. +`---- --- emacs-goodies-el-29.4.orig/debian/dpkg-dev-el.install +++ emacs-goodies-el-29.4/debian/dpkg-dev-el.install @@ -0,0 +1,7 @@ +elisp/dpkg-dev-el/debian-bts-control.el /usr/share/emacs/site-lisp/dpkg-dev-el/ +elisp/dpkg-dev-el/debian-changelog-mode.el /usr/share/emacs/site-lisp/dpkg-dev-el/ +elisp/dpkg-dev-el/debian-control-mode.el /usr/share/emacs/site-lisp/dpkg-dev-el/ +elisp/dpkg-dev-el/debian-copyright.el /usr/share/emacs/site-lisp/dpkg-dev-el/ +elisp/dpkg-dev-el/dpkg-dev-el-loaddefs.el /usr/share/emacs/site-lisp/dpkg-dev-el/ +elisp/dpkg-dev-el/dpkg-dev-el.el /usr/share/emacs/site-lisp/dpkg-dev-el/ +elisp/dpkg-dev-el/readme-debian.el /usr/share/emacs/site-lisp/dpkg-dev-el/ --- emacs-goodies-el-29.4.orig/debian/devscripts-el.copyright +++ emacs-goodies-el-29.4/debian/devscripts-el.copyright @@ -0,0 +1,23 @@ +This package was first debianized by Roland Mas +The source package `emacs-goodies-el' is maintained by Peter S Galbraith +. +The binary package `devscripts-el' is maintained by its upstream author +Junichi Uekawa . + + +Copyright info for files in devscripts-el +----------------------------------------- + +Author/copyright info for devscripts.el, pbuilder-log-view-mode.el and +pbuilder-mode.el + +,---- +| ;; copyright 2002 Junichi Uekawa. +| [...] +| This file 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 2, or (at your option) +| any later version. +`---- + +The text of the GNU GPL can be found in /usr/share/common-licenses. --- emacs-goodies-el-29.4.orig/debian/devscripts-el.README.Debian +++ emacs-goodies-el-29.4/debian/devscripts-el.README.Debian @@ -0,0 +1,36 @@ + This is an introductory starter for the various goodies included +devscripts-el. It does not intend to replace reading the documentation +that is made available in the files themselves (or not available at all, +except insofar as code is self-documenting). + +Introduction to files in devscripts-el +-------------------------------------- + +devscripts.el provides + + M-x debuild + M-x debc + M-x debi + M-x debclean + M-x debdiff + +commands to call the corresponding utilities from within Emacs. + +pbuilder-mode.el provides + + M-x pdebuild + M-x pdebuild-user-mode-linux + M-x pbuilder-build + M-x pbuilder-user-mode-linux-build + M-x debuild-pbuilder + +commands to call the corresponding utilities from within Emacs. + +pbuilder-log-view-mode.el provides + + M-x pbuilder-log-view-elserv + +command to view pbuilder and debuild logs from Mozilla through elserv web +server. + + -- Peter S Galbraith , Mon Oct 24 21:09:09 2005 --- emacs-goodies-el-29.4.orig/debian/dpkg-dev-el.emacsen-install.in +++ emacs-goodies-el-29.4/debian/dpkg-dev-el.emacsen-install.in @@ -0,0 +1,23 @@ +#! /bin/bash -e +# /usr/lib/emacsen-common/packages/install/dpkg-dev-el + +# Written by Jim Van Zandt , borrowing heavily +# from the install scripts for gettext by Santiago Vila +# and octave by Dirk Eddelbuettel . +# +# Patched by Roland Mas to add support for lists +# of flavor-dependently included/excluded files + +FLAVOR=$1 +STAMPFILE=debian-changelog-mode.elc +PACKAGE=dpkg-dev-el + +APPEND_LOAD_PATH="'(\"/usr/share/emacs/site-lisp/debian-el/\")" + +# INCLUDED_emacs20="" +# INCLUDED_emacs21="" +# INCLUDED_xemacs21="" + +# EXCLUDED_emacs20="" +# EXCLUDED_emacs21="" +# EXCLUDED_xemacs21="" --- emacs-goodies-el-29.4.orig/debian/rules +++ emacs-goodies-el-29.4/debian/rules @@ -0,0 +1,63 @@ +#!/usr/bin/make -f +# Sample debian/rules that uses debhelper. +# GNU copyright 1997 to 1999 by Joey Hess. + +# Uncomment this to turn on verbose mode. +#export DH_VERBOSE=1 + +include /usr/share/dpatch/dpatch.make + +configure: configure-stamp +configure-stamp: + dh_testdir + touch configure-stamp + +build: patch configure-stamp build-stamp +build-stamp: + dh_testdir + for i in debian/*.emacsen-install.in ; do cat $$i debian/emacsen-install.template > debian/$$(basename $$i .in) ; done + for i in debian/*.emacsen-remove.in ; do cat $$i debian/emacsen-remove.template > debian/$$(basename $$i .in) ; done + install -d info + makeinfo elisp/emacs-goodies-el/emacs-goodies-el.texi + makeinfo elisp/debian-el/debian-el.texi + makeinfo elisp/emacs-goodies-el/maplev.texi + mv -f maplev info/ + touch build-stamp + +clean: unpatch + dh_testdir + dh_testroot + if [ -d debian/patched ] ; then rmdir debian/patched ; fi + rm -f build-stamp configure-stamp + for i in debian/*.emacsen-install.in ; do rm -f debian/$$(basename $$i .in) ; done + for i in debian/*.emacsen-remove.in ; do rm -f debian/$$(basename $$i .in) ; done + rm -fR info + dh_clean + +install: build + dh_testdir + dh_testroot + dh_clean -k + dh_installdirs + dh_install + +binary-indep: build install + +binary-arch: build install + dh_testdir + dh_testroot + dh_installdocs + dh_installemacsen + (cd debian/debian-el/etc/emacs/site-start.d; mv 50debian-el.el 51debian-el.el) + dh_installinfo -p emacs-goodies-el info/emacs-goodies-el* info/maplev + dh_installinfo -p debian-el info/debian-el + dh_installchangelogs + dh_compress + dh_fixperms + dh_installdeb + dh_gencontrol + dh_md5sums + dh_builddeb + +binary: binary-indep binary-arch +.PHONY: build clean binary-indep binary-arch binary install configure patch unpatch --- emacs-goodies-el-29.4.orig/debian/devscripts-el.install +++ emacs-goodies-el-29.4/debian/devscripts-el.install @@ -0,0 +1,3 @@ +elisp/devscripts-el/devscripts.el /usr/share/emacs/site-lisp/devscripts-el/ +elisp/devscripts-el/pbuilder-log-view-mode.el /usr/share/emacs/site-lisp/devscripts-el/ +elisp/devscripts-el/pbuilder-mode.el /usr/share/emacs/site-lisp/devscripts-el/ --- emacs-goodies-el-29.4.orig/debian/debview.emacsen-startup +++ emacs-goodies-el-29.4/debian/debview.emacsen-startup @@ -0,0 +1,4 @@ +;; This file may be safely deleted. +;; +;; Its only purpose was to remove the old version of this file that existed +;; prior to debview.el's move to the package `debian-el'. --- emacs-goodies-el-29.4.orig/debian/changelog +++ emacs-goodies-el-29.4/debian/changelog @@ -0,0 +1,2294 @@ +emacs-goodies-el (29.4-1ubuntu1) jaunty; urgency=low + + * Merge from Debian unstable, remaining changes: + - add {hardy,intrepid}{,-proposed} distribution targets to dpkg-dev-el. + * add jaunty{,-proposed} distribution targets; drop out the hardy and + intrepid non-proposed targets, since uploads to the release pocket + are not permitted for stable releases. + + -- Steve Langasek Fri, 14 Nov 2008 00:23:50 +0000 + +emacs-goodies-el (29.4-1) unstable; urgency=high + + * debian-el: + - debian-bug.el: + Bug fix: "Bug submenus have vanished", thanks to Bill Wohler for the + report and to Camm Maguire for an initial patch (Closes: #463053). + This _should_ go in lenny; I have only changed code that was currently + broken under the new Debian bug web page format. + * emacs-goodies-el: + - markdown-mode.el: Thanks to Jason Blevins for the new upstream version + 1.6. It fixes "blockquote-region only works if the region was selected + with the mouse" submitted by Daniel Burrows (Closes: #456592). + + -- Peter S Galbraith Tue, 09 Sep 2008 21:28:31 -0400 + +emacs-goodies-el (29.3-2ubuntu1) intrepid; urgency=low + + * add {hardy,intrepid}{,-proposed} distribution targets to dpkg-dev-el. + LP: #267822 + + -- Reinhard Tartler Mon, 08 Sep 2008 18:21:15 +0200 + +emacs-goodies-el (29.3-2) unstable; urgency=low + + * devscripts-el: + - Bug fix: "devscripts-el: missing dependency on apel (mcharset.el)". + Thanks to Luca Capello (Closes: #483244). + + -- Peter S Galbraith Wed, 28 May 2008 19:46:13 -0400 + +emacs-goodies-el (29.3-1) unstable; urgency=low + + * devscripts-el: + - Bug fix: "devscripts-el: Downgrade elserv dependency to Recommends". + Thanks to Tim Retout (Closes: #475791). + + -- Peter S Galbraith Mon, 26 May 2008 20:17:18 -0400 + +emacs-goodies-el (29.2-1) unstable; urgency=low + + * emacs-goodies-el: + - Updated to lastest version compatible with GPL V3: + box-quote.el + mutt-alias.el + obfusurl.el + protocols.el + services.el + thinks.el + tld.el + - rfcview.el: Updated from maintained version at + http://www.loveshack.ukfsn.org/emacs/rfcview.el + Should fix fontification bug reported by jidanni@jidanni.org + but no longer works with XEmacs (it requires view.el). + (Closes: #464940). + - Fix S-Lang spelling in package description. + Thanks to Rafael Laboissiere (Closes: #460445). + * debian-el: + - Enable apt-sources-mode for files in /etc/apt/sources.list.d/". + Thanks to Géraud Meyer for the report and patch (Closes: #475701). + * dpkg-dev-el: + - Generalise automatic invocation to files named debian/package.changelog + Thanks to Trent W. Buck for the report and patch. (Closes: #457047) + + -- Peter S Galbraith Sat, 12 Apr 2008 09:49:26 -0400 + +emacs-goodies-el (29.1-1) unstable; urgency=low + + [ Sven Joachim ] + * vm-bonus-el: + - Don't include vm-rfaddons.el and depend on vm versions + that ship that file (Closes: #469652, #469625). + + [ Cyril Brulebois ] + * dpkg-dev-el: + - debian-control-mode.el: Added `Dm-Upload-Allowed' to the list of + valid fields for the source packages. + + [ Peter S Galbraith ] + * Bug fix: "emacs-goodies-el: FTBFS if built twice in a row", thanks to + Sven Joachim (Closes: #469751). + + -- Peter S Galbraith Wed, 26 Mar 2008 20:26:56 -0400 + +emacs-goodies-el (29.0-1) unstable; urgency=low + + [ Cyril Brulebois ] + * debian/changelog: + - Converted to UTF-8. Thanks to Bas Zoetekouw. + (Closes: #453964, #453973, #453974, #453978, #454008, #454034). + - Deleted local variables at the end, Emacs shouldn't need this any + longer. + - Nuked trailing spaces at the same time. + * emacs-goodies-el: + - pod-mode.el: Added file (version 0.4), as suggested by + Emmanuel Bouthenot (Closes: #452857). + * debian/control: + - Added Vcs-Cvs and Vcs-Browser fields. + + [ Peter S Galbraith ] + * emacs-goodies-el: + - minibuffer-complete-cycle.el: Updated to V1.14 with patch from + Sebastian P. Luque. + + -- Peter S Galbraith Tue, 04 Dec 2007 19:41:04 -0500 + +emacs-goodies-el (28.3-1) unstable; urgency=low + + [ Peter S Galbraith ] + * emacs-goodies-el: + - htmlize.el: Updated file to V1.34 (Thanks to S.P. Tseng). + - todoo.el: Symbol's function definition is void: + outline-font-lock-level", I had forgotten an instance of that old + function. Thanks to Jens Thiele and Sven Joachim (Closes: #447760). + * debian-el: + - apt-utils.el: "suggest apt-utils-show-package defer package name + completions", thanks to Kevin Ryde and Matt Hodges (Closes: #442425). + + [ Cyril Brulebois ] + * emacs-goodies-el: + - markdown-mode.el: Updated file to V1.5. + * dpkg-dev-el: + - debian-control-mode.el: Renamed `XS-Vcs-*' into `Vcs-*' since these + fields are now recognized by dpkg (since 1.14.7). + + -- Peter S Galbraith Tue, 23 Oct 2007 20:31:24 -0400 + +emacs-goodies-el (28.2-1) unstable; urgency=low + + [ Cyril Brulebois ] + * emacs-goodies-el: + Updated file: + - show-wspace.el: upstream has added a `show-ws-' prefix to improve + semantics and avoid namespace clash. + * dpkg-dev-el: + Updated file: + - debian-control-mode.el: added `Homepage' to the list of the valid fields + for the source packages. + - debian-control-mode.el: added `XS-Vcs-Browser' and `XS-Vcs-*' to the + list of the valid fields for the source packages. The list of valid * + has been taken from: + http://svn.debian.org/wsvn/qa/trunk/pts/www/bin/common.py?op=file + Patch contributed by Rafael Laboissiere (Closes: #422491). + + -- Peter S Galbraith Wed, 03 Oct 2007 19:36:13 -0400 + +emacs-goodies-el (28.1-1) unstable; urgency=low + + * emacs-goodies-el: + - xrdm-mode.el: Added pointer to `xrdb-mode-setup-auto-mode-alist' + customization to enable this feature in both Info file and + README.Debian. . Thanks to Reuben Thomas (Closes: #411434). + + -- Peter S Galbraith Mon, 24 Sep 2007 20:54:42 -0400 + +emacs-goodies-el (28.0-1) unstable; urgency=low + + [ Cyril Brulebois ] + * debian/control: + - Removed Roland Mas from the Uploaders upon his request. + * emacs-goodies-el: + New file: + - show-wspace.el: highlights whitespaces of various kinds. + Thanks to Lennart Poettering for the suggestion (Closes: #422876). + + [ Peter S Galbraith ] + * debian-el: + - gnus.BTS.el: Implement "reading bugs as mail instead of in browser". + Thanks to Johannes Rohr for the report and to intrigeri for the patch + (Closes: #218286). + - debian-bug.el: Add `debian-bug-get-bug-as-email-hook' and relative + `run-hooks' patch from Luca Capello (Closes: #392475) + * emacs-goodies-el: + - cwebm.el: Blank out the contents of cwebm.el, whose license is not + compatible with Emacs. + - rfcview.el: Add hyperlinks for rfcview.el patch from Dave Love + (Closes: #377678). + + -- Peter S Galbraith Mon, 24 Sep 2007 20:36:30 -0400 + +emacs-goodies-el (27.7-1) unstable; urgency=low + + * debian-el: + - gnus-BTS.el: fails when clicking a bug. Thanks to Jhair Tocancipa + Triana and Manoj Srivastava for reports, and to Elias Oltmanns for + testing my fix. (Closes: #363161, #442438). + * gnus-bonus-el: + - gnus-pers.el: gives newsgroup setting priority over interactive + choice". Thanks to Bruce Stephens and to Elias Oltmanns + (Closes: #263371). + + -- Peter S Galbraith Tue, 18 Sep 2007 21:38:17 -0400 + +emacs-goodies-el (27.6-1) unstable; urgency=low + + * gnus-bonus-el: + - gnus-pers.el: "Cc-fix feature in gnus-pers is horribly broken". + Thanks to Elias Oltmanns for the report and the patches, and I + apologise for the delay in applying them! (Closes: #384209). + + -- Peter S Galbraith Mon, 17 Sep 2007 22:15:29 -0400 + +emacs-goodies-el (27.5-1) unstable; urgency=low + + * debian-el: debian-bug.el (and debian-changelog-mode.el) + - Implement pacakge lookup on http://packages.debian.org/ + See http://bugs.debian.org/87725 + * dpkg-dev-el: + - Patch from Luca Capello to add keys to generate the + open bug alist (Closes: #430517). + + -- Peter S Galbraith Sun, 02 Sep 2007 21:39:14 -0400 + +emacs-goodies-el (27.4-1) unstable; urgency=low + + * dpkg-dev-el: + - debian-bts-control.el: Added `fixed' `notfixed' `block' `unblock' + `archive' `unarchive' `found' `notfound'. Thanks to intrigeri + (Closes: #391647). + + -- Peter S Galbraith Thu, 30 Aug 2007 09:27:43 -0400 + +emacs-goodies-el (27.3-1) unstable; urgency=low + + * dpkg-dev-el: + - debian-bts-control.el: debian-bts-control suffers of bug #336466 and + doesn't skip over mml directives. + Thanks to Luca Capello (Closes: #392132). + + -- Peter S Galbraith Thu, 30 Aug 2007 08:25:26 -0400 + +emacs-goodies-el (27.2-1) unstable; urgency=low + + * debian-el: + - debian-bug.el: "Bugs menu gone due to missing + debian-changelog-close-bug-statement", thanks to Bill Wohler + (Closes: #440002). + * emacs-goodies-el: + - Bug fix: Lists packages available in emacs22 separately. + Thanks to Trent W. Buck (Closes: #438498). + - Bug fix: "Description field typo, s/: / - /." + Thanks to Trent W. Buck (Closes: #438497). + - cfengine.el: Updated to better version of cfengine.el. + Thanks to its author, Dave Love (Closes: #377675). + - todoo-mode.el: Symbol function definition is void: + outline-font-lock-level in todoo-indent-line". + Thanks to Kumar Appaiah (Closes: #438964). + + -- Peter S Galbraith Wed, 29 Aug 2007 22:01:32 -0400 + +emacs-goodies-el (27.1-1) unstable; urgency=low + + * emacs-goodies-el: postinst failed with emacs22 because silly-mail + required sendmail.el and failed to byte-compile if /usr/bin/mail + didn't exist. Thanks to Josh Triplett (Closes: #434104). + + -- Peter S Galbraith Wed, 08 Aug 2007 19:42:02 -0400 + +emacs-goodies-el (27.0-1) unstable; urgency=low + + [ Cyril Brulebois ] + * emacs-goodies-el: + New file: + - markdown-mode.el: major mode for editing Markdown files + (Closes: #435485). + + [ Peter S Galbraith ] + * debian/compat thanks to Michael Olson. + * debian-el: + - /etc/emacs/site-start.d/51debian-el.el: Typo: debian-el-el, + thanks to Josh Triplett (Closes: #427770). + * dpkg-dev-el: + - debian-bts-control.el: Use `C-c C-b' instead of `C-c c' (Closes: #435247). + - debian-changelog-model.el: + auto-mode-alist for "/debian/*NEWS" files, thanks to Per Olofsson + (Closes: #424779). + * emacs-goodies-el: + - tabbar.el updated to version 2.0 and Info updated as well. + Thanks to Michal Sojka (Closes: #435335). + + -- Peter S Galbraith Wed, 08 Aug 2007 18:47:33 -0400 + +emacs-goodies-el (26.13-1) unstable; urgency=low + + * Bug fix: "gnus-bonus-el does not know about emacs22", thanks to + Mikhail Gusarov (Closes: #434491). + * Bug fix: "emacs-goodies-el: Please prefer emacs22 as first + alternative", thanks to Sven Joachim (Closes: #432100). + * Bug fix: "[debian-bug.el, debian-changelog-mode.el] please be + consistent for the close statement", thanks to Luca Capello (Closes: + #431091). + * Bug fix: "cyclebuffer.el too old global-set-key example", thanks to + Dan Jacobson (Closes: #371861). + * Bug fix: "emacs-goodies-el: df-mode break minor-mode-alist and + function using it". Added 50_df_minor_mode_alist.dpatch thanks to + Remi Vanicat (Closes: #430788). + + -- Peter S Galbraith Wed, 25 Jul 2007 21:53:16 -0400 + +emacs-goodies-el (26.12-1) unstable; urgency=low + + [ Michael Olson ] + * debian/emacs-goodies-el.emacsen-install.in: + - (EXCLUDED_emacs22): Exclude programs that are part of Emacs 22. + * debian/compat: + - Set to 4 to silence lintian warning. + * debian/control: + - (Standards-Version): Set to 3.7.2 + - (Build-Depends): Move debhelper and dpatch here. + * debian/rules: + - Don't set DH_COMPAT. + [ Junichi Uekawa ] + * devscripts-el: + - unset read-only state in debuild. + * pbuilder-mode.el: + - unset read-only state. + [ Peter Galbraith ] + * gnus-bonus-el.emacsen-install.in, debian-el.emacsen-install.in: Setup + emacs22 with similar exceptions as emacs-snapshot. + + -- Peter S Galbraith Fri, 20 Jul 2007 10:14:25 -0400 + +emacs-goodies-el (26.11-1) unstable; urgency=low + + * dpkg-dev-el: + - debian-changelog-mode.el: Use "date -R" instead of deprecated + "822-date". Thanks to Matej Vela. (Closes: #423142, #423155, #423828) + * emacs-goodies-el: + - todoo.el: Comment out clobbering of outline-mode-menu-bar-map key + entries. This is far too aggressive. A much better fix would be to + undefine the keys for todoo-mode-map. Thanks to Simon Pepping + (Closes: #414781). + - filladapt.el: Make turn-on-filladapt-mode interactive. + Thanks to Kevin Ryde (Closes: #420845). + + -- Peter S Galbraith Mon, 14 May 2007 19:26:43 -0400 + +emacs-goodies-el (26.10-1) unstable; urgency=low + + [ Junichi Uekawa ] + * dpkg-dev-el: + - debian-changelog-mode.el: support co-maintainers. If previous + maintainer editing the entry is different from the current, an + entry of the form '[ NAME ]' is created. + Thanks to Luca Capello (Closes: #352957). + * debian-el: + - fix debian-bug.el (debian-bug-build-bug-menu) to work with new + BTS output format. + [ Peter S Galbraith ] + * gnus-bonus-el: + - gnus-pers.el: gnus-functionp is absent in Oort Gnus, thanks + to Dmitry Astapov (Closes: #416360). + * emacs-goodies-el: + - emacs-goodies-el.el: xrdb-mode clobbers bindings in emacs-snapshot, + thanks to R.Ramkumar (Closes: #402580). + - emacs-goodies-el.el: Too many files put into cfengine-mode, + thanks to Sven Joachim (Closes: #408285). + - emacs-goodies-el.el: "add apache2.conf to auto-mode-alist", + thanks to Shannon Eric Peevey (Closes: #392719). + * dpkg-dev-el: + - 50dpkg-dev-el.el: "Fixed native package changelog coding system for + emacs 22", thanks to Kevin Ryde (Closes: #416218). + - debian-bts-control.el: typo in debian-bts-control-modes-to-reuse, + thanks to Luca Capello (Closes: #392274). + * debian-el: + - debian-bug.el: Updated list of pseudo packages, + thanks to Sven Joachim (Closes: #417882). + + -- Peter S Galbraith Mon, 14 May 2007 19:24:37 -0400 + +emacs-goodies-el (26.9-1) unstable; urgency=low + + * debian-el: + - debian-bug.el: Added "Owner:" to ITP bugs. Thanks to Romain + Francoise for bringing this to my attention (Closes: #388747). + * dpkg-dev-el: + - debian-bts-control.el: Some tags are missing in the list". I also + updated debian-bug.el. Thanks to Thomas Weber (Closes: #373283). + + -- Peter S Galbraith Fri, 22 Sep 2006 15:29:06 -0400 + +emacs-goodies-el (26.8-1) unstable; urgency=low + + * dpkg-dev-el: + - debian-changelog-mode.el: Allow tilde (~) in version numbers", thanks + to Rafael Laboissiere for the report and to Peter Samuelson for the + patch (Closes: #382514). + * emacs-goodies-el: + - folding.el: Updated to latest CVS version. + + -- Peter S Galbraith Mon, 11 Sep 2006 12:02:32 -0400 + +emacs-goodies-el (26.7-1) unstable; urgency=low + + By Jaakko Kangasharju : + * gnus-bonus-el: + - Verify gnus-newsgroup-name is set before using it (Thanks to Elias + Oltmanns) (Closes: #384402) + By Junichi Uekawa : + * debian-el: + - debian-changelog-mode.el: Does not support bugs with only e-mail + address and no full name. (Closes: #380217). + By Peter S Galbraith : + * debian-el: + - apt-utils.el: New upstream release 2.8.0: + - debian-bug.el: Bug fix: "debian-el: debian-bug-prompt-bug-number + missing word-at-point", thanks to Kevin Ryde (Closes: #384542). + * emacs-goodies-el: + - Bug fix: minor info manual error", thanks to Sebastian Luque + (Closes: #385234). + + -- Peter S Galbraith Tue, 5 Sep 2006 20:53:27 -0400 + +emacs-goodies-el (26.6-1) unstable; urgency=low + + * dpkg-dev-el: + - readme-debian.el: (Changed by Junichi Uekawa ) + set locale to C for obtaining rfc822-style date, follow-up for + fix for 351010. (closes: #364770) + - remove duplicate add-to-list for auto-load-alist. + (Changed by Junichi Uekawa ) + - readme-debian.el: Better regexp to activate on *.Debian$ files". + Thanks to Jari Aalto for the bug and the patch (Closes: #354970). + - "utf-8 for debian/control file", thanks to Kevin Ryde (Closes: #365796). + * emacs-goodies-el: + - Bug fix: "Modify emacs-goodies-el's dependency on bash to allow + bash-static instead", thanks to maru dubshinki (Closes: #364852). + * gnus-bonus-el: + - Bug fix: "not fully installed message in e,acs-snapshot", thanks to + Dan Jacobson (Closes: #369618). + * debian-el: + - debian-bug.el: "Change the face of Tags: for experimental", thanks to + Luca Capello for the bug and patch (Closes: #357265). + + -- Peter S Galbraith Tue, 30 May 2006 19:43:18 -0400 + +emacs-goodies-el (26.5-2) unstable; urgency=low + + * Bug fix: "dpkg-dev-el: Error message during configuration of + emacs-snapshot", thanks to Sven Joachim for reporting this. + It Turns out that the /etc/emacs/site-start.d/ startup files were + trying to load byte-compiled files in + /usr/share/emacsFLAVOR/site-lisp/PACKAGE directories that don't exist + because the package hasn't been fully installed yet. I now check for + this condition. (Closes: #341829). + + -- Peter S Galbraith Tue, 21 Feb 2006 21:24:10 -0500 + +emacs-goodies-el (26.5-1) unstable; urgency=low + + * dpkg-dev-el: + - readme-debian.el: Update date not in RFC822 format. + Thanks to Luca Capello for the bug report and patch (Closes: #351010). + * debian-el: + - deb-view.wl: Bug fix: Fails if coding system utf-8 is preferred. + Thanks to Sven Joachim for the report and the patch (Closes: #344260). + * emacs-goodies-el: + - emacs-goodies-el: Bug fix: home-end-enable defcustom clobbers bindings. + Thanks to Matt Hodges for the bug report (Closes: #340694). + - edit-env.el: Symbol's function definition is void: copy-list. + Thanks to Sven Joachim for the bug report (Closes: #340735). + + -- Peter S Galbraith Thu, 2 Feb 2006 22:13:10 -0500 + +emacs-goodies-el (26.4-1) unstable; urgency=low + + * debian-el: + - debian-bug.el: Swap "^CC:" for X-Debbugs-CC: in mail header. + Thanks to Luca Capello (Really closes: #208570). + * dpkg-dev-el: + - debian-control-mode.el: Make # the comment character. + Thanks to Romain Francoise for the suggestion (Closes: #339868). + + -- Peter S Galbraith Tue, 22 Nov 2005 20:59:11 -0500 + +emacs-goodies-el (26.3-1) unstable; urgency=low + + * emacs-goodies-el: + - Info manual concerning under.el: s/underline-region/underhat-region/ + in info page", thanks to Luca Capello (Closes: #336938). + - Leaves temporary file behind if already configured", thanks to + Romain Francoise for the report and the patch (Closes: #336830). + * debian-el: + - debian-bug.el: Use bug number under point as prompt default whenever + possible. Thanks to Luca Capello (Closes: #337233). + - debian-bug.el: Swap CC: for X-Debbugs-CC: in mail header. + Thanks to Francesco Potorti` (Closes: #208570). + - debian-bug.el: debian-bug-wnpp must skip over mml directives in + new mail drafts. Thanks to Luca Capello for reporting (Closes: #337659) + - gnus-BTS.el: Invalid function macro trying to view an article. I + wasn't skipping byte-compilation for gnus-BTS.el, I was skipping + installation! I added a new method to install yet skip + byte-compilation. Thanks to Luca Capello (Closes: #336935). + - apt-utils.el: New upstream release: + Files in apt-utils-search-file-names are now hyperlinks; + New command, apt-utils-view-version, to report the installed version + of a package. + + -- Peter S Galbraith Sat, 5 Nov 2005 13:12:35 -0500 + +emacs-goodies-el (26.2-1) unstable; urgency=low + + * emacs-goodies-el: + - slang-mode.el: Bad default for slang-default-application. Thanks to + Sven Joachim (Closes: #336352). + - htmlize.el: New upstream version 1.27. + Thanks to Hrvoje Niksic (Closes: #336356). + * debian-el: + - debian-bug.el: debian-bug-package must skip over mml directives in + new mail drafts. Thanks to Luca Capello for reporting (Closes: #336466) + + -- Peter S Galbraith Sun, 30 Oct 2005 20:49:34 -0500 + +emacs-goodies-el (26.1-1) unstable; urgency=low + + * New package vm-bonus-el: Miscellaneous add-ons for VM. + - vm-rfaddons.el: a collections of various useful VM helper functions. + - u-vm-color.el: font-lock support for VM. + Thanks to Patrice Karatchentzeff for the suggestion. (Closes: #244444) + * Removed transitional packages: + emacs-goodies-extra-el, debbugs-el and debview + * debian-el: + - deb-view.el V1.12: Bug fixes suggested by Dan Jacobson. + + Output an error message if the package file is corrupted + (e.g. partial download) (Closes: #235673). + + deb-view-dired-view: Check if file in dired is a .deb before opening + (Closes: #273902). + + deb-view-tar-view: If the file to be opened is from the INFO buffer, + then open in the other (larger) window (Closes: #321869). + New files: + - pressed.el: a major mode for editing debian-installer preseed files. + Thanks to W. Borgert for suggesing and providing it. + (Closes: #279061) + * dpkg-dev-el: + - 50dpkg-dev-el.el: Only apply utf-8 coding-system if it exists. + * emacs-goodies-el: + - matlab.el: New upstream version, updated to 3.0.1 + - boxquote.el: New upstream version, updated to 1.18, + Thanks to Simon Taylor (Closes: #335070). + - bar-cursor.el bug fix: In my previous fix, I forgot to undo skipping + installation for emacs-snapshot (Closes: #331430). + New files: + - maple.el: major mode for editing Maple files. Thanks to Anders + Lennartsson for suggesting it (Closes: #334425). + - color-theme.el: changes the colors used within Emacs (Closes: #144420). + + -- Peter S Galbraith Tue, 25 Oct 2005 22:08:16 -0400 + +emacs-goodies-el (25.1-1) unstable; urgency=low + + * General Bug fix: "compiling *.el files should display errors, not just + log file name", thanks to Jari Aalto (Closes: #309790). I implemented + the suggested grep for byte-compilation warnings and now delete the + temporary log files after their creation ("debian-el: leaves temporary + files in /tmp after installation", thanks to Lars Wirzenius; Closes: + #331114). + * emacs-goodies-el: + - emacs-goodies-el.el: Key binding for wdired didn't get properly + defined in emacs-snapshot, thanks to Sven Joachim for the report and + the patch (Closes: #329883). + - dict.el: `current-word' can return nil", thanks to Jorgen Schaefer + for the report and patch. (Closes: #301293). + - shell-command.el: New upstream version. Also fixed bug "activation + is documented wrongly" from Sven Joachim. The activation has changed + to using the variable `shell-command-completion-mode'. (Closes: #331421) + - bar-cursor.el bug fix: Loading the library changes cursor to hollow + box in emacs-snapshot", Thanks to Sven Joachim for the report and the + patch (Closes: #331430). + New files: + - cfengine.el: major mode for editing cfengine files. + Thanks to Morten Werner Olsen (Closes: #280415). + - csv-mode.el: major mode for editing comma-separated value files + (Closes: #260705) + - cua.el: emulate CUA key bindings (C-z undo, C-x cut, C-c copy, C-v paste) + - cwebm.el: a CWEB/WEB modified mode. + Thanks to Max Vasin (Closes: #326772). + - ido.el: a faster way to switch buffers and get files. + Thanks to Cyril Bouthors (Closes: #293732). + - matlab.el: a major mode for MATLAB dot-m files + tlc.el: a major mode for editing Target Language Compiler scripts + Thanks to Riccardo Vestrini (Closes: #246379). + - minibuf-electric.el: Electric minibuffer behavior from XEmacs. + Thanks to Karl Hegbloom (Closes: #317566). + - slang-mode.el: a major-mode for editing slang scripts. + Thanks to Rafael Laboissiere (Closes: #297828). + - tabbar.el: Display a tab bar in the header line. + Thanks to Josh Triplett for both suggestions and a patch + (Closes: #237341). + * gnus-bonus-el: (Jaakko Kangasharju ) + - gnus-filterhist.el: Move face-changing command inside temporary buffer + manipulation (Closes: #331234) + + -- Peter S Galbraith Sat, 15 Oct 2005 15:31:53 -0400 + +emacs-goodies-el (24.15-2) unstable; urgency=low + + * symlink .el files alongside .elc files such that they are available + for `find-function' et al. (Closes: #329114 again) + + -- Peter S Galbraith Thu, 22 Sep 2005 21:23:58 -0400 + +emacs-goodies-el (24.15-1) unstable; urgency=low + + * gnus-bonus-el: + - no longer add /usr/share/emacs/site-lisp/gnus-bonus-el to load-path + since that shadows emacs-snapshot packages nnnil.el and spam-stat.el + - skip byte-compilation for unsupported emacs20. Thanks to Thomas + Bushnell BSG for reporting it and noticing the Emacs20 involvement. + (Closes: #329430). + * emacs-goodies-el: + - Fix buglet in `wdired-enable' setting. + + -- Peter S Galbraith Wed, 21 Sep 2005 19:32:28 -0400 + +emacs-goodies-el (24.14-1) unstable; urgency=low + + * dpkg-dev-el: + - debian-bts-control.el: Pick bug number at point for debian-bts-control + messages", thanks to Jari Aalto for the idea and patch (Closes: #325095). + * emacs-goodies-el: + - no longer add /usr/share/emacs/site-lisp/emacs-goodies-el to load-path + since that shadows emacs-snapshot packages such as ibuffer and others. + (Closes: #329114) + + -- Peter S Galbraith Tue, 20 Sep 2005 21:44:18 -0400 + +emacs-goodies-el (24.13-1) unstable; urgency=low + + * debian-el: + - debian-bug.el: debian-bug-build-bug-menu was broken from BTS HTML + format changes (Closes: #329034). + - gnus-BTS.el: Minor bug fix preventing byte-compilation on + emacs-snapshot. + * dpkg-dev-el: + - Handle changelog coding system for debian native package, by Kevin + Ryde (Closes: #317597). + - debian-changelog-mode.el: Add outline-regexp and C-cC-n and C-cC-p + movement commands as suggested by Romain Francoise (Closes: #322994) + * emacs-goodies-el: + - tld.el: new upstream version omits FX which does not exist, + thanks to Stephane Bortzmeyer for reporting this (Closes: #273588). + - Skip byte-compilation for wdired.el ibuffer.el table.el newsticker.el + for emacs-snapshot, since it has these files (Same for package + gnus-bonus-el and files nnnil.el and spam-stat.el). Also only define + the "r" key in dired-mode if `emacs-goodies-el-defaults' is set. + (Closes: #329114) + + -- Peter S Galbraith Mon, 19 Sep 2005 19:25:31 -0400 + +emacs-goodies-el (24.12-1) unstable; urgency=low + + * No longer call (setq load-path (substitute "." nil load-path)) in startup + scripts since it's no longer useful and required 'cl to work correctly. + Thanks to Kevin Ryde for finding this and reporting it! (Closes: #328712) + * emacs-goodies-el: + - newsticker.el: new upstream version 1.8 + - ff-paths.el: new upstream version 3.23 + - emacs-goodies-el.el: Double entry in Dired menu on Emacs 22 fixed by + Sven Joachim (Closes: #323754) + - perldoc.el: Apply patch from Kevin Ryde for when perldoc package is + not installed. (Closes: #314869) + * devscripts-el: (Changed by Junichi Uekawa ) + - minor cosmetic fix on output of pbuilder-build command; add a missing + newline + * debian-el: + - gnus-BTS: Emacs namespace is being polluted (incorrect + naming of funcs/vars). Thanks to Jari Aalto for the updated file. + (Closes: #324116) + * gnus-bonus-el: + dependency compatible with emacs-snapshot. + Thanks to Luca Capello. (Closes: #322536) + * dpkg-dev-el: + debian-changelog-mode.el: Apply patch from Rafael Laboissiere adding + debian-changelog-add-version-hook defaulting to + debian-changelog-add-new-upstream-release (Closes: #296725) + + -- Peter S Galbraith Sun, 18 Sep 2005 19:47:11 -0400 + +emacs-goodies-el (24.11-2) unstable; urgency=low + + * emacs-goodies-el: + - perldoc.el: Handle case when perl-doc is not installed", thanks to + Kevin Ryde for the report and a stab at fixing it (Closes: #314869). + + -- Peter S Galbraith Thu, 23 Jun 2005 19:14:00 -0400 + +emacs-goodies-el (24.11-1) unstable; urgency=low + + * debian-el: + - apt-utils.el: "apt-utils-show-package is broken", thanks to Thamer + Mahmoud for reporting it and to Matt Hodges for fixing it in a new + upstream version (Closes: #302888, #312000). + * devscripts-el: (Changed by Junichi Uekawa ) + - autoload 'debi'; fix spelling mistake in pduilder->pbuilder + (closes: #305109) + * dpkg-dev-el: + - debian-changelog-mode.el: "`(fboundp (quote imenu))' called for + effect", thanks to Jari Aalto for the patch (Closes: #309788). + - 50dpkg-dev-el.el: Make debian changelogs default to utf-8, + thanks to Kevin Ryde for the patch (Closes: #315494). + + -- Peter S Galbraith Thu, 23 Jun 2005 13:00:40 -0400 + +emacs-goodies-el (24.10-1) unstable; urgency=low + + * debian-el: + - debian-bug.el: Patch from Kevin Ryde adds gnus + support to debian-bug-get-bug-as-email, bringing the bug + messages up in a gnus group. (Closes: #288469) + * emacs-goodies-el: + - apache-mode.el: Bug fix: "emacs-goodies-el: uncomment-region does + not work with closing tags like ", thanks to Cyril + Bouthors for reporting this (Closes: #283840). The bug is fixed by + switching to a new version now maintained by Karl Chen. + * dpkg-dev-el: + - debian-control-mode.el: Bug fix: "mouse-pasting fails and starts + Mozilla in Debian control mode", thanks to Antti-Juhani Kaijanaho + (Closes: #293629). I changed the binding from mouse-2 to C-mouse-2. + + -- Peter S Galbraith Mon, 7 Feb 2005 21:27:58 -0500 + +emacs-goodies-el (24.9-2) unstable; urgency=low + + * Use debian-emacs-flavor instead of flavor in startup files and replace + occurrences of nil by "." in load-path for the sake of + debian-pkg-add-load-path-item. + + -- Peter S Galbraith Wed, 15 Dec 2004 21:04:21 -0500 + +emacs-goodies-el (24.9-1) unstable; urgency=low + + * emacs-goodies-el: + - todoo.el: outline-regexp improperly made buffer-local, + thanks to Cyril Bouthors for reporting (Closes: #284083). + + -- Peter S Galbraith Fri, 3 Dec 2004 15:30:07 -0500 + +emacs-goodies-el (24.8-1) unstable; urgency=low + + * debian-el: + - apt-utils.el: Updated to latest version from Matt, in which he fixed + dependence on jka-compr (Closes: #278929) and addressed the issue of + memory usage (Closes: #252481). + * emacs-goodies-el: + - todoo.el: changes to outline-regexp should be buffer-local + (Closes: #267637). Thanks to Daniel Skarda <0rfelyus@hobitin.ucw.cz> + for pointing it out. + - folding.el: Updated to latest CVS version to fix bug: "folding.el: + support for BibTeX-mode is b0rken", thanks to Juhapekka Tolvanen + (Closes: #282388). + + -- Peter S Galbraith Thu, 25 Nov 2004 22:06:03 -0500 + +emacs-goodies-el (24.7-1) unstable; urgency=low + + * debian-el: + - apt-utils.el: new upstream version from Matt. + - debian-bug.el: Bug fix: "debbugs-el: M x debian-bug fails due to new + reportbug syntax; Add "--list-cc=none" to call to reportbug". + Thanks to Camm Maguire for the patch (Closes: #280780). + * emacs-goodies-el: + - newsticker.el: New upstream release (1.6). + + -- Peter S Galbraith Fri, 12 Nov 2004 15:41:48 -0500 + +emacs-goodies-el (24.6-2) unstable; urgency=low + + * gnus-bonus-el + - Attempt to fix Bug: "gnus-bonus-el: search-failed "--text follows this + line--". Thanks to Mathieu Roy for reporting, and email back if the + fix doesn't work for you (Closes: #240212). + * Bug fix: "wrong emacsen-install, so logging will fail", + emacsen-install.template used shell-specifix redirection. Thanks to + OHASHI Akira for reporting and providing the fix (Closes: #265478). + + -- Peter S Galbraith Mon, 16 Aug 2004 21:06:11 -0400 + +emacs-goodies-el (24.6-1) unstable; urgency=low + + * gnus-bonus-el + - Bug fix: "Missing file: nnmaildir.el", thanks to Christian Joergensen + for reporting this. The file is actually in the gnus package so I + won't mention it anymore. (Closes: #256260). + * debian-el: + - debian-el.el: Bug fix: "debian-el: Add udeb support to debview", + thanks to Frédéric Botha-my for the suggestion and patch + (Closes: #260273). + - apt-utils.el: new upstream version from Matt, adds "m" key and menu + entry to read man page. Addresses bug report "apt-utils.el: not + friendly" from Dan Jacobson (Closes: #249061). + - debian-bug.el: debian-bug-wnpp now supports RFH tag (Closes: #262985). + * emacs-goodies-el: + - Since todoo.el and ibuffer.el don't work in XEmacs, do autoload + them and document that limitation in the Info docs. Thanks to OHURA + Makoto for reporting (Closes: #244681). + + -- Peter S Galbraith Tue, 3 Aug 2004 20:26:21 -0400 + +emacs-goodies-el (24.5-1) unstable; urgency=low + + * debian/control: Added Jérôme Marant to uploaders. + * debian/changelog: Converted to UTF-8 as per Policy. + * debian/emacsen-install.template: Since dashes are not allowed in + flavour names within shell variables, replace them with underline + characters. (Jérôme Marant). + * dpkg-dev-el: + - debian-changelog-mode.el: "dpkg-dev-el: Warning message for security + uploads should be dismissed". Thanks to Martin Schulze (Closes: #234730) + - debian-changelog-mode.el: "Should mark line beginning with a tab as + invalid". Thanks to Michel Daenzer (Closes: #235310). + + -- Jerome Marant Sun, 16 May 2004 14:00:45 +0200 + +emacs-goodies-el (24.4-1) unstable; urgency=low + + * dpkg-dev-el: + - debian-control-mode.el: Apply patch from Jhair Tocancipa Triana + to fix an after-change-functions race + (Closes: #226770, #236506). + * emacs-goodies-el: + - emacs-goodies-custom.el: Remove duplicate and obsolete entries + for joc-toggle-buffer and joc-toggle-case defcustoms. Thanks to + Kevin Ryde for reporting it (Closes: #234972). + - joc-toggle-buffer.el: Provide joc-toggle-buffer instead of older name + toggle-buffer. Thanks to Kevin Ryde for reporting it (Closes: #234971). + - emacs-goodies-el.texi: Rename node auto-fill-mode-inhibit to + auto-fill-inhibit and pack-window to pack-windows. Thanks to + Kevin Ryde for reporting it (Closes: #234651). + + -- Peter S Galbraith Sat, 27 Mar 2004 19:59:41 -0500 + +emacs-goodies-el (24.3-1) unstable; urgency=low + + * debian-el: + - apt-utils.el: Updated to v1.82 (2004/02/17). Bug fix: "debian-el: + (args-out-of-range 922 922)", thanks to Johannes Rohr for reporting it + (Closes: #232367). Also adds automatic rebuilding of its APT package + list; See `apt-utils-automatic-update'. + * gnus-bonus-el: + - Bug fix: No longer depend on emacs20 since it was removed from + testing, thanks to Martin Michlmayr for reporting it (Closes: #232760). + * dpkg-dev-el: + - debian-changelog-mode.el: Add file NEWS.Debian to auto-mode-alist. + Thanks to Chris Lawrence for suggesting it (Closes: #233310). + + -- Peter S Galbraith Thu, 19 Feb 2004 21:28:32 -0500 + +emacs-goodies-el (24.2-2) unstable; urgency=low + + * gnus-bonus-el: + - gnus-pers.el bug fix: Use functionp instead of relying on + message-functionp being provided by gnus, since recent gnus no longer + has it. Thanks to Brian May for reporting (Closes: #230036). + + -- Peter S Galbraith Wed, 28 Jan 2004 19:53:18 -0500 + +emacs-goodies-el (24.2-1) unstable; urgency=low + + * debian-el: + - apt-utils.el: Updated to v1.78 (2004/01/04). Allow for multiple + buffers in apt-utils-mode that are independent of one another. + Also fix bug: "debian-el: apt-utils-show-package scrolling", thanks to + Kevin Ryde for reporting it (Closes: #225610). + - deb-view.el: Resize top (control) window to fit number of lines since + it doesn't really need to be 1/2 the screen. Thanks to Dan Jacobson + for suggesting this change (Closes: #224950). + * emacs-goodies-el: + - browse-kill-ring.el: cannot setup `*Kill Ring*' buffer with items + propertized read-only", many thanks to INOUE Hiroyuki for reporting it + along with a working fix (Closes: #225082). + - coffee.el: Since `M-x coffee' doesn't work for real, I've removed + its autoload so users can't trip on it accidentally, and I've made it + clear it's a joke package in the Info docs. Thanks to Daniel de + Angelis Cordeiro for reporting (Closes: #225152). + + -- Peter S Galbraith Fri, 16 Jan 2004 15:32:06 -0500 + +emacs-goodies-el (24.1-1) unstable; urgency=low + + * debian-el: + - apt-sources.el: Remove problematic requirement on autoinsert.el + since it's not needed and upstream said he had removed it (but hadn't). + * dpkg-dev-el: + - debian-changelog-mode.el: Bug fix: "error setting distribution + to *-security", thanks to Yann Dirson for reporting (Closes: #224187). + * emacs-goodies-el: + - browse-kill-ring.el bug fix: "can't delete entries with `read-only' + text property (on emacs21.1)", thanks to INOUE Hiroyuki for the report + and the patch (Closes: #224751). + * devscripts-el: (Prepared by Junichi Uekawa) + - debdiff-current: Run debdiff against the previous version found in + the changelog. + * gnus-bonus-el: + - gnus-pers.el bug fix: "Uses message-functionp instead of functionp", + thanks to Brian T. Sniffen (Closes: #223493). + - gnus-pers.el bug fix: "There is no 'replace-in-string' as called by + gnus-pers.el", thanks to Brian T. Sniffen (Closes: #223494). + + -- Peter S Galbraith Mon, 22 Dec 2003 21:00:30 -0500 + +emacs-goodies-el (24.0-1) unstable; urgency=low + + * emacs-goodies-el: + - toggle-buffer.el renamed to joc-toggle-buffer.el + - toggle-case.el renamed to joc-toggle-case.el + New files: + - minibuffer-complete-cycle.el, cycle through possible completions. + Thanks to Hisashi MORITA for suggesting it and to Kevin Rodgers for + accepting my suggestions to the code. Half of #217371. + - lcomp.el, list-completion hacks. Thanks to Hisashi MORITA for + suggesting it (Closes: #217371). + - folding.el, a folding-editor-like minor mode. Thanks to Michael Vogt + (Closes: #161404) and to Jérôme Marant (Closes: #170587) for the + suggestion. + - apache-mode.el, major mode for editing Apache configuration files + Thanks to Jérôme Marant for suggesting it (Closes: #165316). + - ctypes.el, Enhanced Font lock support for custom defined types. + Thanks to Toby Speight (for suggesting it Closes: #212884). + - shell-command.el, enables tab-completion for shell-command. + Thanks to Ole Laursen for suggesting it abd to its author TSUCHIYA + Masatoshi for accepting suggestions for changes (Closes: #219766). + - browse-huge-tar.el, browse tar files without reading them memory. + Thanks to Marcus Crafter for suggesting it (Closes: #161159): + Thanks to John Wiegley for suggesting files below (Closes: #137910): + - edit-env.el, view and edit environment variables. + - dedicated.el, dedicate a window to a single buffer. + - rfcview.el, view IETF RFCs with readability-improved formatting. + (Also thanks to Kevin Ryde for this suggestion; Closes: #222186) + - marker-visit.el, navigate through a buffer's marks in order. + - pack-windows.el, resize all windows to display as much info as possible. + - ascii.el, ASCII code display for character under point. + New upstream versions: + - ff-paths.el: New variables to skip running locate for find very + common file names. Thanks to Stephen Eglen for suggesting it. + (Closes: #220507) + Patches: + - 50_todoo_bug220718: Fix XEmacs keybindings for XEmacs. + Thanks to Gianluca Della Vedova (Closes: #220718). + - 50_joc-toggle-buffer: Add prefix joc- where missing; Fix startup bug. + - 50_joc-toggle-case: Add prefix joc- where missing. + - 50_silly-mail: Add custom support. + Info manual: + - filladapt.el: Document how to use with C, thanks to Kevin Ryde for the + patch (Closes: #221942). + - Document joc-toggle-buffer, joc-toggle-case, silly-mail. + * dpkg-dev-el: + - debian-changelog-mode.el: Make `debian-changelog-add-entry' works + from files in unpacked sources. Thanks to Junichi Uekawa for + suggesting it (Closes: #220641). + Add menu entry for "Archived Bugs for This Package", for + "Developer Page for This Package", "Developer Page for This Maintainer". + - debian-control-mode.el: highlight only known fields (Closes: #213779). + - debian/control: dpkg-dev-el depends on debian-el (>= 24.0-1) for + debian-changelog-mode using debian-bug-web-developer-page. + * debian-el + - apt-utils.el: Updated to v1.72 (2003/11/25). More robust finding of + ChangeLog and README files, and new commands to find NEWS and + copyright files. + - debian-bug: Thanks to Kalle Olavi Niemitalo for both these bug + reports with working patches. :-) + - Contain debian-bug's cursor-in-echo-area to when it's needed so the + list of pseudo-packages can be scrolled. (Closes: #222332) + - debian-bug-package: Let M- and M- scroll the pseudo-package + list window by making _it_ the other window. (Closes: #222333) + - debian-bug.el: Add menu entry for "Archived Bugs for This Package", for + "Developer Page for This Package", "Developer Page for This Maintainer" + (Closes: #222391). + * make-orig.sh bug fix: "cvs .# files in source package", thanks to + Kevin Ryde for reporting it (Closes: #221940). + + -- Peter S Galbraith Sun, 7 Dec 2003 14:38:09 -0500 + +emacs-goodies-el (23.1-1) unstable; urgency=low + + * debian-el: + - deb-view.el: I'm now maintaining this file. New version supports + customization. + - debian-bug.el bug fix: "Should send minor severty bugs to maintonly, + not submit", thanks to Tollef Fog Heen (Closes: #214242). + - debian-bug.el bug fix: "M-x debian-bug prompt doesn't work correctly + in XEmacs21", thanks to Kenshi Muto for reporting (Closes: #219811). + * emacs-goodies-extra-el: + - Re-introduce a harmless 50emacs-goodies-extra-el.el file since old one + not removed in dist-upgrade. + * emacs-goodies-el: + - tc.el: upstream-approved edits. Includes new cite attribution string. + * dpkg-dev-el: + - Edits *all* elisp files in package to add autoload tags. + - Create `dpkg-dev-el.el' and `dpkg-dev-el-loaddefs.el' startup files + and use them in Emacs startup. + + -- Peter S Galbraith Tue, 11 Nov 2003 19:08:37 -0500 + +emacs-goodies-el (23.0-1) unstable; urgency=low + + * gnus-bonus-el: (Prepared by Jérôme Marant) + New files: + - gnus-pers.el, an alternative to gnus-posting-styles. (Closes: #166459) + - gnus-eyecandy.el, enhance the group buffer by adding icons. + - gnus-filterhist.el, add a buffer which display the message filtering + history. + Debian setup: + - Add autoloads for gnus-pers.el, gnus-eyecandy.el and gnus-filterhist.el. + * emacs-goodies-el: + - htmlize.el: new upstream version 1.16 with many enhancements. + Patches: + - 50_newsticker_non-fatal_xml: Don't bail out requiring xml which doesn't + exists on woody XEmacs. Fixes Bug "M-x newsticker-start crashes", + reported by Volker Linke and fixed thanks to advice from Matt Hodges + (Closes: #216233). + - 50_projects: Make projects.el less intrusive by default. Rename + commands to have `project-' prefix. + Info manual: + - documented projects.el and tc.el. + * devscripts-el: (Prepared by Junichi Uekawa) + - implement 'debdiff' + - devscripts-el.README.Debian: update to reflect latest changes. + * debian-el: + - apt-sources.el: new upstream version 0.9.8. + - 50debian-el.el renamed to 51debian-el.el to make sure it runs + _after_ old version of 50debview.el. + - Bug fix: "debbugs-el: gnus-BTS.el causes error on opening article", + thanks to Johannes Rohr for reporting this (Closes: #218227). We no + longer byte-compile gnus-BTS.el since it uses gnus macros and this + breaks if byte-compiled with one version of gnus and used with + another. + * debview: + - Bug fix: Re-introduce an harmless 50debview.el file since old one + not removed in dist-upgrade and autoloaded debview from wrong place. + Thanks to Neil Roeth (Closes: #218094). + + -- Peter S Galbraith Thu, 30 Oct 2003 19:58:16 -0500 + +emacs-goodies-el (22.2-1) unstable; urgency=low + + * devscripts-el: + - Bug fix in packaging: "byte-compilation failures (e20 at least)", + thanks to Aaron M. Ucko for reporting. We'll use full Debian setup of + Emacs packages to byte-compile devscripts-el (Closes: #216037). + * dpkg-dev-el: + - Bug fix: "View upgrading-checklist: fails to decompress", thanks to + Neil Roeth for the thorough report. Fixed by forcing + auto-compression-mode on all flavours of Emacs (Closes: #216040). + * debian/control bug fix: Package descriptions pointed to README.Debian.gz + but the files were not compressed, thanks to Jaume (Closes: #216055). + * debian/*emacsen-install*: Add STAMPFILE and don't byte-compile files + if already done. + + -- Peter S Galbraith Thu, 16 Oct 2003 13:17:13 -0400 + +emacs-goodies-el (22.1-1) unstable; urgency=low + + * emacs-goodies-el: + New upstream versions: + - tc.el: Version 0.13.3. + - table.el: Version 1.5.54. Wow! This is a very cool package! + - tail.el: Benjamin Drieu gave me carte blanche to hack on it, so I + fixed a few bugs, including making it under XEmacs. Thanks to Adam + Sjögren for reporting this bug (Closes: #164372). + - under.el: checkdoc clean; add autoload tag; don't make global + variables; rename underline-region to underhat-region since it + overloaded an existing Emacs21 command. + - htmlize.el: Bug fix "emacs-goodies-el: htmlize-* doesn't appear to + work in TTY", thanks to Gergely Nagy for reporting it (Closes: #127943). + - framepop.el: Don't enable it on non-window Emacs. + Patches: + - nuke-trailing-whitespace.el: Add custom interface support with ability + to install into write-file-hooks. + - protbuf.el: Add custom interface support and make interactive + commands true toggles. + - table.el: Add table-add-to-text-mode-hook defcustom. + - session.el: Remove autoload tag for a defmacro. + - setnu.el: add defface and checkdoc edits. + Info manual: + - documented nuke-trailing-whitespace, protbuf, protocols, services, + setnu, sys-apropos, table, tail, thinks, tld, todoo, toggle-option, + twiddle, under, wdired, xrdb-mode. + * debian-el: + New upstream versions: + - debian-bug.el: decode ISO strings in Debian BTS for properly + formatted Thanks in debian-changelog-mode.el. + + -- Peter S Galbraith Wed, 15 Oct 2003 21:55:34 -0400 + +emacs-goodies-el (22.0-1) unstable; urgency=low + + * Package `emacs-goodies-extra-el' now a transitional package. Its + contents are merged into `emacs-goodies-el'. + * New binary package `debian-el' holds contents of old `debbugs-el' (now + a transitional package) along with apt-sources.el and apt-utils.el + formely from `emacs-goodies-el'. + * New transitional package `debview' to replace old `debview' source + package since package debian-el now holds deb-view.el. ftp-masters, + please see bug #214311. + * New file in emacs-goodies-el: newsticker.el, a news ticker for Emacs. + * New file in emacs-goodies-el: framepop.el, display temporary buffers + in a dedicated frame. + * New file in emacs-goodies-el: session.el, a menu to restore files + visited in previous editing session. Thanks to Lennart Poettering for + suggesting it (Closes: #186639). + * Bug fix: "debian-el: debian-bug-search-file: should use dlocate when + available", thanks to Jeff Sheinberg (Closes: #211598). Added dlocate + to package Recommends. + * emacs-goodies-el: Since XEmacs has it's own version of ibuffer, make + sure we don't shadow it. Added its directory to load-path in + 50emacs-goodies-el.el. Also for ibuffer: a customization variable + (ibuffer-enable) was created to bind it to \C-x\C-b, and its + documentation was added to the emacs-goodies-el Info. + * emacs-goodies-el: dict.el new upstream version, merges in Debian patch. + * emacs-goodies-el: keywiz.el new upstream version 1.4. + * emacs-goodies-el: mutt-alis.el new upstream version 1.4. Almost + checkdoc clean. + * Bug fix: "emacs-goodies-el: perldoc does not work - terminal is not + fully functional due to perldoc setting a pager", thanks to Sebastian + Schütte for reporting and to Alan Shutko for + contributing the fix (Closes: #144963). + * emacs-goodies-el: perldoc.el rewrite to get Perl function name on the + fly from the perlfunc.pod file. + * debian-bug.el and debian-bts-control.el: Add `sarge-ignore' and + `fixed-upstream' tags. + * Junichi Uekawa + - devscripts-el: integrate upstream release (Closes: #208974). + pbuilder-log-view.el + pbuilder-mode.el + devscripts.el + - 7_devscripts-debuild-uc-us.dpatch devscripts incorporated upstream. + - 9_missing_provide.dpatch remove part about devscripts. + - devscripts-el: Depend on elserv. + + -- Peter S Galbraith Mon, 6 Oct 2003 20:16:42 -0400 + +emacs-goodies-el (21.12-1) unstable; urgency=low + + * emacs-goodies-el's highligh-current-line.el is now a minor-mode, + enhanced by yours truly. Add highlight-current-line to Info docs. + * emacs-goodies-el's highligh-beyond-fill-column.el: upstream approved + code cleanup. Created `highligh-beyond-fill-column' to activate it. + Added to Info docs. + * emacs-goodies-el's home-end.el: Bug fix: "home-end-enable shouldn't + unset end and home!", thanks to Jorgen Schäfer + (Closes: #211859). Add to Info docs. + * dpkg-dev-el: setup auto-mode-alist better for README.Debian and + copyright files. + + -- Peter S Galbraith Sat, 20 Sep 2003 19:49:55 -0400 + +emacs-goodies-el (21.11-1) unstable; urgency=low + + * dpkg-dev-el's debian-bts-control.el adds package', 'owner' and + 'noowner' commands. + + -- Peter S Galbraith Thu, 18 Sep 2003 22:40:53 -0400 + +emacs-goodies-el (21.10-1) unstable; urgency=low + + * debbugs-el's debian-bug.el: http://bugs.debian.org HTML code changed a + bit and broke my parser. Fixed. + + -- Peter S Galbraith Wed, 17 Sep 2003 20:41:19 -0400 + +emacs-goodies-el (21.9-1) unstable; urgency=low + + * debbugs: debian-bug-filename adds File: info to informational block in + draft bug report. + * debbugs, debbugs-el.emacsen-startup: Add autoload for useful + debian-bug-get-bug-as-email. + * dpkg-dev-el, debian-bts-control.el: debian-bts-help-control was missing! + * Bug fix: "Merge debian-bug-filename into debian-bug command proper", + thanks to Francesco Potorti` (Closes: #167214). (I'll do the + `commands' from the PATH later.) + * highlight-current-line.el: Updated to version V0.56 + * Update coffee.el to V0.3. + * dpkg-dev-el, debian-changelog-mode.el: Added browse-url link to `Best + Practices for debian/changelog' in menu. + * dpkg-dev-el, readme-debian.el bug fix: write-contents-hooks needed to + be made buffer-local explicitely in XEmacs ("Writes incorrect dates in + changelog", thanks to Ross Burton. Closes: #211382). + * patches/5_highlight-beyond-fill-column.dpatch: New patch to fix + indentation and remove extra fontified space. + + -- Peter S Galbraith Wed, 17 Sep 2003 15:30:25 -0400 + +emacs-goodies-el (21.8-1) unstable; urgency=low + + * Bug fix: "debian-bug should provide help when prompting for package + name and severity", thanks to Mathieu Roy (Closes: #200058). + * Bug fix: "dpkg-dev-el: debian-bts-control doesn't work on emacs20", + Don't set `debian-bts-control-verbose-prompts-flag' to t for Emacs20 + since it can't display multi-line prompts. (Closes: #208553). + * debbugs-el: Remove dependence on package `bug' since it no longer exists. + + -- Peter S Galbraith Wed, 3 Sep 2003 21:19:44 -0400 + +emacs-goodies-el (21.7-1) unstable; urgency=low + + * Standards-Version: 3.6.1 without changes. + * Bug fix: "dpkg-dev-el: readme-debian.el uses make-local-variable on a + hook", thanks to Kalle Olavi Niemitalo. Fixed upstream in + devscripts-el-0.0.20030825 (Closes: #206993). + * Bug fix: debian-changelog mode to support inserting bug title in + changlog entry, such as this entry right here. Thanks to Junichi + Uekawa (Closes: #207852). Updated dpkg-dev-el's + debian-changelog-mode.el and debbugs-el's debian-bug.el. + + -- Peter S Galbraith Tue, 2 Sep 2003 22:29:29 -0400 + +emacs-goodies-el (21.6-1) unstable; urgency=low + + * apt-utils.el: Updated to v1.54 (2003/06/24) + * debian-bts-control.el: add `debian-bts-control-prompt' to Prompt for + bug number using sensible default if found (closes: #193326). + * Add filladapt-turn-on-mode-hooks customization. + * ff-paths.el: Update to V3.21 + * *.emacsen-startup: Make sure that the uncompiled files are also in the + load-path, near the end. This is for moving point to the code when + view help. (closes: #189754) + + -- Peter S Galbraith Thu, 14 Aug 2003 22:45:06 -0400 + +emacs-goodies-el (21.5-1) unstable; urgency=low + + * patches/6_diminish-defcustom.dpatch: new defcustom tweaks sent + upstream. + * bar-cursor.el: A few tweaks also submitted upstream. + * dirvars.el: Update to v1.2. Add Info entry for it. + * ff-paths.el: Fix setup defcustoms. + * apt-utils.el: Updated to v1.54 (2003/06/22) + * debian-copyright.el: Handle font-lock-defaults such that XEmacs + doesn't fail on it (closes: #198601). + + -- Peter S Galbraith Tue, 24 Jun 2003 15:24:34 -0400 + +emacs-goodies-el (21.4-1) unstable; urgency=low + + * New maintainer. Thanks for all the work getting it this far Roland! + * dict.el: Updated to V1.27 + * Split elisp/ directory into subdirs for each binary package. + * emacs-goodies-loaddefs.el: Generate autoloads automatically from tags. + * Patch some upstream files to provide themseleves (closes: #197470) + * Add customize support to df.el and document in Info. + * ff-paths.el: don't install itself on load. Add a defcustom for that. + * Add many customize groups to `emacs-goodies-el' group. + + -- Peter S Galbraith Tue, 17 Jun 2003 21:56:11 -0400 + +emacs-goodies-el (21.3-1) unstable; urgency=low + + * apt-utils.el: Updated to v1.45 + * debian-bug.el: Add `d-i', `ipv6' and `lfs' tags. + * gnus-bonus-el.emacsen-install.in: Add directory of gnus elisp files to + load-path during byte-compilation (closes: #196816) + * dpkg-dev-el.emacsen-startup: Make file named changelog.dch load + debian-changelog-mode (closes: #196828) + * Moved readme-debian.el from package `devscripts-el' to `dpkg-dev-el' + such that all major modes for debian directory files are together. + * bar-cursor.el: Edited patch sent upstream to conform the Coding + Convention (don't enable simply by loading). + * Added 6_diminish-defcustom.dpatch, making diminish.el configurable + using the customize interface. Patch sent upstream. Also documented + file in Info. + + -- Peter S Galbraith Thu, 12 Jun 2003 22:02:55 -0400 + +emacs-goodies-el (21.2-1) unstable; urgency=low + + * Standards-Version: 3.5.10 + * debian-bts-control.el: Add `debian-bts-control-modes-to-reuse'. + * debian-bug.el: update to V1.42 + * Added 3_bar-cursor-customize.dpatch, making bar-cursor.el enables via + the customize interface. Patch submitted upstream. + * Added 5_bar-cursor-move-defcustom.dpatch, commented out the defcustom + which I have moved and edited into emacs-goodies-el.el. Documented in + Info. + * Update clipper.el to V1.1.1. + * Update browse-kill-ring.el to 1.2 (CVS). + * debian-control-mode.el: Add 'checklist to debian-control-visit-policy. + * debian-changelog-mode.el: Define (really) match-string-no-properties + for XEmacs (closes: #195181). + + -- Peter S Galbraith Thu, 29 May 2003 13:40:27 -0400 + +emacs-goodies-el (21.1-1) unstable; urgency=low + + * 50emacs-goodies-el.el: Add :link to Info manual in + `emacs-goodies-el-defaults' defcustom. + * debian-bug.el: Add `confirmed' tag (for debian-bts-control.el). + * debian/control: Added texinfo to Build-Depends-Indep for makeinfo + (closes: #193272) + * Updated debian-copyright.el from devscripts-el-0.0.20030521.tar.gz + * Updated readme-debian.el from devscripts-el-0.0.20030521.tar.gz, + patched it for font-lock on unstable's xemacs21, and to avoid the + error on the case of no timestamp. Also try to get newlines + surrounding the timestamp correctly. Sent the file upstream to become + the new upstream version. + * devscripts-el.emacsen-install.in: Use APPEND_LOAD_PATH to load + debian-changelog-mode.el during byte-compilation of readme-debian.el + * Deleted 3_readme-debian-automode.dpatch and 6_readme-debian.dpatch + * Updated services.el to upstream version CVS 1.4 + * Updated protocols.el to upstream version CVS 1.5 + * debian/control: Rephrase debian-bug.el description (closes: #193322) + * Move most of 50emacs-goodies-el.el into a required emacs-goodies-el.el + file, and wrap 50emacs-goodies-el.el around code testing if the + package is really installed or possibly removed (and not purged). + Same done for all other binary packages. + (closes: #193367) + + -- Peter S Galbraith Thu, 22 May 2003 21:41:51 -0400 + +emacs-goodies-el (21.0-1) unstable; urgency=low + + * Rename whitespace to nuke-trailing-whitespace.el (closes: #191527) + * Added file debian-bts-control.el to dpkg-dev-el. + * Add `add-hook' expression to 50emacs-goodies-el.el to setup wdired to + "r" key in dired-mode, since it can't really hurt anyway. + (closes: #156830) + * Update apt-sources.el to V0.9.7. + * Updated all.el to 5.2 (1997/03/04) from + ftp://ftp.dina.kvl.dk:/pub/Staff/Per.Abrahamsen/auctex/all.el + * Updated auto-fill-inhibit.el to latest upstream version (defcustom + patch that I submitted). + * Updated htmlize.el to V0.68. Remove 5_htmlize-noninteractive.dpatch + since it was integrated upstream. + * Added elisp/emacs-goodies-el.texi and install it in rules file. + (closes: #192303) + * 50emacs-goodies-el.el: Introduce defcustom group emacs-goodies-el to + allow full installation of packages that alter Emacs defaults. + (closes: #190177) + * Added debian-copyright.el CVS 1.6 from devscripts-el-0.0.20030512.tar.gz + to dpkg-dev-el. + * debian-changelog-mode: check if `debian-changelog-mode' is available + as a feature, and not simply the if the autoloaded are fboundp (which + is always true) (closes: #193085). + + -- Peter S Galbraith Mon, 12 May 2003 20:33:15 -0400 + +emacs-goodies-el (20.0-1) unstable; urgency=low + + * Make sure I include patches in debian diff. The last upload was built + without applying them! (closes: #191763) + * Added apt-utils.el to emacs-goodies-el package (closes: #169726) + + -- Peter S Galbraith Mon, 5 May 2003 20:59:17 -0400 + +emacs-goodies-el (19.5-1) unstable; urgency=low + + * debian-changelog-mode.el: defcustom added for debian-changelog-mode-hook + (closes: #190853). + * debian-bug.el: new upstream version. + * debian-changelog-mode.el: debian-changelog-add-version creates new + version in empty file (closes: #191285). + * xrdb-mode.el: New upstream version added font-lock-defaults for Emacs + (closes: #166874) + * No longer depend on emacsen-common, which forced it's very verbose + byte-compilation. Also output byte-compilation verbiage to a tempfile. + (closes: #185703) + + -- Peter S Galbraith Wed, 30 Apr 2003 22:40:40 -0400 + +emacs-goodies-el (19.4-1) unstable; urgency=low + + * debian-bug.el: Revert `send bug report to maintonly if priority wishlist or + minor change'. + * debian-bug.el: New buffer-local variable `debian-bug-open-alist' for + open bugs. New actions in Bugs list menu: can now read bug reports + as Email! + * debian-changelog-mode.el: Use `debian-bug-open-alist'. + * debian/control: dpkg-dev-el depends on debbugs-el (>= 19.4-1) for + `debian-bug-open-alist' and Email reading. + * debian-bug.el: Use executable-find. Patch contributed by Romain FRANCOISE + (closes: #189605). + * debian-bug.el (debian-bug): always build package list (closes: #186338) + * ff-paths.el: updated to V3.19 + * debian/emacsen-install.template: Use --no-site-file during + installation byte-compilation. + + -- Peter S Galbraith Tue, 22 Apr 2003 12:53:01 -0400 + +emacs-goodies-el (19.3-1) unstable; urgency=low + + * New upstream release for ff-paths.el (V3.18). + * Add Uploaders field for Peter Galbraith. + * debian-bug.el: send bug report to maintonly if priority wishlist or + minor (closes: #176429) + + -- Peter S Galbraith Fri, 11 Apr 2003 21:05:43 -0400 + +emacs-goodies-el (19.2-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.35) (closes: #173040, + #184954). + + -- Roland Mas Fri, 28 Mar 2003 13:19:47 +0100 + +emacs-goodies-el (19.1-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.35). + + -- Roland Mas Wed, 19 Mar 2003 22:33:55 +0100 + +emacs-goodies-el (19-3) unstable; urgency=low + + * Patch #7_devscripts-debuild-uc-us: the arguments to debuild need to be + in separate strings (closes: #185154) (yes, again). + + -- Roland Mas Wed, 19 Mar 2003 22:05:10 +0100 + +emacs-goodies-el (19-2) unstable; urgency=low + + * Patch #5_htmlize-noninteractive: fix htmlize.el in non-interactive + mode thanks to Junichi Uekawa's patch (closes: #166587). + * Patch #6_readme-debian: fix readme-debian.el failing to load some + README.Debian files thanks to James LewisMoss's patch (closes: + #167575). + * Favor reportbug over bug (closes: #184020). + * Patch #4_dict-pager: invoke with appropriate pager options (closes: + #174661). + * Patch #7_devscripts-debuild-uc-us: invoke debuild with "-uc -us" + parameters, so as not to ask for a passphrase (closes: #185154). + + -- Roland Mas Wed, 19 Mar 2003 15:28:25 +0100 + +emacs-goodies-el (19-1) unstable; urgency=low + + * Now using dpatch to apply patches at build time. Much better than the + previous hand-made system. + * Patch #4_dict-pager: dict.el patched to invoke dict with --pager + (closes: #174661). + * Removed nnmaildir.el, now included in Gnus (closes: #154396). + + -- Roland Mas Wed, 19 Feb 2003 13:46:08 +0100 + +emacs-goodies-el (18.2-1) unstable; urgency=low + + * Fix autoload for dict.el (closes: #173143). + * Made README.Debian more explicit: it documents all files, not just the + ones in emacs-goodies-el (closes: #172335). + * New upstream release for debian-bug.el (1.34) (closes: #168811). + * Bumped Standards-Version to 3.5.8. + + -- Roland Mas Tue, 17 Dec 2002 19:30:10 +0100 + +emacs-goodies-el (18.1-2) unstable; urgency=low + + * Changing sections to resolve override disparity. + * Explicitly use the Bash shebang, since the installation scripts use + bashisms (closes: #166310). + * Fix load-path for dpkg-dev-el (closes: #166586). + + -- Roland Mas Tue, 12 Nov 2002 20:05:48 +0100 + +emacs-goodies-el (18.1-1) unstable; urgency=low + + * New upstream release for thinks.el (1.8). + * New upstream release for debian-changelog-mode.el (1.66) adds new + distribution (closes: #166163). + + -- Roland Mas Thu, 24 Oct 2002 18:34:22 +0200 + +emacs-goodies-el (18-1) unstable; urgency=low + + * New binary package: devscripts-el. It currently includes + devscripts.el and readme-debian.el, both at version 0.0.20021016. + * Also changed the build process a bit: *.emacsen-install and + *.emacsen-remove files are now built from *.in files. Since most of + the files are identical save for the package name and a few other + variables at the beginning, let's put that shared code into a separate + unique file. + * Added sys-apropos.el (no version, taken at 2002-10-17). + * New packages merged in: debbugs-el and dpkg-dev-el. That should be + all for now. The previous changelogs are included at the bottom of + this file. Search for "8-merged-debbugs-el" or "3-merged-dpkg-dev-el" + to get to their beginnings. + + -- Roland Mas Sun, 20 Oct 2002 15:12:37 +0200 + +emacs-goodies-el (17-1) unstable; urgency=low + + * Merged the emacs-goodies-el and gnus-bonus-el source packages into one + (named emacs-goodies-el). + * The changelog of what happened to the gnus-goodies-el package before + this merger happened is kept for reference at the bottom of this + changelog file. Search for the "4-merged-gnus-bonus-el" string to get + to its beginning. + * While I was at it, I created a new package, emacs-goodies-extra-el, so + that interesting files with extra dependencies can still be included. + Beware, this package is likely to have a growing list of dependencies. + But that also means that I'm going to start accepting files with + external dependencies into this source package (under the condition + that they be available as Debian packages in the "main" section). + * emacs-goodies-extra-el: added dict.el (1.25). + + -- Roland Mas Mon, 14 Oct 2002 21:17:10 +0200 + +emacs-goodies-el (16.1-1) unstable; urgency=low + + * New upstream release for boxquote.el (1.16) (closes: #163834). + * New upstream release for wdired.el (1.9.2pre2) (closes: #161157). + * Fixed the auto-mode for xrdb-mode.el (closes: #161563). + + -- Roland Mas Wed, 9 Oct 2002 13:55:22 +0200 + +emacs-goodies-el (16-1) unstable; urgency=low + + * Added home-end.el (2002-07-12) (closes: #152725), with proposed + patch. + * Added xrdb-mode.el (2.28) (closes: #154039). + * Added map-lines.el (0.1). + * Also cleaned up the patching system a bit. + + -- Roland Mas Fri, 13 Sep 2002 17:05:51 +0200 + +emacs-goodies-el (15.1-1) unstable; urgency=low + + * Bumped Standards-Version to 3.5.7. + * Sorted the list of files in the package description (closes: #160017). + * New upstream release for muttrc-mode.el (2.5). + * Started using a (very) light patching system. First patch is + 500muttrc-manual, so that the file that muttrc-mode.el opens actually + exists (closes: #158571). + * Also cleaned debian/rules a bit. + + -- Roland Mas Mon, 9 Sep 2002 19:40:19 +0200 + +emacs-goodies-el (15-1) unstable; urgency=low + + * Added muttrc-mode.el (2.4) (closes: #146780). + * Added ibuffer.el (2.6) (closes: #134086). + * Fixed emacsen-install script again (closes: #158480). + + -- Roland Mas Tue, 27 Aug 2002 20:19:24 +0200 + +emacs-goodies-el (14-2) unstable; urgency=low + + * Depend on a recent bash, since we use features not available in old + ones. + * Also fixed the emacs-goodies-el.emacsen-install script so that it + won't forget files that are excluded in other flavours than the + current one (closes: #149921). + + -- Roland Mas Mon, 26 Aug 2002 13:46:01 +0200 + +emacs-goodies-el (14-1) unstable; urgency=low + + * The "Elmo owes me one" release. + * Added apt-sources.el (0.9.5). + + -- Roland Mas Wed, 21 Aug 2002 13:37:56 +0200 + +emacs-goodies-el (13-1) unstable; urgency=low + + * Added tc.el (0.12.3) (closes: #122243). + * New upstream release for keywiz.el (1.2). + * New upstream release for browse-kill-ring.el (1.0). + * New upstream release for boxquote.el (1.8). + + -- Roland Mas Thu, 2 May 2002 14:01:00 +0200 + +emacs-goodies-el (12.1-1) unstable; urgency=low + + * New upstream release for boxquote.el (1.7). + + -- Roland Mas Fri, 19 Apr 2002 19:07:15 +0200 + +emacs-goodies-el (12-1) unstable; urgency=low + + * Added keywiz.el (1.1) (closes: #143072). + * Added table.el (1.5.48) (closes: #124119). + + -- Roland Mas Fri, 19 Apr 2002 18:53:54 +0200 + +emacs-goodies-el (11-2) unstable; urgency=low + + * Excluded todoo.el from Xemacs 21. + + -- Roland Mas Wed, 17 Apr 2002 14:00:29 +0200 + +emacs-goodies-el (11-1) unstable; urgency=low + + * Added all.el (0.0), toggle-option.el (1.0), todoo.el (1.2), + cyclebuffer.el (1.2). + + -- Roland Mas Tue, 16 Apr 2002 19:33:07 +0200 + +emacs-goodies-el (10-3) unstable; urgency=low + + * Fixed emacsen-install script (closes: #134778). It's a bashism, but + I'm too lazy to POSIXise it (I'm not even sure it can be POSIXised), + so I just change the shebang. + + -- Roland Mas Thu, 21 Feb 2002 18:47:25 +0100 + +emacs-goodies-el (10-2) unstable; urgency=low + + * Fixed README.Debian to mention the problem with Emacs 21 and + whitespace.el. + + -- Roland Mas Mon, 18 Feb 2002 13:12:38 +0100 + +emacs-goodies-el (10-1) unstable; urgency=low + + * Added ff-paths.el (3.17), dirvars.el (1.0), perldoc.el (1.1). + * Patched emacsen-install to support flavor-dependent lists of files to + include/exclude. + * Use debian-pkg-add-load-path-item if available. + * Renamed (with wdired and rect ;-) the debian/emacsen-* files into + debian/emacs-goodies-el.emacsen-*. Because I can, and also because of + a Secret Plan I have. + * Disabled whitespace.el for Emacs 21 (closes: #133014). I'd like to + find a better solution fot this, but I haven't thought of it yet. + + -- Roland Mas Mon, 18 Feb 2002 12:55:51 +0100 + +emacs-goodies-el (9-1) unstable; urgency=low + + * Added highlight-current-line.el (0.5), align-string.el (0.1) (closes: + #113283), diminish.el (0.44), htmlize.el (0.62) and keydef.el (1.16). + + -- Roland Mas Fri, 4 Jan 2002 21:10:06 +0100 + +emacs-goodies-el (8-2) unstable; urgency=low + + * Fixed speling error in Description: field (closes: #124598). + + -- Roland Mas Tue, 18 Dec 2001 10:11:42 +0100 + +emacs-goodies-el (8-1) unstable; urgency=low + + * Added under.el (1.2). + + -- Roland Mas Fri, 7 Dec 2001 22:50:20 +0100 + +emacs-goodies-el (7.1-1) unstable; urgency=low + + * New upstream release for egocentric.el (1.1). + * New upstream release for df.el (1.8) (closes: #122805). + + -- Roland Mas Fri, 7 Dec 2001 21:48:22 +0100 + +emacs-goodies-el (7-1) unstable; urgency=low + + * Added toggle-case.el (1.4), tail.el (1.1), df.el (1.7), egocentric.el + (not versioned, taken on 2001-12-04) and initsplit.el (1.6). + + -- Roland Mas Wed, 5 Dec 2001 22:44:17 +0100 + +emacs-goodies-el (6-2) unstable; urgency=low + + * Fixed README.Debian to document the recent apparition of + highlight-beyond-fill-column.el. + + -- Roland Mas Thu, 29 Nov 2001 21:54:30 +0100 + +emacs-goodies-el (6-1) unstable; urgency=low + + * Added highlight-beyond-fill-column.el (1.1). + + -- Roland Mas Wed, 21 Nov 2001 22:55:35 +0100 + +emacs-goodies-el (5.1-1) unstable; urgency=low + + * New upstream release for wdired.el (1.91). + + -- Roland Mas Mon, 19 Nov 2001 14:44:35 +0100 + +emacs-goodies-el (5-1) unstable; urgency=low + + * Added wdired.el (1.9), floatbg.el (0.5), clipper.el (1.1.0), + projects.el, auto-fill-inhibit.el (20011114). + + -- Roland Mas Sat, 17 Nov 2001 17:33:49 +0100 + +emacs-goodies-el (4-3) unstable; urgency=low + + * debian/emacsen-startup: fix typo (closes: #116855). + + -- Roland Mas Wed, 24 Oct 2001 09:19:17 +0200 + +emacs-goodies-el (4-2) unstable; urgency=low + + * debian/control: changed Description: field to reflect the recent + additions. + + -- Roland Mas Mon, 22 Oct 2001 11:33:32 +0200 + +emacs-goodies-el (4-1) unstable; urgency=low + + * Added filladapt.el (2.12) (closes: #111383), setnu.el (1.06). + * debian/control: changed Build-Depends: to Build-Depends-Indep:. + + -- Roland Mas Sun, 21 Oct 2001 16:15:15 +0200 + +emacs-goodies-el (3.1-2) unstable; urgency=low + + * Changed debian/control formatting (closes: #110053). + + -- Roland Mas Sun, 9 Sep 2001 18:34:21 +0200 + +emacs-goodies-el (3.1-1) unstable; urgency=low + + * Upgraded browse-kill-ring.el to 0.9. + + -- Roland Mas Mon, 27 Aug 2001 18:53:32 +0200 + +emacs-goodies-el (3-1) unstable; urgency=low + + * Added browse-kill-ring.el (0.8), coffee.el (0.2), twiddle.el (1.3), + whitespace.el (1.9), silly-mail.el (1.22), obfusurl.el (1.5), + toggle-buffer.el (1.1), mutt-alias.el (1.2), protbuf.el (1.7). + + -- Roland Mas Fri, 24 Aug 2001 18:10:38 +0200 + +emacs-goodies-el (2.0-2) unstable; urgency=low + + * Fixed package description in the control file. + + -- Roland Mas Thu, 23 Aug 2001 17:27:02 +0200 + +emacs-goodies-el (2.0-1) unstable; urgency=low + + * Added bar-cursor.el (1.1), tld.el (1.3), services.el (1.2), + protocols.el (1.3) and highlight-completion.el (0.06). + + -- Roland Mas Thu, 23 Aug 2001 12:27:51 +0200 + +emacs-goodies-el (1.0-1) unstable; urgency=low + + * Initial Release. + * Contents: boxquote.el (1.6) and thinks.el (1.6). + + -- Roland Mas Tue, 21 Aug 2001 22:09:45 +0200 + +gnus-bonus-el (4-merged-gnus-bonus-el) unstable; urgency=low + + * This is the version that never happened. The gnus-bonus-el source + package was merged into emacs-goodies version 17. They still generate + different binary packages, though. The following changelog entries + (down there in this file) are only here for reference. + + -- Roland Mas Sun, 13 Oct 2002 23:17:45 +0200 + +gnus-bonus-el (3.1-1) unstable; urgency=low + + * New upstream version for spam-stat.el (0.1.0). + * Bumped Standards-Version to 3.5.7. + + -- Roland Mas Fri, 6 Sep 2002 18:31:21 +0200 + +gnus-bonus-el (3-1) unstable; urgency=low + + * Added spam-stat.el (0.0.4) and gnus-outlook-deuglify.el (1.2). + + -- Roland Mas Mon, 26 Aug 2002 22:51:50 +0200 + +gnus-bonus-el (2-3) unstable; urgency=low + + * Applied patch from Michael Hummel to fix nnir.el + with respect to swish++ (closes: #133278). + + -- Roland Mas Thu, 7 Mar 2002 13:12:21 +0100 + +gnus-bonus-el (2-2) unstable; urgency=low + + * Changed Depends: field so that the gnus package is not required (since + Gnus is included in the emacs21, emacs20 and xemacs21 packages) + (closes: #127792). + + -- Roland Mas Fri, 4 Jan 2002 18:28:49 +0100 + +gnus-bonus-el (2-1) unstable; urgency=low + + * Added nnir.el (1.73), nnmaildir.el (2001.09.11). + + -- Roland Mas Sat, 15 Dec 2001 21:01:50 +0100 + +gnus-bonus-el (1-1) unstable; urgency=low + + * Initial Release. + * Contents: gnus-junk.el (0.23), nnnil.el (not versioned, taken at + 2001-12-04), nntodo.el (1.1), mesage-x.el (1.23). + + -- Roland Mas Tue, 4 Dec 2001 14:17:50 +0100 + +debbugs-el (8-merged-debbugs-el) unstable; urgency=low + + * This is the version that never happened. The debbugs-el source + package was merged into emacs-goodies-el version 18. They still + generate different binary packages, though. The following changelog + entries (down there in this file) are only here for reference. + + -- Roland Mas Sun, 20 Oct 2002 15:11:56 +0200 + +debbugs-el (7.12-1) unstable; urgency=low + + * New upstream version for debian-bug.el (1.33) allows the menus to be + split according to severity (closes: #161155). + * Bumped DH_COMPAT to 4. + + -- Roland Mas Wed, 2 Oct 2002 13:50:53 +0200 + +debbugs-el (7.11-1) unstable; urgency=low + + * New upstream version for debian-bug.el (1.32) fixes several bugs + (closes: #159625, #160750). + + -- Roland Mas Fri, 13 Sep 2002 17:14:19 +0200 + +debbugs-el (7.10-4) unstable; urgency=low + + * Fixed the fix in 7.10-3. The flavour-independent component is needed, + only I have to make it lower priority than the flavour-dependent + component (closes: #159624). + * Versioned Depends: on emacsen-common, so that we can get rid of the + old compatibility code in the emacsen-startup file. + * Bumped Standards-Version to 3.5.7. + + -- Roland Mas Mon, 9 Sep 2002 13:32:55 +0200 + +debbugs-el (7.10-3) unstable; urgency=low + + * Fixed the load-path fiddling, so that the byte-compiled *.elc files + are used instead of the non-compiled *.el files (closes: #159624). + + -- Roland Mas Fri, 6 Sep 2002 13:38:03 +0200 + +debbugs-el (7.10-2) unstable; urgency=low + + * Force compression of the compilation log, to allow for non-interactive + installation (closes: #157798). + + -- Roland Mas Thu, 22 Aug 2002 12:48:42 +0200 + +debbugs-el (7.10-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.31) fixes several bugs + (closes: #117036, #156297, #156391). + + -- Roland Mas Tue, 20 Aug 2002 14:27:41 +0200 + +debbugs-el (7.9-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.27) (closes: #151717). + * Slightly patched gnus-BTS.el to allow other Elisp programs to + "require" it (closes: #151718). + + -- Roland Mas Fri, 12 Jul 2002 12:20:10 +0200 + +debbugs-el (7.8-3) unstable; urgency=low + + * Cosmetic changes to installation (closes: #124056). + + -- Roland Mas Tue, 9 Apr 2002 14:25:55 +0200 + +debbugs-el (7.8-2) unstable; urgency=low + + * Changed the way I call debian-pkg-add-load-path-item, since it doesn't + change the contents of the load-path variable as I thought it did + (closes: #134392). + + -- Roland Mas Sun, 17 Feb 2002 21:22:03 +0100 + +debbugs-el (7.8-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.26). + * Use debian-pkg-add-load-path-item if available. + * Wrapped the .emacsen-startup file into a test for the installedness of + the package, to prevent nasty stuff from happening when the package is + uninstalled but not purged (closes: #134096). + + -- Roland Mas Fri, 15 Feb 2002 21:26:18 +0100 + +debbugs-el (7.7-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.23). + * This release uses a new feature of reportbug, hence the versioned + Depends: field. (closes: #122032). + + -- Roland Mas Fri, 14 Dec 2001 13:58:38 +0100 + +debbugs-el (7.6-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.22) (closes: #122033, + #121932, #123476). + * Also fixed the autoload docstring for #121932. + + -- Roland Mas Wed, 12 Dec 2001 12:22:25 +0100 + +debbugs-el (7.5-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.19) (closes: #117976, + #117855, #117842). + + -- Roland Mas Thu, 8 Nov 2001 18:50:03 +0100 + +debbugs-el (7.4-1) unstable; urgency=low + + * ACK NMU by Peter (closes: #111615). + * New upstream version for debian-bug.el (1.17) (closes: #111332). + + -- Roland Mas Sun, 21 Oct 2001 14:32:01 +0200 + +debbugs-el (7.3-1) unstable; urgency=low + + * NMU by debian-bug.el upstream maintainer (Roland is on vacation). + * New upstream release for debian-bug.el (1.16). + - Includes template for ITP/RPC bugs lifted from reportbug (closes: #111615). + - Work around bug #111331 (function font-lock-add-keywords doesn't exist + in XEmacs) temporarily. There's no fontification in XEmacs, but at + least the code loads. I'll close the bug when it's actually fixed. + + -- Peter S Galbraith Fri, 21 Sep 2001 16:18:07 -0400 + +debbugs-el (7.2-2) unstable; urgency=low + + * Removed version numbers from package description. + + -- Roland Mas Thu, 16 Aug 2001 16:46:02 +0200 + +debbugs-el (7.2-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.15). + * 1.14 release also increased consistency in function naming scheme + (closes: #108808). + * Now Recommends: wget. + + -- Roland Mas Thu, 16 Aug 2001 11:43:45 +0200 + +debbugs-el (7.1-1) unstable; urgency=low + + * New upstream release for debian-bug.el (1.13). + * Changed Depends: line (closes: #108804). + + -- Roland Mas Wed, 15 Aug 2001 18:56:01 +0200 + +debbugs-el (7.0-1) unstable; urgency=low + + * Changed numbering scheme: major will change when adding or removing + files to this package; minor will change when these files have a new + upstream release; Debian revision is for packaging only. + * deban-bug.el: new upstream release 1.12 (new upstream maintainer is + Peter S Galbraith ). + * Added autoloads for debian-bug.el. + + -- Roland Mas Wed, 15 Aug 2001 09:41:50 +0200 + +debbugs-el (6) unstable; urgency=low + + * gnus-BTS.el: made the regexps that recognise a Debian group a bit more + permissive. + * debian-bug.el: mark the bug reporting buffer as non-modified after + initialisation (Toby Speight ) (closes: #95372). + + -- Roland Mas Fri, 27 Apr 2001 18:07:05 +0200 + +debbugs-el (5) unstable; urgency=low + + * Fixed load-path problem for gnus-BTS.el (closes: #93334). + + -- Roland Mas Sat, 21 Apr 2001 17:12:56 +0200 + +debbugs-el (4) unstable; urgency=low + + * Removed compilation of gnus-BTS.el to avoid undefined problems with + undefined macros. (closes: #89838) + + -- Roland Mas Fri, 30 Mar 2001 18:36:00 +0200 + +debbugs-el (3) unstable; urgency=low + + * Added Depends: bug to control file (closes: #89357) + + -- Roland Mas Mon, 12 Mar 2001 20:20:35 +0100 + +debbugs-el (2) unstable; urgency=low + + * New upstream release for gnus-BTS.el: copyright assignment is changed, + Xemacs dependency is dead, more BTS keywords, regex cleanup, + etc. (closes: #88294). + + -- Roland Mas Sun, 11 Mar 2001 19:27:16 +0100 + +debbugs-el (1) unstable; urgency=low + + * Initial Release. + * Includes debian-bug.el and gnus-BTS.el (closes: #85883, #85974). + + -- Roland Mas Tue, 27 Feb 2001 20:57:06 +0100 + +dpkg-dev-el (3-merged-dpkg-dev-el) unstable; urgency=low + + * This is the version that never happened. The dpkg-dev-el source + package was merged into emacs-goodies-el version 18. They still + generate different binary packages, though. The following changelog + entries (down there in this file) are only here for reference. + + -- Roland Mas Sun, 20 Oct 2002 15:11:56 +0200 + +dpkg-dev-el (2.9-1) unstable; urgency=low + + * New upstream version for debian-changelog-mode.el (1.65). + * Bumped Standards-Version to 3.5.7. + + -- Roland Mas Fri, 6 Sep 2002 16:24:28 +0200 + +dpkg-dev-el (2.8-1) unstable; urgency=low + + * New upstream version for debian-changelog-mode.el (1.64), fixes + several bugs (closes: #159041, #159643). + + -- Roland Mas Fri, 6 Sep 2002 08:56:29 +0200 + +dpkg-dev-el (2.7-2) unstable; urgency=low + + * Changed the load-path used at install time, to fix installation + problem on Xemacs (closes: #157811). + + -- Roland Mas Thu, 22 Aug 2002 15:38:07 +0200 + +dpkg-dev-el (2.7-1) unstable; urgency=low + + * Now depends on debbugs-el. + * New upstream version for debian-changelog-mode.el (1.62) fixes several + bugs (closes: #113964, #156762). + + -- Roland Mas Wed, 21 Aug 2002 09:33:27 +0200 + +dpkg-dev-el (2.6-1) unstable; urgency=low + + * New upstream release for debian-changelog-mode.el (1.57) (closes: #154747). + + -- Roland Mas Tue, 30 Jul 2002 08:40:12 +0200 + +dpkg-dev-el (2.5-1) unstable; urgency=low + + * New upstream release for debian-changelog-mode.el (1.56) (closes: #153982). + + -- Roland Mas Thu, 25 Jul 2002 17:09:15 +0200 + +dpkg-dev-el (2.4-1) unstable; urgency=low + + * The "Yeah, I know I'm late" release. + * Acknowledging the NMU. Thanks, Colin. + * New upstream release for debian-changelog-mode.el (1.55) (closes: #146583) + + -- Roland Mas Mon, 15 Jul 2002 13:57:45 +0200 + +dpkg-dev-el (2.3-1) unstable; urgency=medium + + * NMU + * New upstream release for debian-control-mode.el (0.4). + + -- Colin Walters Fri, 31 May 2002 16:15:50 -0400 + +dpkg-dev-el (2.2-2) unstable; urgency=low + + * Changed the way I call debian-pkg-add-load-path-item, since it doesn't + change the contents of the load-path variable as I thought it did. + + -- Roland Mas Sun, 17 Feb 2002 21:51:29 +0100 + +dpkg-dev-el (2.2-1) unstable; urgency=low + + * New upstream release for debian-control-mode.el (0.3). + * New upstream release for debian-changelog-mode (1.52). + * Use debian-pkg-add-load-path-item if available. + + -- Roland Mas Tue, 12 Feb 2002 22:53:20 +0100 + +dpkg-dev-el (2.1-1) unstable; urgency=low + + * New upstream (bugfix) release for debian-control-mode.el (0.2). + + -- Roland Mas Mon, 3 Dec 2001 13:51:48 +0100 + +dpkg-dev-el (2-1) unstable; urgency=low + + * Added debian-control-mode.el (0.1) (closes: #121690). Cool, that + means I was right in calling the package dpkg-dev-el and not just + debian-changelog-mode-el. + * Changed numbering scheme, see README.Debian. + * Also added magic in emacsen-startup so that emacsen-startup files load + in Emacs Lisp mode, as they should, and no more in Fundamental mode. + * New upstream release for debian-changelog-mode.el (1.50). + + -- Roland Mas Fri, 30 Nov 2001 11:00:25 +0100 + +dpkg-dev-el (1.49-1) unstable; urgency=low + + * New upstream release. + * Fiddled with debian/control a bit. + + -- Roland Mas Thu, 22 Nov 2001 19:01:24 +0100 + +dpkg-dev-el (1.48-1) unstable; urgency=low + + * NMU by upstream author (Roland is on vacation). + * New upstream release. + + -- Peter S Galbraith Wed, 19 Sep 2001 11:38:59 -0400 + +dpkg-dev-el (1.47-2) unstable; urgency=low + + * Added the appropriate load-path (closes: #111702). + + -- Roland Mas Sun, 9 Sep 2001 18:36:53 +0200 + +dpkg-dev-el (1.47-1) unstable; urgency=low + + * New upstream release. + + -- Roland Mas Wed, 15 Aug 2001 21:02:43 +0200 + +dpkg-dev-el (1.46-1) unstable; urgency=low + + * New upstream release. + * Fix font-lock code (closes: #108809). + * New feature requires a Recommends: wget. + + -- Roland Mas Wed, 15 Aug 2001 19:38:04 +0200 + +dpkg-dev-el (1.44-2) unstable; urgency=low + + * Minor copyright tweaks. + + -- Roland Mas Sun, 5 Aug 2001 17:49:37 +0200 + +dpkg-dev-el (1.44-1) unstable; urgency=low + + * New upstream release. + * Added autoloads for the debian-changelog-web-* functions (except for + d-c-w-this-bug-under-mouse). + + -- Roland Mas Fri, 27 Jul 2001 18:55:48 +0200 + +dpkg-dev-el (1.43-1) unstable; urgency=low + + * New upstream release. + * Updated to policy 3.5.6.0. + * Added hook to find-file-hooks to switch to debian-changelog-mode for + files that look like some Debian changelog, even if that can't be + decided from the file name (closes: #105889). + + -- Roland Mas Thu, 26 Jul 2001 10:00:35 +0200 + +dpkg-dev-el (1.42-1) unstable; urgency=low + + * New upstream release (closes: #102088). + + -- Roland Mas Thu, 12 Jul 2001 13:39:08 +0200 + +dpkg-dev-el (1.40-1) unstable; urgency=low + + * New upstream release. + + -- Roland Mas Wed, 27 Jun 2001 09:49:22 +0200 + +dpkg-dev-el (1.39-1) unstable; urgency=low + + * New upstream release (closes: #100639). + + -- Roland Mas Fri, 15 Jun 2001 09:51:39 +0200 + +dpkg-dev-el (1.37-1) unstable; urgency=low + + * New upstream release (closes: #100162). + + -- Roland Mas Tue, 12 Jun 2001 09:45:11 +0200 + +dpkg-dev-el (1.34-1) unstable; urgency=low + + * New upstream release (closes: #99051). + + -- Roland Mas Tue, 29 May 2001 18:08:43 +0200 + +dpkg-dev-el (1.33-1) unstable; urgency=low + + * New upstream release. Should fix problems with Xemacs. Yes, again. + + -- Roland Mas Tue, 29 May 2001 15:53:59 +0200 + +dpkg-dev-el (1.32-1) unstable; urgency=low + + * New upstream release. Should fix problems with Xemacs. + * The "Not another shrubbery!" release. + + -- Roland Mas Tue, 29 May 2001 09:30:56 +0200 + +dpkg-dev-el (1.31-1) unstable; urgency=low + + * New upstream release (closes: #98577). + + -- Roland Mas Mon, 28 May 2001 19:00:36 +0200 + +dpkg-dev-el (1.30-1) unstable; urgency=low + + * New upstream release. + * Default to the same distribution as the previous release, as requested + (closes: #96260). + + -- Roland Mas Wed, 9 May 2001 21:47:05 +0200 + +dpkg-dev-el (1.24-1) unstable; urgency=low + + * New upstream release. + * The "I'm going to start a strike" release. + + -- Roland Mas Thu, 3 May 2001 19:20:17 +0200 + +dpkg-dev-el (1.23-1) unstable; urgency=low + + * New upstream release. + * The "there, see what happens?" release. + + -- Roland Mas Thu, 3 May 2001 13:00:06 +0200 + +dpkg-dev-el (1.22-1) unstable; urgency=low + + * The "would someone please slow him down?" release. + * New upstream release. Yes, *again* :-) + + -- Roland Mas Wed, 2 May 2001 19:34:05 +0200 + +dpkg-dev-el (1.19-1) unstable; urgency=low + + * New upstream releases seem to pop up faster than I can track them. + This one is 1.19 (closes: #95831). + * Fix the startup script (yes, again) (closes: #95830). + + -- Roland Mas Wed, 2 May 2001 14:08:01 +0200 + +dpkg-dev-el (1.13-1) unstable; urgency=low + + * New upstream release. + * Less flashy colouring (closes: #93243). + * Less verbosity during byte-compilation (closes: #95347). + * Some fixes in the startup script (closes: #95348). + + -- Roland Mas Fri, 27 Apr 2001 20:12:57 +0200 + +dpkg-dev-el (1.10-1) unstable; urgency=low + + * New upstream release. + * Fix number suggestion scheme (closes: #88245, #88589). + * add-log-mailing-address is now (since 1.06 in fact) + debian-changelog-mailing-address (closes: #89208). + + -- Roland Mas Sun, 11 Mar 2001 18:33:11 +0100 + +dpkg-dev-el (1.07-1) unstable; urgency=low + + * New upstream release. + * Handle epochs correctly (closes: #87964). + * Make lintian happy. + + -- Roland Mas Wed, 28 Feb 2001 17:24:38 +0100 + +dpkg-dev-el (1.05-1) unstable; urgency=low + + * New upstream release. Closes: #85412. + + -- Roland Mas Mon, 26 Feb 2001 09:38:34 +0100 + +dpkg-dev-el (1.01-4) unstable; urgency=low + + * Changed Description: field again (Closes: #85413). + + -- Roland Mas Sat, 10 Feb 2001 14:19:34 +0100 + +dpkg-dev-el (1.01-3) unstable; urgency=low + + * Changed Description: field and maintainer address. + + -- Roland Mas Wed, 24 Jan 2001 12:55:53 +0100 + +dpkg-dev-el (1.01-2) unstable; urgency=low + + * Changed Depends: to Suggests: + + -- Roland Mas <99.roland.mas@aist.enst.fr> Tue, 9 Jan 2001 09:54:34 +0100 + +dpkg-dev-el (1.01-1) unstable; urgency=low + + * Initial Release. + + -- Roland Mas <99.roland.mas@aist.enst.fr> Fri, 22 Dec 2000 14:09:40 +0100 + --- emacs-goodies-el-29.4.orig/debian/emacs-goodies-extra-el.emacsen-startup +++ emacs-goodies-el-29.4/debian/emacs-goodies-extra-el.emacsen-startup @@ -0,0 +1,5 @@ +;; This file may be safely deleted. +;; +;; Its only purpose was to remove the old version of this file that existed +;; prior to the contents of the `emacs-goodies-extra-el' package moving into +;; the package `emacs-goodies-el'. --- emacs-goodies-el-29.4.orig/debian/dpkg-dev-el.copyright +++ emacs-goodies-el-29.4/debian/dpkg-dev-el.copyright @@ -0,0 +1,87 @@ +This package was first debianized by Roland Mas +It is currently maintained by Peter S Galbraith + + This collection of files was assembled by Roland Mas +from various messages posted on the gnu.emacs.sources newsgroup, as well as +from various collections of Emacs Lisp files found on the web. Some +authors contacted Roland directly, some users sent me the files by email. +Most of them are covered by the GNU GPL, but the individual licences can +vary. Here is a list of excerpts of the included files covering this +matter. + + The text of the GNU GPL can be found in /usr/share/common-licenses. + +Copyright info for files in dpkg-dev-el +--------------------------------------- + +Author/copyright info for debian-bts-control.el +,- +| ;; Copyright (C) 2003 Peter S Galbraith +| ;; +| ;; This file 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 2, or (at your option) +| ;; any later version. +| ;; +| ;; debian-bts-mode.el 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. +`- + + +Author/copyright info for debian-changelog-mode.el: +,---- +| Copyright (C) 1996 Ian Jackson +| Copyright (C) 1997 Klee Dienes +| Copyright (C) 1999 Chris Waters +| Copyright (C) 2000 Peter S Galbraith +| +| It 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 2, or (at your option) +| any later version. +`---- + + +Author/copyright info for debian-control-mode.el: +,---- +| ;;; debian-control-mode.el --- major mode for Debian control files +| +| ;; Copyright (C) 2001 Free Software Foundation, Inc. +| +| ;; Author: Colin Walters +| ;; Maintainer: Colin Walters +| [...] +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- + + +Author/copyright info for debian-copyright.el +,- +| ;; Copyright 2002, 2003 Junichi Uekawa. +| +| ;; This file 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 2, or (at your option) +| ;; any later version. +| ;; +| ;; debian-copyright.el 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. +`- + + +Author/copyright info for readme-debian.el: +,---- +| ;; Copyright 2002 Junichi Uekawa. +| +| ;; This file 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 2, or (at your option) +| ;; any later version. +`---- --- emacs-goodies-el-29.4.orig/debian/patches/52_todoo_bug414781.dpatch +++ emacs-goodies-el-29.4/debian/patches/52_todoo_bug414781.dpatch @@ -0,0 +1,35 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 52_todoo_bug414781.dpatch by +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/todoo.el emacs-goodies-el/elisp/emacs-goodies-el/todoo.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/todoo.el 2007-05-14 19:17:52.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/todoo.el 2007-05-14 19:20:51.000000000 -0400 +@@ -57,6 +57,11 @@ + + ;;; ChangeLog: + ++;; 2007-05-14 Peter S Galbraith ++;; Comment out clobbering of outline-mode-menu-bar-map key entries. ++;; This is far too aggressive. A much better fix would be to undefine the ++;; keys for todoo-mode-map. Thanks to Simon Pepping (Closes #144781). ++ + ;; 2004-11-24 Peter S Galbraith + ;; Debian bug 267637 fix: changes to outline-regexp should be buffer-local. + ;; Thanks to Daniel Skarda <0rfelyus@hobitin.ucw.cz> for pointing it out. +@@ -524,9 +529,9 @@ + + (outline-minor-mode 1) + +- (define-key outline-mode-menu-bar-map [headings] 'undefined) +- (define-key outline-mode-menu-bar-map [hide] 'undefined) +- (define-key outline-mode-menu-bar-map [show] 'undefined) ++ ;;(define-key outline-mode-menu-bar-map [headings] 'undefined) ++ ;;(define-key outline-mode-menu-bar-map [hide] 'undefined) ++ ;;(define-key outline-mode-menu-bar-map [show] 'undefined) + + (if todoo-collapse-items + (hide-body)) --- emacs-goodies-el-29.4.orig/debian/patches/9_whitespace_enable_custom.dpatch +++ emacs-goodies-el-29.4/debian/patches/9_whitespace_enable_custom.dpatch @@ -0,0 +1,246 @@ +#!/bin/sh -e +## 9_whitespace_enable_custom.dpatch.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: nuke-trailing-whitespace.el custom support + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/rhogee/emacs/pkg-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/nuke-trailing-whitespace.el emacs-goodies-el/elisp/emacs-goodies-el/nuke-trailing-whitespace.el +--- /home/rhogee/emacs/pkg-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/nuke-trailing-whitespace.el Tue Oct 7 11:15:59 2003 ++++ emacs-goodies-el/elisp/emacs-goodies-el/nuke-trailing-whitespace.el Tue Oct 7 11:16:59 2003 +@@ -1,11 +1,12 @@ + ;;; nuke-trailing-whitespace.el --- strip trailing whitespace from buffers + + ;; Copyright (C) 1995, 1996, 1997, 2000 Noah S. Friedman ++;; Copyright (C) 2003 Peter S. Galbraith + + ;; Author: Noah Friedman + ;; Maintainer: friedman@splode.com + ;; Keywords: extensions +-;; Status: Works in Emacs 19 and XEmacs. ++;; Status: Works in Emacs 20 and 21 and XEmacs. + + ;; $Id: 9_whitespace_enable_custom.dpatch,v 1.2 2003/10/07 15:24:27 psg Exp $ + +@@ -25,34 +26,92 @@ + ;; Inc.; 59 Temple Place, Suite 330; Boston, MA 02111-1307, USA. + + ;;; Commentary: +- +-;; This file was modified from Noah Friedman's whitespace.el by Cristian +-;; Ionescu-Idbohrn because emacs21 also provides a whitespace.el. This +-;; file, and its functions, were renamed to nuke-trailing-whitespace to +-;; avoid the namespace collision. +- +-;; You may wish to do the following in your .emacs: ++;; ++;; This package strips trailing whitespace from buffers. It can be used ++;; manually on a buffer by calling `M-x nuke-trailing-whitespace' when ++;; editing a buffer, or automatically when you save a file. ++;; ++;; For automatic stripping of files as you save them (or email messages as ++;; you send them), either add the following in your .emacs: + ;; + ;; (autoload 'nuke-trailing-whitespace "nuke-trailing-whitespace" nil t) + ;; (add-hook 'mail-send-hook 'nuke-trailing-whitespace) + ;; (add-hook 'write-file-hooks 'nuke-trailing-whitespace) ++;; ++;; or better yet accomplish the same effect by customizing the variable ++;; `nuke-trailing-whitespace-in-hooks' and saving the result for future ++;; sessions. ++;; ++;; By default, buffers that have a major-mode listed in the customizable ++;; list `nuke-trailing-whitespace-always-major-modes' are stripped, those ++;; listed in the list `nuke-trailing-whitespace-never-major-modes' are not, ++;; and others are prompted for. You can change this default behaviour by ++;; customizing the variable `nuke-trailing-whitespace-p'. ++ ++;; See also: whitespace.el packaged in Emacs-21 ++ ++;;; History: ++;; ++;; 2003-05-01 Cristian Ionescu-Idbohrn ++;; Emacs21 also provides a whitespace.el. This file, and its functions, ++;; were renamed to nuke-trailing-whitespace to avoid the name-space ++;; collision. ++;; ++;; 2003-10-06 - Peter S Galbraith ++;; - Support for custom interface. Allows enabling of package via custom. ++;; - nuke-trailing-whitespace-in-hooks: New defcustom to select hooks ++;; + + ;;; Code: + +-(defvar nuke-trailing-whitespace-p 'nuke-trailing-whitespace-check-mode ++(require 'cl) ++ ++(defgroup nuke-trailing-whitespace nil ++ "Strip trailing whitespace from buffers." ++ :group 'editing ++ :group 'convenience) ++ ++(defcustom nuke-trailing-whitespace-p 'nuke-trailing-whitespace-check-mode + "*Specify when stripping whitespace should be done. + This variable affects how the function `nuke-trailing-whitespace' behaves. +-If `t', unreservedly strip trailing whitespace, including excess newlines. +-If `nil', do nothing. +-If a symbol \(not bound to a function\), query for each instance. ++If t, unreservedly strip trailing whitespace, including excess newlines. ++If nil, do nothing. ++If the symbol 'query, then query for each instance. + +-If a function or name of a function, call it to decide what to do. +-This function is called once and should return `t', `nil', or the symbol +-`query' to decide what to do. ++The default setting, the function `nuke-trailing-whitespace-check-mode', ++says to strip buffers with major modes listed in ++`nuke-trailing-whitespace-always-major-modes', skip those listed in the ++list `nuke-trailing-whitespace-never-major-modes' and query the user for ++others. + +-This variable is made buffer-local when set in any fashion.") ++You may set another custom-made function which will be called instead. ++This function should return t, nil, or the symbol `query' to decide what to ++do. ++ ++This variable is made buffer-local when set in any fashion." ++ :group 'nuke-trailing-whitespace ++ :type '(radio (const :tag "Never" nil) ++ (const :tag "Always" t) ++ (const :tag "Query" :value query) ++ (const :tag ++ "Default function (nuke-trailing-whitespace-check-mode)" ++ :value nuke-trailing-whitespace-check-mode) ++ (function :tag "Other function"))) + (make-variable-buffer-local 'nuke-trailing-whitespace-p) + ++(defcustom nuke-trailing-whitespace-in-hooks nil ++ "List of hooks to install `nuke-trailing-whitespace' into. ++Unsetting values does not remove hooks from the current session." ++ :type 'hook ;Not really, but gives us :options ++ :options '(write-file-hooks mail-send-hook) ++ :group 'nuke-trailing-whitespace ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (when value ++ (loop for x in value ++ do (add-hook x 'nuke-trailing-whitespace)))) ++ :require 'nuke-trailing-whitespace) ++ + ;; The regexp "\\s-+$" is too general, since form feeds (\n), carriage + ;; returns (\r), and form feeds/page breaks (C-l) count as whitespace in + ;; some syntaxes even though they serve a functional purpose in the file. +@@ -64,7 +123,7 @@ + (defconst nuke-trailing-whitespace-eob-newline-regexp "\n\n+\\'" + "Regular expression which matches newlines at the end of the buffer.") + +-(defvar nuke-trailing-whitespace-always-major-modes ++(defcustom nuke-trailing-whitespace-always-major-modes + '(ada-mode + c++-mode + c-mode +@@ -85,30 +144,34 @@ + slitex-mode + sml-mode + texinfo-mode) +- "*Major modes for which `nuke-trailing-whitespace-check-mode' will return `t'. ++ "*Major modes for which `nuke-trailing-whitespace-check-mode' will return t. + These are major modes for which `nuke-trailing-whitespace' should + strip all trailing whitespace and excess newlines at the end of the buffer +-without asking.") ++without asking." ++ :group 'nuke-trailing-whitespace ++ :type '(repeat (function :tag "Mode"))) + +-(defvar nuke-trailing-whitespace-never-major-modes ++(defcustom nuke-trailing-whitespace-never-major-modes + '(mail-mode + rmail-mode + vm-mode + vm-summary-mode) +- "*Major modes for which `nuke-trailing-whitespace-check-mode' will return `nil'. ++ "*Major modes for which `nuke-trailing-whitespace-check-mode' returns nil. + These are major modes for which `nuke-trailing-whitespace' should +-never strip trailing whitespace automatically.") ++never strip trailing whitespace automatically." ++ :group 'nuke-trailing-whitespace ++ :type '(repeat (function :tag "Mode"))) + + + ;;;###autoload + (defun nuke-trailing-whitespace () + "Nuke all trailing whitespace in the buffer. + Whitespace in this case is just spaces or tabs. +-This is a useful function to put on write-file-hooks. ++This is a useful function to put on `write-file-hooks'. + + Unless called interactively, this function uses + `nuke-trailing-whitespace-p' to determine how to behave. +-However, even if this variable is `t', this function will query for ++However, even if this variable is t, this function will query for + replacement if the buffer is read-only." + (interactive) + (cond ((interactive-p) +@@ -126,6 +189,7 @@ + nil) + + (defun nuke-trailing-whitespace-do-nuke-whitespace (&optional flag) ++ "Remove trailing whitespace in buffer, not prompting first if FLAG is t." + (interactive) + (let ((buffer-orig-read-only buffer-read-only) + (buffer-read-only nil)) +@@ -138,20 +202,27 @@ + ((or (and (eq flag t) + (not buffer-orig-read-only)) + (interactive-p)) +- (while (re-search-forward nuke-trailing-whitespace-regexp (point-max) t) ++ (while (re-search-forward nuke-trailing-whitespace-regexp ++ (point-max) t) + (delete-region (match-beginning 0) (match-end 0))) + (goto-char (point-min)) +- (and (re-search-forward nuke-trailing-whitespace-eob-newline-regexp nil t) ++ (and (re-search-forward nuke-trailing-whitespace-eob-newline-regexp ++ nil t) + (delete-region (1+ (match-beginning 0)) (match-end 0)))) + (t + (query-replace-regexp nuke-trailing-whitespace-regexp "") + (goto-char (point-min)) +- (and (re-search-forward nuke-trailing-whitespace-eob-newline-regexp nil t) ++ (and (re-search-forward nuke-trailing-whitespace-eob-newline-regexp ++ nil t) + (y-or-n-p + "Delete excess trailing newlines at end of buffer? ") + (delete-region (1+ (match-beginning 0)) (match-end 0)))))))))) + + (defun nuke-trailing-whitespace-check-mode (&optional mode) ++ "Default function to determine if whitespace should be trimmed from a buffer. ++Returns t if MODE is listed in `nuke-trailing-whitespace-always-major-modes'. ++Returns nil if listed in `nuke-trailing-whitespace-never-major-modes'. ++Else returns symbol 'query if buffer is visible or nil otherwise." + (or mode (setq mode major-mode)) + (cond ((memq mode nuke-trailing-whitespace-always-major-modes) t) + ((memq mode nuke-trailing-whitespace-never-major-modes) nil) +@@ -163,4 +234,4 @@ + + (provide 'nuke-trailing-whitespace) + +-;;; nuke-trailing-whitespace.el ends here. ++;;; nuke-trailing-whitespace.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/50_dedicated.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_dedicated.dpatch @@ -0,0 +1,77 @@ +#!/bin/sh -e +## 50_dedicated.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: made a true toggle; added autoload tag. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/dedicated.el emacs-goodies-el/elisp/emacs-goodies-el/dedicated.el +--- /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/dedicated.el 2003-11-12 20:51:41.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/dedicated.el 2003-11-12 20:18:53.000000000 -0500 +@@ -4,7 +4,7 @@ + + ;; Author: Eric Crampton + ;; Maintainer: Eric Crampton +-;; Version: 1.0.0 ++;; Version: 1.1.0 + ;; Keywords: dedicated, buffer + + ;; This file is not part of GNU Emacs. +@@ -34,16 +34,30 @@ + ;; + ;; Dedicated buffers will have "D" shown in the mode line. + ++;;; History: ++;; ++;; 2003-11-12 Peter S Galbraith ++;; V1.0.0 found on gnu.emacs.sources archives for 2000/04/12: ++;; http://groups.google.com/groups?selm=izn1mzrs60.fsf%40elmo.atdesk.com ++;; V1.1.0 made `dedicated-mode' a true toggle; added autoload tag and made ++;; minor checkdoc edits. ++ + ;;; Code: + + (defvar dedicated-mode nil +- "Mode variable for dedicated minor mode.") ++ "Mode variable for dedicated minor mode. ++Use the command `dedicated-mode' to toggle or set this variable.") + (make-variable-buffer-local 'dedicated-mode) + ++;;;###autoload + (defun dedicated-mode (&optional arg) +- "Dedicated minor mode." ++ "Toggle dedicated minor mode. ++With ARG, turn minor mode on if ARG is positive, off otherwise." + (interactive "P") +- (setq dedicated-mode (not dedicated-mode)) ++ (setq hs-headline nil ++ dedicated-mode (if (null arg) ++ (not dedicated-mode) ++ (> (prefix-numeric-value arg) 0))) + (set-window-dedicated-p (selected-window) dedicated-mode) + (if (not (assq 'dedicated-mode minor-mode-alist)) + (setq minor-mode-alist +@@ -51,3 +65,5 @@ + minor-mode-alist)))) + + (provide 'dedicated) ++ ++;;; dedicated.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/50_table-add-to-text-mode-hook.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_table-add-to-text-mode-hook.dpatch @@ -0,0 +1,55 @@ +#!/bin/sh -e +## 50_table-add-to-text-mode-hook.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add table-add-to-text-mode-hook. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/table.el emacs-goodies-el/elisp/emacs-goodies-el/table.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/table.el 2003-10-08 20:00:03.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/table.el 2003-10-09 22:15:32.000000000 -0400 +@@ -799,11 +799,26 @@ + See `table-insert' for examples about how to use." + :tag "Table" + :prefix "table-" ++ :link '(emacs-commentary-link "table.el") ++ :link '(url-link "http://table.sourceforge.net/") + :group 'editing + :group 'wp + :group 'paragraphs + :group 'fill) + ++(defcustom table-add-to-text-mode-hook nil ++ "If non-nil, add automatic table detection to `text-mode-hook'. ++Tables in visited files will be automatically editable using the `table' ++package. Alternatively, use `table-recognize' manually in buffers." ++ :type 'boolean ++ :group 'table ++ :require 'table ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (if value ++ (add-hook 'text-mode-hook 'table-recognize) ++ (remove-hook 'text-mode-hook 'table-recognize)))) ++ + (defcustom table-time-before-update 0.2 + "*Time in seconds before updating the cell contents after typing. + Updating the cell contents on the screen takes place only after this --- emacs-goodies-el-29.4.orig/debian/patches/54_gnus-pers_bug384209.dpatch +++ emacs-goodies-el-29.4/debian/patches/54_gnus-pers_bug384209.dpatch @@ -0,0 +1,150 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 54_gnus-pers_bug384209.dpatch by +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/gnus-bonus-el/gnus-pers.el emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el +--- emacs-goodies-el~/elisp/gnus-bonus-el/gnus-pers.el 2007-09-17 22:10:14.000000000 -0400 ++++ emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2007-09-17 22:11:38.000000000 -0400 +@@ -69,6 +69,10 @@ + ; `gnus-personalities-replace-in-string' after removing the calls to + ; check-argument-type. This was listed in the Todo list. + ++;; 1.3 Elias Oltmanns ++;; Reported and fixed Debian bug #384209 ++;; `Cc-fix feature in gnus-pers is horribly broken' ++ + ;Todo: + ; + redo x-tra headers to be a repeat list of two parts, header name + ; and header data. Then allow either to be a function. +@@ -82,6 +86,8 @@ + + (eval-when-compile (require 'cl)) + (require 'nnmail) ++(autoload 'rmail-dont-reply-to "mail-utils") ++(autoload 'gnus-extract-address-components "gnus-util") + + ;; Variable setup + +@@ -306,39 +312,6 @@ + + (define-key message-mode-map "\C-c\C-p" 'gnus-personality-choose) + +-(defun gnus-personality-replace-in-string (str regexp newtext &optional literal) +- "Replace all matches in STR for REGEXP with NEWTEXT string, +- and returns the new string. +-Optional LITERAL non-nil means do a literal replacement. +-Otherwise treat `\\' in NEWTEXT as special: +- `\\&' in NEWTEXT means substitute original matched text. +- `\\N' means substitute what matched the Nth `\\(...\\)'. +- If Nth parens didn't match, substitute nothing. +- `\\\\' means insert one `\\'. +- `\\u' means upcase the next character. +- `\\l' means downcase the next character. +- `\\U' means begin upcasing all following characters. +- `\\L' means begin downcasing all following characters. +- `\\E' means terminate the effect of any `\\U' or `\\L'. +- +-This is mostly copied from XEmacs' replace-in-string because Emacs doesn't +-have that function." +- (if (> (length str) 50) +- (let ((cfs case-fold-search)) +- (with-temp-buffer +- (setq case-fold-search cfs) +- (insert str) +- (goto-char 1) +- (while (re-search-forward regexp nil t) +- (replace-match newtext t literal)) +- (buffer-string))) +- (let ((start 0) newstr) +- (while (string-match regexp str start) +- (setq newstr (replace-match newtext t literal str) +- start (+ (match-end 0) (- (length newstr) (length str))) +- str newstr)) +- str))) +- + (defun gnus-personality-use (&optional personality) + "Use a personality defined in gnus-personalities." + (interactive) +@@ -504,27 +477,19 @@ + ; Now we have a problem with Cc when doing a followup. So let's check the Cc field and see if from is there: + (save-excursion + (save-restriction +- (message-goto-cc) ;; Yes, yes. This inserts a Cc: if there's nothing there. No worries. +- (beginning-of-line) +- (let ((beg (point)) +- (email (gnus-personality-replace-in-string from "\"" ""))) +- (end-of-line) +- (narrow-to-region beg (point)) +- (goto-char (point-min)) +- ; " mess me up. +- (while (search-forward "\"" nil t) +- (replace-match "") +- ) +- (goto-char (point-min)) +- (if (search-forward email nil t) +- (let* ((end (match-end 0)) +- (start (match-beginning 0))) +- (delete-region start end))) ; Excellent. Now we need to check for a blank line. +- (unless (re-search-forward ".*@.*" nil t) ++ (message-narrow-to-head) ++ (let ((case-fold-search t) ++ (rmail-dont-reply-to-names ++ (regexp-quote ++ (cadr (gnus-extract-address-components from)))) ++ (cc (message-fetch-field "cc"))) ++ (when (and cc ++ (string-match rmail-dont-reply-to-names cc)) ++ (message-remove-header "cc") + (widen) +- (forward-line 1) +- (beginning-of-line) +- (delete-region beg (point))) ++ (unless (string= "" (setq cc (rmail-dont-reply-to cc))) ++ (message-goto-cc) ++ (insert cc))) + + ) + ) +@@ -652,27 +617,19 @@ + ; Now we have a problem with Cc when doing a followup. So let's check the Cc field and see if from is there: + (save-excursion + (save-restriction +- (message-goto-cc) ;; Yes, yes. This inserts a Cc: if there's nothing there. No worries. +- (beginning-of-line) +- (let ((beg (point)) +- (email (gnus-personality-replace-in-string from "\"" ""))) +- (end-of-line) +- (narrow-to-region beg (point)) +- (goto-char (point-min)) +- ; " mess me up. +- (while (search-forward "\"" nil t) +- (replace-match "") +- ) +- (goto-char (point-min)) +- (if (search-forward email nil t) +- (let* ((end (match-end 0)) +- (start (match-beginning 0))) +- (delete-region start end))) ; Excellent. Now we need to check for a blank line. +- (unless (re-search-forward ".*@.*" nil t) ++ (message-narrow-to-head) ++ (let ((case-fold-search t) ++ (rmail-dont-reply-to-names ++ (regexp-quote ++ (cadr (gnus-extract-address-components from)))) ++ (cc (message-fetch-field "cc"))) ++ (when (and cc ++ (string-match rmail-dont-reply-to-names cc)) ++ (message-remove-header "cc") + (widen) +- (forward-line 1) +- (beginning-of-line) +- (delete-region beg (point))) ++ (unless (string= "" (setq cc (rmail-dont-reply-to cc))) ++ (message-goto-cc) ++ (insert cc))) + + ) + ) --- emacs-goodies-el-29.4.orig/debian/patches/9_missing_provide.dpatch +++ emacs-goodies-el-29.4/debian/patches/9_missing_provide.dpatch @@ -0,0 +1,44 @@ +#!/bin/sh -e +## 9_missing_provide.dpatch.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/align-string.el emacs-goodies-el/elisp/emacs-goodies-el/align-string.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/align-string.el 2003-06-14 22:35:26.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/align-string.el 2003-06-15 21:15:50.000000000 -0400 +@@ -91,4 +91,6 @@ + ;; Clear end marker. + (set-marker end nil))) + ++(provide 'align-string) ++ + ;;; align-string.el ends here +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/cyclebuffer.el emacs-goodies-el/elisp/emacs-goodies-el/cyclebuffer.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/cyclebuffer.el 2003-06-14 22:35:27.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/cyclebuffer.el 2003-06-15 21:15:10.000000000 -0400 +@@ -105,3 +105,5 @@ + visited buffers." + (interactive) + (cyclebuffer-forward -1)) ++ ++(provide 'cyclebuffer) --- emacs-goodies-el-29.4.orig/debian/patches/50_markdown_autoload.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_markdown_autoload.dpatch @@ -0,0 +1,18 @@ +#!/bin/sh /usr/share/dpatch/dpatch-run +## 50_markdown_autoload.dpatch by Cyril Brulebois +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add autoload. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/markdown-mode.el emacs-goodies-el/elisp/emacs-goodies-el/markdown-mode.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/markdown-mode.el 2008-09-09 21:13:59.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/markdown-mode.el 2008-09-09 21:22:48.000000000 -0400 +@@ -1007,6 +1007,7 @@ + (interactive) + (message "markdown-mode, version %s" markdown-mode-version)) + ++;;;###autoload + (define-derived-mode markdown-mode text-mode "Markdown" + "Major mode for editing Markdown files." + ;; Font lock. --- emacs-goodies-el-29.4.orig/debian/patches/50_setnu.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_setnu.dpatch @@ -0,0 +1,253 @@ +#!/bin/sh -e +## 50_setnu.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: setnu defface and checkdoc cleanup. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/setnu.el emacs-goodies-el/elisp/emacs-goodies-el/setnu.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/setnu.el 2003-10-15 20:54:31.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/setnu.el 2003-10-14 21:37:45.000000000 -0400 +@@ -1,32 +1,42 @@ +-;;; vi-style line number mode for Emacs +-;;; (requires Emacs 19.29 or later, or XEmacs 19.14 or later) +-;;; Copyright (C) 1994, 1995, 1997 Kyle E. Jones +-;;; +-;;; 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 +-;;; the Free Software Foundation; either version 2, or (at your option) +-;;; any later version. +-;;; +-;;; This program 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. +-;;; +-;;; A copy of the GNU General Public License can be obtained from this +-;;; program's author (send electronic mail to kyle@uunet.uu.net) or from +-;;; the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA +-;;; 02139, USA. +-;;; +-;;; Send bug reports to kyle@wonderworks.com ++;;; setnu.el --- vi-style line number mode for Emacs ++;; ++;; (requires Emacs 19.29 or later, or XEmacs 19.14 or later) ++;; Copyright (C) 1994, 1995, 1997 Kyle E. Jones ++;; ++;; 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 ++;; the Free Software Foundation; either version 2, or (at your option) ++;; any later version. ++;; ++;; This program 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. ++;; ++;; A copy of the GNU General Public License can be obtained from this ++;; program's author (send electronic mail to kyle@uunet.uu.net) or from ++;; the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA ++;; 02139, USA. ++ ++;;; Commentary: ++;; ++;; Send bug reports to kyle@wonderworks.com + ;; + ;; M-x setnu-mode toggles the line number mode on and off. + ;; +-;; turn-on-setnu-mode is useful for adding to a major-mode hook +-;; variable. ++;; turn-on-setnu-mode is useful for adding to a major-mode hook variable. + ;; Example: + ;; (add-hook 'text-mode-hook 'turn-on-setnu-mode) +-;; to automatically turn on line numbering when enterting text-mode." ++;; to automatically turn on line numbering when enterting text-mode." + ++;;; History: ++;; ++;; 2003-10-13 Peter S Galbraith ++;; - made checkdoc changes (but it's still not happy). ++;; - created settnu defgroup and created defface setnu-line-number-face. ++;; - added atoload tags. ++ ++;;; Code: + (provide 'setnu) + + (defconst setnu-running-under-xemacs +@@ -34,20 +44,20 @@ + (string-match "Lucid" emacs-version))) + + (defconst setnu-mode-version "1.06" +- "Version number for this release of setnu-mode.") ++ "Version number for this release of `setnu-mode'.") + + (defvar setnu-mode nil +- "Non-nil if setnu-mode is active in the current buffer.") ++ "Non-nil if `setnu-mode' is active in the current buffer.") + (make-variable-buffer-local 'setnu-mode) + + (defvar setnu-start-extent nil +- "First extent of a chain of extents used by setnu-mode. ++ "First extent of a chain of extents used by `setnu-mode'. + Each line has its own extent. Each line extent has a + `setnu-next-extent' property that points to the next extent in + the chain, which is the extent for the next line in the buffer. + There is also a `setnu-prev-extent' that points at the previous + extent in the chain. To distinguish them from other extents the +-setnu-mode extents all have a non-nil `setnu' property.") ++`setnu-mode' extents all have a non-nil `setnu' property.") + (make-variable-buffer-local 'setnu-start-extent) + + (defvar setnu-glyph-obarray (make-vector 401 0) +@@ -66,14 +76,21 @@ + `format' will be called with this string and one other argument + which will be an integer, the line number.") + +-(defvar setnu-line-number-face 'bold +- "*Face used to display the line numbers. +-Currently this works for XEmacs 19.12 and later versions only.") ++(defvar setnu-line-number-face 'setnu-line-number-face ++ "*Face used to display the line numbers.") ++ ++(defgroup setnu nil ++ "vi-style line number mode for Emacs.") ++ ++(defface setnu-line-number-face '((t (:bold t))) ++ "*Face used to display the line numbers." ++ :group 'setnu) + ++;;;###autoload + (defun setnu-mode (&optional arg) +- "Toggle setnu-mode. +-With prefix argument, turn setnu-mode on if argument is positive. +-When setnu-mode is enabled, a line number will appear at the left ++ "Toggle `setnu-mode'. ++With prefix argument ARG, turn `setnu-mode' on if argument is positive. ++When `setnu-mode' is enabled, a line number will appear at the left + margin of each line." + (interactive "P") + (let ((oldmode (not (not setnu-mode))) +@@ -85,12 +102,13 @@ + (setnu-mode-on) + (setnu-mode-off))))) + ++;;;###autoload + (defun turn-on-setnu-mode () +- "Turn on setnu-mode. +-Useful for adding to a major-mode hook variable. ++ "Turn on `setnu-mode'. ++Useful for adding to a `major-mode' hook variable. + Example: + (add-hook 'text-mode-hook 'turn-on-setnu-mode) +-to automatically turn on line numbering when enterting text-mode." ++to automatically turn on line numbering when enterting `text-mode'." + (setnu-mode 1)) + + ;;; Internal functions +@@ -148,8 +166,8 @@ + (put-text-property 0 (length g) 'face face g)))) + + (defun setnu-mode-off () +- "Internal shutdown of setnu-mode. +-Deletes the extents associated with setnu-mode." ++ "Internal shutdown of `setnu-mode'. ++Deletes the extents associated with `setnu-mode'." + (if (and setnu-running-under-xemacs + (fboundp 'remove-specifier)) + (remove-specifier left-margin-width (current-buffer))) +@@ -163,11 +181,13 @@ + (setq setnu-start-extent nil)))) + + (defun setnu-mode-on () +- "Internal startup of setnu-mode. +-Sets up the extents associated with setnu-mode." ++ "Internal startup of `setnu-mode'. ++Sets up the extents associated with `setnu-mode'." + (if (and setnu-running-under-xemacs + (fboundp 'set-specifier)) + (set-specifier left-margin-width 6 (current-buffer))) ++ (add-hook 'before-change-functions 'setnu-before-change-function) ++ (add-hook 'after-change-functions 'setnu-after-change-function) + (let ((done nil) + (curr-e nil) + (n 1) +@@ -196,9 +216,9 @@ + (store-match-data match-data)))) + + (defun setnu-before-change-function (start end) +- "Before change function for setnu-mode. ++ "Before change function for `setnu-mode'. + Notices when a delete is about to delete some lines and adjusts +-the line number extents accordingly." ++the line number extents accordingly (betwee START and END)." + (if (or (not setnu-mode) (= start end)) + () ;; not in setnu-mode or this is an insertion + (let ((inhibit-quit t) +@@ -252,9 +272,12 @@ + (store-match-data match-data))))) + + (defun setnu-after-change-function (start end length) +- "After change function for setnu-mode. ++ "After change function for `setnu-mode'. + Notices when an insert has added some lines and adjusts +-the line number extents accordingly." ++the line number extents accordingly. ++Three arguments are passed to an `after-change-function': the positions of ++the START and END of the range of changed text, ++and the LENGTH in bytes of the pre-change text replaced by that range." + (if (or (not setnu-mode) (= start end)) + () ; not in setnu-mode or this is a deletion + (let ((inhibit-quit t) +@@ -331,7 +354,8 @@ + g )))) + + (defun setnu-make-setnu-extent (beg end) +- "Create an extent and set some properties that all setnu extents have." ++ "Create an extent and set some properties that all setnu extents have. ++Extent is between BEG and END." + (let ((e (setnu-make-extent beg end))) + (setnu-set-extent-property e 'setnu t) + ;; (setnu-set-extent-property e 'begin-glyph-layout 'outside-margin) +@@ -389,11 +413,12 @@ + e + nil))) + buf pos pos))) +- (t (error "can't find overlays-in, overlays-at, or map-extents!"))) ++ (t (error "Can't find overlays-in, overlays-at, or map-extents!"))) + + (defun setnu-extent-at-create (pos buf) +- "Like `setnu-extent-at' except if an extent isn't found, then +-it is created based on where the extent failed to be found." ++ "Like `setnu-extent-at' for position POS in buffer BUF. ++If an extent isn't found, then it is created based on where the extent failed ++to be found." + (let ((e (setnu-extent-at pos buf)) ee beg numstr) + (if e + e +@@ -444,5 +469,6 @@ + (setnu-set-extent-begin-glyph e (setnu-number-glyph numstr)) + e )))))) + +-(add-hook 'before-change-functions 'setnu-before-change-function) +-(add-hook 'after-change-functions 'setnu-after-change-function) ++(provide 'setnu) ++ ++;;; setnu.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/50_newsticker_non-fatal_xml.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_newsticker_non-fatal_xml.dpatch @@ -0,0 +1,46 @@ +#!/bin/sh -e +## 50_newsticker_non-fatal_xml.dpatch.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/newsticker.el emacs-goodies-el/elisp/emacs-goodies-el/newsticker.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/newsticker.el 2005-11-05 13:08:14.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/newsticker.el 2005-11-05 13:20:30.000000000 -0500 +@@ -385,7 +385,16 @@ + ;;; Code: + + (require 'derived) +-(require 'xml) ++;; Debian modification: ++;; Woody XEmacs doesn't have xml.el, so conditionnaly require it. ++;; `newsticker' still won't work on woody XEmacs, but it won't make all of ++;; the emacs-goodies-el package uninstallable. ++;; (require 'xml) ++(eval-when-compile ++ (require 'cl)) ++(eval-when (compile load eval) ++ (ignore-errors ++ (require 'xml))) + + ;; Silence warnings + (defvar tool-bar-map) --- emacs-goodies-el-29.4.orig/debian/patches/5_highlight-beyond-fill-column.dpatch +++ emacs-goodies-el-29.4/debian/patches/5_highlight-beyond-fill-column.dpatch @@ -0,0 +1,205 @@ +#!/bin/sh -e +## 5_highlight-beyond-fill-column.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Cleanup parens and create highlight-beyond-fill-column function + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/highlight-beyond-fill-column.el emacs-goodies-el/elisp/emacs-goodies-el/highlight-beyond-fill-column.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/highlight-beyond-fill-column.el 2003-09-19 19:52:15.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/highlight-beyond-fill-column.el 2003-09-20 14:26:58.000000000 -0400 +@@ -1,15 +1,16 @@ +-;;; highlight-beyond-fill-column.el --- font-lock-add-keywords aid for Emacs ++;;; highlight-beyond-fill-column.el --- fontify beyond the fill-column. + + ;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc. ++;; Copyright (C) 2003 Peter S Galbraith + + ;; Author: Sandip Chitale (sandip.chitale@blazesoft.com) + ;; Keywords: programming decipline convenience + + ;; Keywords: + ;; Time-stamp: Aug 23 2001 8:56 PM Pacific Daylight Time +-;; Version: 1.1 ++;; Version: 1.2 + +-;; This file is *NOT* (yet?) part of GNU Emacs. ++;; This file is not part of GNU Emacs. + + ;; 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 +@@ -26,10 +27,11 @@ + ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, + ;; Boston, MA 02111-1307, USA. + +-;; Commentary: +- +-;; This defines a function that can be used by `font-lock-add-keywords' to find the columns +-;; that are beyond `fill-column'. ++;;; Commentary: ++;; ++;; This defines a function that can be used by `font-lock-add-keywords' to ++;; find the columns that are beyond `fill-column'. It does not currently ++;; work in XEmacs because it lacks the funcyom `font-lock-add-keywords'. + ;; + ;; Installation: + ;; Put the following in your .emacs +@@ -38,88 +40,70 @@ + ;; + ;; Example usage: + ;; +-;; Customize the `highlight-beyond-fill-column-in-modes' variable to +-;; setup the list of modes in which to highlight-beyond-fill-column ++;; Enable it on a buffer using `M-x highlight-beyond-fill-column. ++;; You may use that command in a hook (e.g. text-mode-hook) + ;; +-;; Customize the `highlight-beyond-fill-column-face' variable to +-;; to setup the face used for highlight-beyond-fill-column ++;; Customize the `highlight-beyond-fill-column-face' variable to ++;; to setup the face used for highlight-beyond-fill-column + ;; + ;; Acknowledgement: + ;; + ;; This is based on initial code provided by Jim Janney (jjanney@xmission.com) +-;; ++ ++;;; History: ++;; ++;; V1.2 2003-09-12 by Peter S Galbraith ++;; - Made checkdoc clean and fixed indentation and parentheses placement. ++;; - Added defgroup; used defface. ++;; - Removed `highlight-beyond-fill-column-in-modes' since it didn't work ++;; anymore. ++;; - Created `highlight-beyond-fill-column' to use on a single buffer or as ++;; a hook. + + ;;; Code: +-(defcustom highlight-beyond-fill-column-in-modes nil +- "The list of modes in which to highlight-beyond-fill-column." +- :group 'fill +- :type '(repeat string) +- ) ++(defgroup highlight-beyond-fill-column nil ++ "Fontify beyond the fill-column." ++ :group 'fill) + +-(defcustom highlight-beyond-fill-column-face 'underline +- "The face to use with highlight-beyond-fill-column." +- :group 'fill +- :type 'face +- ) ++(defface highlight-beyond-fill-column-face ++ '((t (:underline t))) ++ "Face used to highlight beyond the fill-column." ++ :group 'highlight-current-line) + +-(defun find-after-fill-column (limit) +- "A function that can be used by `font-lock-add-keywords' to find columns that are +-beyond the `fill-column'." +- (let ( +- ; remember the point +- (original-point (point)) +- ) +- ; if already past the fill column start on next line ++(defun highlight-beyond-fill-column-lock (limit) ++ "Function for font-lock to highlight beyond the `fill-column' until LIMIT." ++ (let ((original-point (point))) ;; remember the point ++ ;; if already past the fill column start on next line + (if (> (current-column) fill-column) +- (forward-line 1) +- ) +- (while (and (< (point) limit) ; still within limit +- (or (< (move-to-column fill-column) fill-column) ; the line has less than `fill-column' columns +- (= (point) (line-end-position)) ; end of line +- ) +- ) +- ; goto next line +- (forward-line 1) +- ) ++ (forward-line 1)) ++ (while (and (< (point) limit) ; still within limit ++ ;; the line has less than `fill-column' columns ++ (or (< (move-to-column fill-column) fill-column) ++ (= (point) (line-end-position)))) ; end of line ++ ;; goto next line ++ (forward-line 1)) + +- (if (>= (point) limit) ; beyond limit +- (progn +- (goto-char original-point) ; restore point +- nil ; return nil +- ) +- (set-match-data (list (point-marker) ; set match data +- (progn +- (end-of-line) +- (forward-char) ; this gives the highlight till the end of the window +- (point-marker) +- ) +- ) +- ) +- t) ; return t indicating that the match data was set +- ) +- ) ++ (if (>= (point) limit) ; beyond limit ++ (progn ++ (goto-char original-point) ; restore point ++ nil) ; return nil + +-(defun init-highlight-beyond-fill-column () +- "" +- (let ( +- (modelist highlight-beyond-fill-column-in-modes) +- mode +- ) +- (while modelist +- (setq mode (intern (car modelist))) +- (if (and mode +- (functionp mode)) +- (font-lock-add-keywords mode +- '( +- (find-after-fill-column 0 highlight-beyond-fill-column-face prepend) +- ) +- ) +- ) +- (setq modelist (cdr modelist)) +- ) +- ) +- ) ++ (set-match-data (list (point-marker) ; set match data ++ (progn ++ (end-of-line) ++ (point-marker)))) ++ ;; return t indicating that the match data was set ++ t))) + +-(add-hook 'after-init-hook 'init-highlight-beyond-fill-column) ++;;;###autoload ++(defun highlight-beyond-fill-column () ++ "Setup this buffer to highlight beyond the `fill-column'." ++ (interactive) ++ (font-lock-add-keywords ++ nil ++ '((highlight-beyond-fill-column-lock 0 'highlight-beyond-fill-column-face ++ prepend)))) + + (provide 'highlight-beyond-fill-column) ++ ++;;; highlight-beyond-fill-column.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/52_gnus-BTS_bug218286.dpatch +++ emacs-goodies-el-29.4/debian/patches/52_gnus-BTS_bug218286.dpatch @@ -0,0 +1,66 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 52_gnus-BTS_bug218286.dpatch by +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/debian-el/gnus-BTS.el emacs-goodies-el/elisp/debian-el/gnus-BTS.el +--- emacs-goodies-el~/elisp/debian-el/gnus-BTS.el 2007-09-24 19:17:09.000000000 -0400 ++++ emacs-goodies-el/elisp/debian-el/gnus-BTS.el 2007-09-24 19:23:14.000000000 -0400 +@@ -3,7 +3,6 @@ + ;; Copyright (C) 2001 Andreas Fuchs + + ;; Author: Andreas Fuchs +-;; Maintainer: Andreas Fuchs + ;; Keywords: gnus, Debian, Bug + ;; Status: Works in XEmacs (I think >=21) + ;; Created: 2001-02-07 +@@ -59,6 +58,13 @@ + ;; Wrong regexp part of gnus-dbts-debian-bug-regexp called by + ;; gnus-dbts-buttonize-debian (Closes #363161, #442438). + ;; ++;; 2007-09-24 intrigeri ++;; Peter S Galbraith ++;; ++;; Bug#218286: [Fwd: Re: [gnus-BTS] please make bug numbers in mail ++;; clickable to read them as email. ++;; Introduce `gnus-dbts-read-bugs-as-email' ++;; + ;;; Code: + + +@@ -66,6 +72,12 @@ + + (autoload 'thing-at-point "thingatpt") + ++(defcustom gnus-dbts-read-bugs-as-email nil ++ "If t, highlighted Debian bug numbers' buttons call ++ `debian-bug-get-bug-as-email'; else, `browse-url' is used." ++ :type 'boolean ++ :group 'gnus-BTS) ++ + (defvar gnus-dbts-in-debian-group-p nil) + + (defvar gnus-dbts-in-debian-devel-announce-group-p nil) +@@ -102,6 +114,9 @@ + (defvar gnus-dbts-debian-reassign-regexp + "reassigned from package `\\([^']*\\)' to `\\([^']*\\)'") + ++;; debian-bug-get-bug-as-email autoload ++(require 'debian-el-loaddefs) ++ + (defun gnus-dbts-browse-debpkg-or-bug (thing) + (interactive "i") + (let* ((the-thing (if (null thing) +@@ -118,7 +133,9 @@ + (concat + "http://cgi.debian.org/cgi-bin/search_packages.pl" + "?&searchon=names&version=all&release=all&keywords=")))) +- (browse-url (concat url bug-or-feature)))) ++ (if (and bugp gnus-dbts-read-bugs-as-email) ++ (debian-bug-get-bug-as-email bug-or-feature) ++ (browse-url (concat url bug-or-feature))))) + + (defun gnus-dbts-buttonize-debian (regexp num predicate) + (add-to-list 'gnus-button-alist --- emacs-goodies-el-29.4.orig/debian/patches/51_gnus-pers.dpatch +++ emacs-goodies-el-29.4/debian/patches/51_gnus-pers.dpatch @@ -0,0 +1,36 @@ +#!/bin/sh -e +## 51_gnus-pers.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Make sure we're in mail header (See bug #240212) + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2004-08-16 20:49:16.000000000 -0400 ++++ emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2004-08-16 20:51:59.000000000 -0400 +@@ -474,6 +474,7 @@ + ;Let's do From: first. + (if (and from (not (equal from ""))) + (progn ++ (goto-char (point-min)) ;Make sure we're in the header + (let ((endpos (search-forward mail-header-separator))) + (goto-char (point-min)) + (if (re-search-forward "^From:" endpos t) --- emacs-goodies-el-29.4.orig/debian/patches/51_gnus-BTS_bug363161.dpatch +++ emacs-goodies-el-29.4/debian/patches/51_gnus-BTS_bug363161.dpatch @@ -0,0 +1,40 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 51_gnus-BTS_bug363161.dpatch by +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/debian-el/gnus-BTS.el emacs-goodies-el/elisp/debian-el/gnus-BTS.el +--- emacs-goodies-el~/elisp/debian-el/gnus-BTS.el 2007-09-18 21:19:47.000000000 -0400 ++++ emacs-goodies-el/elisp/debian-el/gnus-BTS.el 2007-09-18 21:20:47.000000000 -0400 +@@ -53,6 +53,11 @@ + ;; 2005-09-19 Peter S Galbraith + ;; + ;; Minor bug fix: gnus-dbts-gnus-install missing brackets. ++;; ++;; 2007-09-17 Peter S Galbraith ++;; ++;; Wrong regexp part of gnus-dbts-debian-bug-regexp called by ++;; gnus-dbts-buttonize-debian (Closes #363161, #442438). + ;; + ;;; Code: + +@@ -97,8 +102,6 @@ + (defvar gnus-dbts-debian-reassign-regexp + "reassigned from package `\\([^']*\\)' to `\\([^']*\\)'") + +-(defvar gnus-dbts-debian-bug-regexp "^ *\\([0-9]+\\)") +- + (defun gnus-dbts-browse-debpkg-or-bug (thing) + (interactive "i") + (let* ((the-thing (if (null thing) +@@ -130,7 +133,7 @@ + 'gnus-dbts-in-debian-group-p) + (gnus-dbts-buttonize-debian gnus-dbts-debian-reassign-or-merge-regexp 3 + 'gnus-dbts-in-debian-group-p) +- (gnus-dbts-buttonize-debian gnus-dbts-debian-bug-regexp 1 ++ (gnus-dbts-buttonize-debian gnus-dbts-debian-bug-regexp 3 + 'gnus-dbts-in-debian-devel-announce-group-p) + (gnus-dbts-buttonize-debian gnus-dbts-debian-reassign-regexp 1 + 'gnus-dbts-in-debian-group-p) --- emacs-goodies-el-29.4.orig/debian/patches/1_home-end-xemacs.dpatch +++ emacs-goodies-el-29.4/debian/patches/1_home-end-xemacs.dpatch @@ -0,0 +1,45 @@ +#! /bin/sh -e +## 1_newpatch.dpatch by Roland Mas +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: home-end.el: Xemacs compatibility + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi +case "$1" in + -patch) patch -f --no-backup-if-mismatch -p1 < $0;; + -unpatch) patch -f --no-backup-if-mismatch -R -p1 < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +diff -urNad 1.tmp/elisp/home-end.el 1/elisp/home-end.el +--- 1.tmp/elisp//emacs-goodies-el/home-end.el 2003-01-05 17:10:41.000000000 +0100 ++++ 1/elisp//emacs-goodies-el/home-end.el 2003-01-05 17:21:41.000000000 +0100 +@@ -50,8 +50,8 @@ + (key1 (if (> len 0) (elt keys (- len 1)) nil)) + (key2 (if (> len 1) (elt keys (- len 2)) nil)) + (key3 (if (> len 2) (elt keys (- len 3)) nil)) +- (key-equal-1 (eq key1 key2)) +- (key-equal-2 (and key-equal-1 (eq key2 key3)))) ++ (key-equal-1 (equal key1 key2)) ++ (key-equal-2 (and key-equal-1 (equal key2 key3)))) + (cond (key-equal-2 (goto-char (point-min))) + (key-equal-1 (push-mark home-end-marker) + (move-to-window-line 0)) +@@ -71,8 +71,8 @@ + (key1 (if (> len 0) (elt keys (- len 1)) nil)) + (key2 (if (> len 1) (elt keys (- len 2)) nil)) + (key3 (if (> len 2) (elt keys (- len 3)) nil)) +- (key-equal-1 (eq key1 key2)) +- (key-equal-2 (and key-equal-1 (eq key2 key3)))) ++ (key-equal-1 (equal key1 key2)) ++ (key-equal-2 (and key-equal-1 (equal key2 key3)))) + (cond (key-equal-2 (goto-char (point-max))) + (key-equal-1 (push-mark home-end-marker) + (move-to-window-line -1) --- emacs-goodies-el-29.4.orig/debian/patches/53_todoo_bug438964.dpatch +++ emacs-goodies-el-29.4/debian/patches/53_todoo_bug438964.dpatch @@ -0,0 +1,55 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 53_todoo_bug438964.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/todoo.el emacs-goodies-el/elisp/emacs-goodies-el/todoo.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/todoo.el 2007-10-23 20:27:08.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/todoo.el 2007-10-23 20:27:56.000000000 -0400 +@@ -57,6 +57,12 @@ + + ;;; ChangeLog: + ++;; 2007-08-29 Peter S Galbraith ++ ++;; outline-font-lock-level is void, so define a similar one to historical ++;; version from outline.el. Call it todoo-outline-font-lock-level. ++;; (Closes #438964) ++ + ;; 2007-05-14 Peter S Galbraith + ;; Comment out clobbering of outline-mode-menu-bar-map key entries. + ;; This is far too aggressive. A much better fix would be to undefine the +@@ -389,11 +395,21 @@ + (backward-char)) + + ++(defun todoo-outline-font-lock-level () ++ (let ((count 1)) ++ (save-excursion ++ (outline-back-to-heading t) ++ (while (and (not (bobp)) ++ (not (eq (funcall outline-level) 1))) ++ (outline-up-heading 1) ++ (setq count (1+ count))) ++ count))) ++ + (defun todoo-insert-sub-item () + "Insert a new todoo-sub-item." + (interactive) + (goto-char (- (todoo-item-end) 1)) +- (insert (concat "\n" (make-string (* (- (outline-font-lock-level) 2) ++ (insert (concat "\n" (make-string (* (- (todoo-outline-font-lock-level) 2) + todoo-indent-column) ? ) + todoo-sub-item-marker " \n")) + (backward-char)) +@@ -404,7 +420,7 @@ + (interactive) + (beginning-of-line) + +- (let ((indent-column (* (- (outline-font-lock-level) 1) ++ (let ((indent-column (* (- (todoo-outline-font-lock-level) 1) + todoo-indent-column))) + (if (eq (point) (point-at-eol)) + (insert (make-string indent-column ? ))) --- emacs-goodies-el-29.4.orig/debian/patches/51_perl-doc-rewrite.dpatch +++ emacs-goodies-el-29.4/debian/patches/51_perl-doc-rewrite.dpatch @@ -0,0 +1,493 @@ +#!/bin/sh -e +## debian/patches/51_perl-doc-rewrite.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad --exclude=CVS --exclude=.svn ./elisp/emacs-goodies-el/perldoc.el /tmp/dpep-work.pvmL7o/emacs-goodies-el/elisp/emacs-goodies-el/perldoc.el +--- ./elisp/emacs-goodies-el/perldoc.el 2005-09-15 21:39:09.000000000 -0400 ++++ /tmp/dpep-work.pvmL7o/emacs-goodies-el/elisp/emacs-goodies-el/perldoc.el 2005-09-15 21:44:16.000000000 -0400 +@@ -2,7 +2,7 @@ + + ;; + ;; Copyright (C) 2000-2002 Steve Kemp +-;; ++;; Copyright (C) 2003, 2005 Peter S Galbraith + + ;; This file is not part of GNU Emacs. + +@@ -24,16 +24,14 @@ + ;;; Commentary: + ;; + +-;; This package allows the user to view the Perl help for the +-;; word(s) at the point. +-;; +-;; When this is loaded it adds a hook both `cperl-mode', and +-;; `perl-mode', allowing the perldoc help to be shown for the +-;; thing under the point, by pressing F1. ++;; This package allows the user to view the Perl help for the word(s) at ++;; the point. + ;; +-;; The code handles functions, builtins, and third party +-;; modules. ++;; When this is loaded it adds a hook both `cperl-mode', and `perl-mode', ++;; allowing the perldoc help to be shown for the thing under the point, by ++;; pressing F1. + ;; ++;; The code handles functions, builtins, and third party modules. + + ;;; Version History + ;; +@@ -41,256 +39,98 @@ + ;; 1.1 - Show error message when no help is found. + ;; - Fix name. + ;; - Include GPL + URL. +-;; 1.2 - Alan Shutko ++;; 1.2 Alan Shutko + ;; perldoc runs a pager, so run a benign one. See Debian bug + ;; http://bugs.debian.org/144963 +- +-;;; Source +-;; +-;; The latest version of this file should be accessable from: +-;; +-;; http://GNUSoftware.com/Emacs/Lisp/perldoc.el ++;; 1.3 Peter S Galbraith ++;; - Checkdoc clean. ++;; - Generate list of functions on the fly instead of using a ++;; hardwired list. ++;; - ToDo? Allow completion on module names, harvested from all .pod ++;; file under directories in @INC. ++;; 1.4 Peter S Galbraith ++;; - Handle case where Debian perldoc package is not installed. ++;; Thanks to Kevin Ryde for the full bug report. + ;; ++;; 1.5 Peter S Galbraith ++;; - Apply patch from Kevin Ryde (Closes: #314869) ++ ++ + ;; Comments / suggests / feedback welcomed to skx@tardis.ed.ac.uk + ++;;; Code: + + (require 'thingatpt) + + (autoload 'Man-fontify-manpage "man") + +-(defvar perldoc-functions +- (list +- "-X" +- "abs" +- "accept" +- "alarm" +- "atan2" +- "bind" +- "binmode" +- "bless" +- "caller" +- "chdir" +- "chmod" +- "chomp" +- "chop" +- "chown" +- "chr" +- "chroot" +- "close" +- "closedir" +- "connect" +- "continue" +- "cos" +- "crypt" +- "dbmclose" +- "dbmopen" +- "defined" +- "delete" +- "die" +- "do" +- "dump" +- "each" +- "endgrent" +- "endhostent" +- "endnetent" +- "endprotoent" +- "endpwent" +- "endservent" +- "eof" +- "eval" +- "ex" +- "exec" +- "exists" +- "exit" +- "exp" +- "fcntl" +- "fileno" +- "flock" +- "fork" +- "format" +- "formline" +- "getc" +- "getgrent" +- "getgrgid" +- "getgrnam" +- "gethostbyaddr" +- "gethostbyname" +- "gethostent" +- "getlogin" +- "getnetbyaddr" +- "getnetbyname" +- "getnetent" +- "getpeername" +- "getpgrp" +- "getppid" +- "getpriority" +- "getprotobyname" +- "getprotobynumber" +- "getprotoent" +- "getpwent" +- "getpwnam" +- "getpwuid" +- "getservbyname" +- "getservbyport" +- "getservent" +- "getsockname" +- "getsockopt" +- "glob" +- "gmtime" +- "goto" +- "grep" +- "hex" +- "import" +- "index" +- "int" +- "ioctl" +- "join" +- "keys" +- "kill" +- "last" +- "lc" +- "lcfirst" +- "length" +- "link" +- "listen" +- "local" +- "localtime" +- "log" +- "lstat" +- "map" +- "mkdir" +- "msgctl" +- "msgget" +- "msgrcv" +- "msgsnd" +- "my" +- "next" +- "no" +- "oct" +- "open" +- "opendir" +- "ord" +- "pack" +- "package" +- "pipe" +- "pop" +- "pos" +- "print" +- "printf" +- "prototype" +- "push" +- "qr" +- "quotemeta" +- "qw" +- "qx" +- "rand" +- "read" +- "readdir" +- "readline" +- "readlink" +- "readpipe" +- "recv" +- "redo" +- "ref" +- "rename" +- "require" +- "reset" +- "return" +- "reverse" +- "rewinddir" +- "rindex" +- "rmdir" +- "scalar" +- "seek" +- "seekdir" +- "select" +- "semctl" +- "semget" +- "semop" +- "send" +- "setgrent" +- "sethostent" +- "setnetent" +- "setpgrp" +- "setpriority" +- "setprotoent" +- "setpwent" +- "setservent" +- "setsockopt" +- "shift" +- "shmctl" +- "shmget" +- "shmread" +- "shmwrite" +- "shutdown" +- "sin" +- "sleep" +- "socket" +- "socketpair" +- "sort" +- "splice" +- "split" +- "sprintf" +- "sqrt" +- "srand" +- "stat" +- "study" +- "sub" +- "substr" +- "symlink" +- "syscall" +- "sysopen" +- "sysread" +- "sysseek" +- "system" +- "syswrite" +- "tell" +- "telldir" +- "tie" +- "tied" +- "time" +- "times" +- "times" +- "truncate" +- "uc" +- "ucfirst" +- "umask" +- "undef" +- "unlink" +- "unpack" +- "unshift" +- "untie" +- "use" +- "utime" +- "values" +- "vec" +- "wait" +- "waitpid" +- "wantarray" +- "warn" +- "write" +- ) +- "Perl function names." +- ) ++(defgroup perldoc nil ++ "Show help for Perl functions, builtins, and modules." ++ :group 'help) + ++(defcustom perldoc-define-F1 nil ++ "If non-nil, bind [F1] to `perl-doc-at-point' in perl modes. ++It installs `perldoc-perl-hook' in Perl mode hooks." ++ :type 'boolean ++ :group 'perldoc ++ :require 'perldoc ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (cond ++ (value ++ (add-hook 'cperl-mode-hook 'perldoc-perl-hook) ++ (add-hook 'perl-mode-hook 'perldoc-perl-hook)) ++ (t ++ (remove-hook 'cperl-mode-hook 'perldoc-perl-hook) ++ (remove-hook 'perl-mode-hook 'perldoc-perl-hook))))) + +-(defun perldoc ( string ) +- "Run perldoc on the given string. +-If the string is a recognised function then we cann call `perldoc-function', +-otherwise we call `perldoc-module'." +- (interactive "s:Perl function / module: " ) +- (let ((functions perldoc-functions) +- (found nil )) +- (while (and (car functions) (not found)) +- (if (equal string (car functions)) +- (progn +- (perldoc-function string) +- (setq found t))) +- (setq functions (cdr functions))) +- (if (not found) +- (perldoc-module string))) +-) ++(defvar perldoc-functions-alist nil ++ "Alist holding the list of perl functions.") ++ ++(defun perldoc-functions-alist () ++ "Return the alist of perl functions constructed from perlfunc.pod." ++ (if perldoc-functions-alist ++ perldoc-functions-alist ++ (setq perldoc-functions-alist nil) ++ (let ((tmp-buffer (get-buffer-create " *perldoc*")) ++ (case-fold-search nil)) ++ (set-buffer tmp-buffer) ++ (erase-buffer) ++ (shell-command "perldoc -u perlfunc" t) ++ (goto-char (point-min)) ++ (cond ++ ((search-forward "Alphabetical Listing of Perl Functions" nil t) ++ (while (re-search-forward ++ "^=item \\(\\([a-z][^ //\n]*\\)\\|\\(I<\\(.*\\)> \\)\\)" nil t) ++ (let ((entry (list (or (match-string 2)(match-string 4))))) ++ (when (not (member entry perldoc-functions-alist)) ++ (push entry perldoc-functions-alist)))) ++ ;; no output means the perldoc program doesn't exist or is only the ++ ;; debian perl package dummy script ++ (unless perldoc-functions-alist ++ (error "`perldoc' program not available")) ++ perldoc-functions-alist) ++ ((re-search-forward "You need to install.*" nil t) ++ (error (format "%s" (match-string 0)))) ++ (t ++ (error "`perldoc' program not available")))))) + ++;;;###autoload ++(defun perldoc (string) ++ "Run perldoc on the given STRING. ++If the string is a recognised function then we can call `perldoc-function', ++otherwise we call `perldoc-module'." ++ (interactive (list (completing-read "Perl function or module: " ++ (perldoc-functions-alist) nil nil))) ++ (perldoc-functions-alist) ++ (cond ++ ((assoc string perldoc-functions-alist) ++ (perldoc-function string)) ++ ((stringp string) ++ (perldoc-module string)) ++ (t ++ (message "Nothing to find.")))) ++ + (defun perldoc-start-process (&rest args) + "Call perldoc with ARGS. + Sets up process sentinals and needed environment to call perldoc." +@@ -298,10 +138,10 @@ + "type" + "cat")) + (perldoc-process) +- (process-environment ++ (process-environment + (cons (concat "PERLDOC_PAGER=" pager) + process-environment))) +- ;; Can't convince perldoc not to run a pager, so we run a ++ ;; Can't convince perldoc not to run a pager, so we run a + ;; benign one + (set-buffer (get-buffer-create "*Perldoc*")) + (kill-all-local-variables) +@@ -314,56 +154,50 @@ + (process-kill-without-query perldoc-process))) + + +-(defun perldoc-function( function ) +- "Show the help text for the given Perl function / builtin." +- (interactive "sPerl function / builtin / module : ") +- (perldoc-start-process "perldol" nil "perldoc" "-f" function)) ++(defun perldoc-function (function) ++ "Show the help text for the given Perl FUNCTION / builtin." ++ (interactive (list (completing-read "Perl function: " ++ (perldoc-functions-alist) nil t))) ++ (perldoc-start-process "perldol" nil "perldoc" "-f" function)) + +-(defun perldoc-module( module ) +- "Show the help text for the given Perl module." ++(defun perldoc-module (module) ++ "Show the help text for the given Perl MODULE." + (interactive "sPerl module : ") + (perldoc-start-process "perldol" nil "perldoc" module)) + +- + (defun perldoc-process-filter (proc string) +- "Process the results from the catdoc process." ++ "Process the results from the catdoc process PROC, inserting STRING." + (set-buffer (get-buffer-create "*Perldoc*")) + (insert string)) + + (defun perldoc-sentinel (proc msg) +- "When the catdoc process has finished, switch to its output buffer, +- and rename it appropriately." ++ "Perldoc sentinel for process PROC and MSG describing the change. ++When the catdoc process has finished, switch to its output buffer." + (cond ((eq (process-status proc) 'exit) + (set-buffer "*Perldoc*") +- (if (< (count-lines (point-min) (point-max)) 2) +- (progn +- (message "No perldoc help found.") +- (kill-buffer (get-buffer "*Perldoc*"))) ++ (goto-char (point-min)) ++ (cond ++ ((and (< (count-lines (point-min) (point-max)) 2) ++ (re-search-forward "No documentation found for .*" nil t)) ++ (message (match-string 0)) ++ (kill-buffer (get-buffer "*Perldoc*"))) ++ (t + (pop-to-buffer "*Perldoc*") + (goto-char (point-min)) + (let ((Man-args "perldoc")) +- (Man-fontify-manpage)))))) +- ++ (Man-fontify-manpage))))))) + +-(defun perldoc-cperl-hook () +- "A hook which binds F1 to `perldoc'." +- (local-set-key [f1] '(lambda () +- (interactive) +- (perldoc (thing-at-point 'filename))) +- ) +-) ++;;;###autoload ++(defun perldoc-at-point () ++ "Call `perldoc' for string at point." ++ (interactive) ++ (perldoc (or (thing-at-point 'word) ++ (thing-at-point 'filename)))) + ++;;;###autoload + (defun perldoc-perl-hook () +- "A hook which binds F1 to `perldoc'." +- (local-set-key [f1] '(lambda () +- (interactive) +- (perldoc (thing-at-point 'filename))) +- ) +-) +- +-(add-hook 'cperl-mode-hook 'perldoc-cperl-hook) +-(add-hook 'perl-mode-hook 'perldoc-perl-hook) ++ "A hook which binds F1 to `perldoc-at-point'." ++ (local-set-key [f1] 'perldoc-at-point)) + + (provide 'perldoc) +- + ;;; perldoc.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/50_gnus-pers.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_gnus-pers.dpatch @@ -0,0 +1,173 @@ +#!/bin/sh -e +## 50_gnus-pers.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2004-01-15 16:48:11.000000000 -0500 ++++ emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2004-01-28 19:46:16.000000000 -0500 +@@ -1,4 +1,4 @@ +-;;; gnus-pers.el --- an alternative to gnus-posting-styles ++;;; gnus-pers.el --- implements personalities for gnus Message mode + ;; Copyright (C) 1999 BrYan P. Johnson + + ;; Author: BrYan P. Johnson +@@ -20,14 +20,28 @@ + + ;;; Commentary: + +-;; in your .gnus file: +- +-;; (require 'gnus-pers) +-;; (gnus-personality-init) ++;; gnus-pers implements personalities for Message mode. ++;; ++;; It allows you to define a personality with any e-mail address, extra ++;; headers and signature you like, either as strings, functions or variables ++;; (signatures may also be files). Then it will chose a personality for you ++;; based on header info, gnus-newsgroup-name or group ++;; parameter. Additionally, you can change a personality in the middle of ++;; writing a message. This is intended to be an alternative to ++;; gnus-posting-styles, which only sets personalities (posting styles) based ++;; on which group you are in. Also, gnus-posting-styles must be defined by ++;; editing a your .gnus whereas gnus-pers uses Xemacs customize facility. + +-;; Then just M-x customize Personality ++;; To use, add this to your .gnus file: ++;; ++;; (require 'gnus-pers) ++;; (gnus-personality-init) ++;; ++;; Then setup and customize with: ++;; ++;; M-x customize-group Personality' + +-; History: ++;;; History: + + ; 1.0 + ; + Added check for personality group parameter. Use it to designate a +@@ -49,6 +63,12 @@ + ; + Stole message-insert-signature and changed a tad to fix the extra newline in signature when switching personalities bug. see gnus-pers-insert-signature + ; + Added ability to use gnus-newsgroup-name as an electric criteria. + ++; 1.2 Peter S. Galbraith ++; + Use functionp instead of message-functionp since gnus no longer defines it. ++; + Copy replace-in-string from XEmacs, name it ++; `gnus-personalities-replace-in-string' after removing the calls to ++; check-argument-type. This was listed in the Todo list. ++ + ;Todo: + ; + redo x-tra headers to be a repeat list of two parts, header name + ; and header data. Then allow either to be a function. +@@ -57,23 +77,6 @@ + ; + BBDB integration + ; + Have from and extra headers possibly be files as well. + ; + Electric rescan buffer +-; + maybe fix replace-in-string call. +-;From: Christoph Conrad +-; BrYan> `replace-in-string' is a compiled Lisp function +-; BrYan> -- loaded from +-; BrYan> "/usr/src/bs/BUILD/xemacs-21.1.2/building/i386-linux/lisp/subr.elc" +- +- +-; BrYan> Hrm. I don't use emacs, don't think I even have it +-; BrYan> installed. I'll poke around and see if there's something +-; BrYan> similar in emacs. +- +-;I didn't found anything similiar, so i took the original function and +-;eliminated the two first statements with +- +-;;;; (check-argument-type 'stringp str) +-;;;; (check-argument-type 'stringp newtext) +- + + ;;; Code: + +@@ -303,6 +306,39 @@ + + (define-key message-mode-map "\C-c\C-p" 'gnus-personality-choose) + ++(defun gnus-personality-replace-in-string (str regexp newtext &optional literal) ++ "Replace all matches in STR for REGEXP with NEWTEXT string, ++ and returns the new string. ++Optional LITERAL non-nil means do a literal replacement. ++Otherwise treat `\\' in NEWTEXT as special: ++ `\\&' in NEWTEXT means substitute original matched text. ++ `\\N' means substitute what matched the Nth `\\(...\\)'. ++ If Nth parens didn't match, substitute nothing. ++ `\\\\' means insert one `\\'. ++ `\\u' means upcase the next character. ++ `\\l' means downcase the next character. ++ `\\U' means begin upcasing all following characters. ++ `\\L' means begin downcasing all following characters. ++ `\\E' means terminate the effect of any `\\U' or `\\L'. ++ ++This is mostly copied from XEmacs' replace-in-string because Emacs doesn't ++have that function." ++ (if (> (length str) 50) ++ (let ((cfs case-fold-search)) ++ (with-temp-buffer ++ (setq case-fold-search cfs) ++ (insert str) ++ (goto-char 1) ++ (while (re-search-forward regexp nil t) ++ (replace-match newtext t literal)) ++ (buffer-string))) ++ (let ((start 0) newstr) ++ (while (string-match regexp str start) ++ (setq newstr (replace-match newtext t literal str) ++ start (+ (match-end 0) (- (length newstr) (length str))) ++ str newstr)) ++ str))) ++ + (defun gnus-personality-use (&optional personality) + "Use a personality defined in gnus-personalities." + (interactive) +@@ -470,7 +506,7 @@ + (message-goto-cc) ;; Yes, yes. This inserts a Cc: if there's nothing there. No worries. + (beginning-of-line) + (let ((beg (point)) +- (email (replace-in-string from "\"" ""))) ++ (email (gnus-personality-replace-in-string from "\"" ""))) + (end-of-line) + (narrow-to-region beg (point)) + (goto-char (point-min)) +@@ -618,7 +654,7 @@ + (message-goto-cc) ;; Yes, yes. This inserts a Cc: if there's nothing there. No worries. + (beginning-of-line) + (let ((beg (point)) +- (email (replace-in-string from "\"" ""))) ++ (email (gnus-personality-replace-in-string from "\"" ""))) + (end-of-line) + (narrow-to-region beg (point)) + (goto-char (point-min)) +@@ -698,7 +734,7 @@ + ((and (null message-signature) + force) + t) +- ((message-functionp message-signature) ++ ((functionp message-signature) + (funcall message-signature)) + ((listp message-signature) + (eval message-signature)) --- emacs-goodies-el-29.4.orig/debian/patches/50_silly-mail.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_silly-mail.dpatch @@ -0,0 +1,1105 @@ +#!/bin/sh -e +## 50_silly-mail.dpatch.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add custom support. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/silly-mail.el emacs-goodies-el/elisp/emacs-goodies-el/silly-mail.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/silly-mail.el 2003-04-04 15:16:10.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/silly-mail.el 2007-08-08 19:36:46.000000000 -0400 +@@ -28,42 +28,122 @@ + + ;;; Commentary: + +-;; To use this, put the following in your .emacs: ++;; To use this, invoke `M-x sm-add-random-header' from a mail composition ++;; buffer to insert a random header. You may call the command again to ++;; substitute the inserted header by another. ++;; ++;; Use 'M-x sm-delete-last-header' to remove it. ++;; ++;; If you wish all mail messages to have a randomly chosen header, put the ++;; following in your .emacs: + ;; + ;; (autoload 'sm-add-random-header "silly-mail" nil t) + ;; (add-hook 'mail-setup-hook 'sm-add-random-header) ++;; (add-hook 'mh-letter-mode-hook 'sm-add-random-header) ++;; ++;; or alternatively customize the variable `sm-add-ramdom-header-to-mail'. ++;; ++;; To setup menu-bar entries in sendmail and MH-E menus, customize the ++;; variable `sm-add-menu-bar-entries'. This has the disadvantage of ++;; loading this library at Emacs startup, so might not be a good choice if ++;; you rarely use silly-mail. ++;; ++;; You may customize silly-mail using `M-x customize-group [RET] silly-mail'. ++;; The following are customizable: ++;; ++;; - The list of header types used in the random selection by ++;; `sm-add-random-header' ++;; - Individual quotes may be disabled from the pool if some are offensive ++;; to you. ++;; - Whether all headers use an "X-" prefix or not. + + ;; I solicit more randomly generated headers commands. + + ;; Some of the options in this program require some external packages which +-;; are not a standard part of emacs, e.g. shop.el and flame.el (flame.el is ++;; are not a standard part of Emacs, e.g. shop.el and flame.el (flame.el is + ;; present in XEmacs and Emacs 18, but missing from Emacs 19). These are + ;; available from http://www.splode.com/users/friedman/software/emacs-lisp/ + ++;;; History: ++;; ++;; 2003-11-25 Peter S Galbraith ++;; ++;; - Added custom support. I had to change quote variables from vectors ++;; to lists to use the `set' custom type, but this had no impact on the ++;; code. I also had to change the format of the `sm-mail-header-table' ++;; variable (leading to a minor change in `sm-use-header-function-p'). ++;; The variable `sm-mail-header-table' is not generated when the variable ++;; `sm-mail-header-used' customization is set. ++;; - Made `sm-add-random-header' replace the inserted header if called a ++;; second time. ++;; - Added `sm-delete-last-header'. ++;; - Added optional "X-" prefix for those headers that didn't have them. ++;; - Added custom variables `sm-add-ramdom-header-to-mail' and ++;; `sm-add-menu-bar-entries' ++ + ;;; Code: + +-(require 'sendmail) ++;; Try without requiring sendmail, as byte-compilations fails if ++;; /usr/bin/mail doesn't exist (Closes: #434104) ++;; ++;;(require 'sendmail) ++ ++(defgroup silly-mail nil ++ "Generate bozotic mail headers." ++ :group 'mail ++ :group 'mh ++ :group 'sendmail) ++ ++(defcustom sm-add-ramdom-header-to-mail nil ++ "Setup sendmail and MH-E to call `sm-add-random-header' automatically." ++ :type 'boolean ++ :require 'silly-mail ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (cond ++ (value ++ (add-hook 'mail-setup-hook 'sm-add-random-header) ++ (add-hook 'mh-letter-mode-hook 'sm-add-random-header)) ++ (t ++ (remove-hook 'mail-setup-hook 'sm-add-random-header) ++ (remove-hook 'mh-letter-mode-hook 'sm-add-random-header)))) ++ :group 'silly-mail) ++ ++(defvar mail-mode-map) ++(defvar mh-letter-mode-map) ++(defcustom sm-add-menu-bar-entries nil ++ "Setup silly-mail menu-bar entries in MH-E and sendmail." ++ :type 'boolean ++ :require 'silly-mail ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (when value ++ (easy-menu-define sm-menu-map nil "silly-mail mh-letter menu" ++ '("Silly Mail" ++ ["Add Random Header" sm-add-random-header] ++ ["Delete Last Header" sm-delete-last-header])) ++ ++ (eval-after-load "sendmail" ++ '(easy-menu-add-item mail-mode-map '("menu-bar" "headers") ++ sm-menu-map)) ++ (eval-after-load "mh-comp" ++ '(easy-menu-add-item mh-letter-mode-map '("menu-bar" "Letter") ++ sm-menu-map)))) ++ :group 'silly-mail) ++ ++(defcustom sm-always-X-prefix nil ++ "Whether to use \"X-\" prefix in all silly-mail headers. ++This affects headers Emacs, Microsoft and Tomato." ++ :type 'boolean ++ :group 'silly-mail) + + (random t) + +-(defvar sm-mail-header-table +- '(sm-add-antipastobozoticataclysm +- (sm-add-at&t-hype youwill "youwill") +- sm-add-drdoom-fodder +- sm-add-emacs-name +- sm-add-emacs-taunt +- (sm-add-flame *flame "flame") +- (sm-add-horoscope horoscope "horoscope") +- (sm-add-kibology kibologize "kibologize") +- sm-add-meat +- sm-add-microsoft +- sm-add-nsa-fodder +- (sm-add-shopping-list shop-string "shop") +- sm-add-tom-swifty +- sm-add-tomato +- (sm-add-uboat-death-message uboat-death-message "uboat") +- sm-add-x-taunt +- sm-add-zippy-quote) ++(defvar sm-header-last-inserted nil ++ "Last header field inserted by silly-mail, such that it can be undone.") ++(make-variable-buffer-local 'sm-header-last-inserted) ++ ++(defvar sm-mail-header-table nil + "List of routines which generate silly mail headers. + Each element is either a symbol or a list. + If an element is a function, that function can be called. +@@ -72,25 +152,103 @@ + 2. A symbol naming a function required by the header-generator. + If this function is not defined, the header-generator cannot run. + 3. The name of a library to load if the required function isn't defined. +- If the load fails, or if `sm-load-missing-libraries' is `nil', +- the corresponding header-generator function won't be used.") ++ If the load fails, or if `sm-load-missing-libraries' is nil, ++ the corresponding header-generator function won't be used. + +-(defvar sm-load-missing-libraries t +- "*If non-`nil', load missing libraries for header functions. ++This variable is set via `sm-mail-header-used' customization.") ++ ++(defvar sm-mail-header-translation ++ '(("X-Antipastobozoticataclysm" sm-add-antipastobozoticataclysm) ++ ("X-AT&T-Hype" sm-add-at&t-hype youwill "youwill") ++ ("X-Drdoom-Fodder" sm-add-drdoom-fodder) ++ ("X-Emacs-Acronym" sm-add-emacs-name) ++ ("(X-)Emacs" sm-add-emacs-taunt) ++ ("X-Flame" sm-add-flame *flame "flame") ++ ("X-Horoscope" sm-add-horoscope horoscope "horoscope") ++ ("X-Kibo-Says" sm-add-kibology kibologize "kibologize") ++ ("X-Meat" sm-add-meat) ++ ("(X-)Microsoft" sm-add-microsoft) ++ ("X-NSA-Fodder" sm-add-nsa-fodder) ++ ("X-Shopping-List" sm-add-shopping-list shop-string "shop") ++ ("X-Tom-Swifty" sm-add-tom-swifty) ++ ("(X-)Tomato" sm-add-tomato) ++ ("X-Uboat-Death-Message" ++ sm-add-uboat-death-message uboat-death-message "uboat") ++ ("X-Windows" sm-add-x-taunt) ++ ("X-Zippy-Says" sm-add-zippy-quote))) ++ ++(defcustom sm-mail-header-used ++ '("X-Antipastobozoticataclysm" ++ "X-AT&T-Hype" ++ "X-Drdoom-Fodder" ++ "X-Emacs-Acronym" ++ "(X-)Emacs" ++ "X-Flame" ++ "X-Horoscope" ++ "X-Kibo-Says" ++ "X-Meat" ++ "(X-)Microsoft" ++ "X-NSA-Fodder" ++ "X-Shopping-List" ++ "X-Tom-Swifty" ++ "(X-)Tomato" ++ "X-Uboat-Death-Message" ++ "X-Windows" ++ "X-Zippy-Says") ++ "Header fields used ramdomly in silly-mail." ++ :type `(set ++ (const "X-Antipastobozoticataclysm") ++ (const "X-AT&T-Hype") ++ (const "X-Drdoom-Fodder") ++ (const "X-Emacs-Acronym") ++ (const "(X-)Emacs") ++ (const "X-Flame") ++ (const "X-Horoscope") ++ (const "X-Kibo-Says") ++ (const "X-Meat") ++ (const "(X-)Microsoft") ++ (const "X-NSA-Fodder") ++ (const "X-Shopping-List") ++ (const "X-Tom-Swifty") ++ (const "(X-)Tomato") ++ (const "X-Uboat-Death-Message") ++ (const "X-Windows") ++ (const "X-Zippy-Says")) ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (setq sm-mail-header-table nil) ++ (when value ++ (let ((the-list value)) ++ (while the-list ++ (let ((item (car the-list))) ++ (setq sm-mail-header-table ++ (append ++ sm-mail-header-table ++ (list (cdr (assoc item sm-mail-header-translation))))) ++ (setq the-list (cdr the-list))))))) ++ :group 'silly-mail) ++ ++(defcustom sm-load-missing-libraries nil ++ "*If non-nil, load missing libraries for header functions. + If nil, then if a library is not already loaded, the dependent +-header-generating function will not be used.") ++header-generating function will not be used." ++ :type 'boolean ++ :group 'silly-mail) + + ;;;###autoload + (defun sm-add-random-header () + "Insert a random silly mail header. +-The choice of available headers is taken from sm-mail-header-table." ++The choice of available headers is taken from `sm-mail-header-table'. ++If a random header was already inserted, it it removed in favor of a new one." + (interactive) ++ (if sm-header-last-inserted ++ (sm-delete-last-header)) + (funcall (sm-random-header-function))) + + ;;;###autoload + (defun sm-add-all-headers () + "Insert one of every kind of silly mail header defined. +-The choice of available headers is taken from sm-mail-header-table." ++The choice of available headers is taken from `sm-mail-header-table'." + (interactive) + (let ((fns sm-mail-header-table) + fn) +@@ -110,7 +268,7 @@ + + + (defun sm-use-header-function-p (func) +- (cond ((consp func) ++ (cond ((eq 3 (length func)) + (let ((fn (nth 0 func)) + (fbound-sym (nth 1 func)) + (lib (nth 2 func))) +@@ -120,7 +278,7 @@ + (load lib t) + (fboundp fbound-sym)) + fn)))) +- (t func))) ++ (t (car func)))) + + + (defvar sm-fill-single-line-width 78) +@@ -186,6 +344,10 @@ + (kill-buffer buf))) + (sm-put-header header contents)) + ++(defsubst sm-put-header-contents (header items &optional separator) ++ (sm-put-header header ++ (mapconcat 'identity items (or separator " ")))) ++ + (defsubst sm-put-random-sequence-items (header sequence &optional range) + (sm-put-header-contents header + (apply 'sm-random-sequence-items sequence range))) +@@ -195,17 +357,13 @@ + items + (concat "\n" (make-string sm-fill-indent-width ?\040)))) + +-(defsubst sm-put-header-contents (header items &optional separator) +- (sm-put-header header +- (mapconcat 'identity items (or separator " ")))) +- + (defun sm-put-random-sequence-items-to-eol (header sequence &optional sep) + (or sep (setq sep " ")) + (let ((width (- sm-fill-single-line-width (length header) 2)) + (seqlen (length sequence)) + (len 0) + (continuep t) +- items tem new-len) ++ items tem newlen) + (while continuep + (setq tem (sm-sequence-item sequence (random seqlen))) + (setq newlen (+ len (length sep) (length tem))) +@@ -231,8 +389,29 @@ + (goto-char (match-end 0))))) + (delete-region beg end))) + (insert contents) ++ (setq sm-header-last-inserted header) + (set-buffer-modified-p buf-mod-p)))) + ++(defun sm-delete-header (header) ++ "Delete HEADER and its content is it exists." ++ (save-excursion ++ (let ((buf-mod-p (buffer-modified-p)) ++ (header-exists (mail-position-on-field header))) ++ (if header-exists ++ (delete-region (point) ++ (progn ++ (re-search-backward (concat header ": ")) ++ (forward-char -1) ++ (point))))))) ++ ++(defun sm-delete-last-header () ++ "Delete the last header field inserted by silly-mail." ++ (interactive) ++ (if (not sm-header-last-inserted) ++ (message "Nothing to delete yet") ++ (sm-delete-header sm-header-last-inserted) ++ (setq sm-header-last-inserted nil))) ++ + (put 'sm-put-header-fill-content 'lisp-indent-function 1) + (put 'sm-put-header-contents 'lisp-indent-function 1) + (put 'sm-put-header 'lisp-indent-function 1) +@@ -243,9 +422,14 @@ + (defvar sm-antipastobozoticataclysm-header + "X-Antipastobozoticataclysm") + +-(defvar sm-antipastobozoticataclysm-table +- ["Bariumenemanilow" +- "When George Bush projectile vomits antipasto on the Japanese."]) ++(defcustom sm-antipastobozoticataclysm-table ++ '("Bariumenemanilow" ++ "When George Bush projectile vomits antipasto on the Japanese.") ++ "List of entries for `sm-add-antipastobozoticataclysm'." ++ :type '(set ++ (const "Bariumenemanilow") ++ (const "When George Bush projectile vomits antipasto on the Japanese.")) ++ :group 'silly-mail) + + (defun sm-add-antipastobozoticataclysm () + (interactive) +@@ -267,8 +451,19 @@ + + (defvar sm-drdoom-fodder-header "X-Drdoom-Fodder") + +-(defvar sm-drdoom-fodder-words +- ["CERT" "crash" "crypt" "drdoom" "passwd" "security" "root" "satan"]) ++(defcustom sm-drdoom-fodder-words ++ '("CERT" "crash" "crypt" "drdoom" "passwd" "security" "root" "satan") ++ "List of entries for `sm-add-drdoom-fodder'." ++ :type '(set ++ (const "CERT") ++ (const "crash") ++ (const "crypt") ++ (const "drdoom") ++ (const "passwd") ++ (const "security") ++ (const "root") ++ (const "satan")) ++ :group 'silly-mail) + + (defvar sm-drdoom-fodder-length-range + (list 5 (length sm-drdoom-fodder-words))) +@@ -285,62 +480,118 @@ + ;; These have been contributed by people all over the network + ;; (see the file etc/JOKES or emacs.names in the Emacs 19 distribution). + ;; I modified some of them. +-(defvar sm-emacs-name-table +- ["Each Mail A Continued Surprise" +- "Each Manual's Audience is Completely Stupified" +- "Easily Maintained with the Assistance of Chemical Solutions" +- "Easily Mangles, Aborts, Crashes and Stupifies" +- "Eating Memory And Cycle-Sucking" +- "Editing MACroS" +- "Edwardian Manifestation of All Colonial Sins" +- "Egregious Managers Actively Court Stallman" +- "Eight Megabytes And Constantly Swapping" +- "Eleven Monkeys Asynchronously Create Slogans" +- "Elsewhere Maybe All Commands are Simple" +- "Elsewhere Maybe Alternative Civilizations Survive" +- "Elvis Masterminds All Computer Software" +- "Emacs Macht Alle Computer Schoen" +- "Emacs Made Almost Completely Screwed" +- "Emacs Maintainers Are Crazy Sickos" +- "Emacs Makes A Computer Slow" +- "Emacs Makes All Computing Simple" +- "Emacs Manuals Always Cause Senility" +- "Emacs Manuals Are Cryptic and Surreal" +- "Emacs Masquerades As Comfortable Shell" +- "Emacs May Alienate Clients and Supporters" +- "Emacs May Allow Customised Screwups" +- "Emacs May Annihilate Command Structures" +- "Emacs Means A Crappy Screen" +- "Emacs: My Alternative Computer Story" +- "Embarrassed Manual-Writer Accused of Communist Subversion" +- "Embarrassingly Mundane Advertising Cuts Sales" +- "Emetic Macros Assault Core and Segmentation" +- "Energetic Merchants Always Cultivate Sales" +- "Equine Mammals Are Considerably Smaller" +- "Eradication of Memory Accomplished with Complete Simplicity" +- "Erasing Minds Allows Complete Submission" +- "Escape Meta Alt Control Shift" +- "Esoteric Malleability Always Considered Silly" +- "Even My Aunt Crashes the System" +- "Even a Master of Arts Comes Simpler" +- "Evenings, Mornings, And a Couple of Saturdays" +- "Eventually Munches All Computer Storage" +- "Ever Made A Control-key Setup?" +- "Every Male Adolescent Craves Sex" +- "Every Mode Accelerates Creation of Software" +- "Every Mode Acknowledges Customized Strokes" +- "Every Moron Assumes CCA is Superior" +- "Everyday Material Almost Compiled Successfully" +- "Excavating Mayan Architecture Comes Simpler" +- "Excellent Manuals Are Clearly Suppressed" +- "Exceptionally Mediocre Algorithm for Computer Scientists" +- "Exceptionally Mediocre Autocratic Control System" +- "Experience the Mildest Ad Campaign ever Seen" +- "Extended Macros Are Considered Superfluous" +- "Extensibility and Modifiability Aggravate Confirmed Simpletons" +- "Extraneous Macros And Commands Stink" +- "Generally Not Used (Except by Middle Aged Computer Scientists)"] +- "EMACS acronym expansions.") ++(defcustom sm-emacs-name-table ++ '("Each Mail A Continued Surprise" ++ "Each Manual's Audience is Completely Stupified" ++ "Easily Maintained with the Assistance of Chemical Solutions" ++ "Easily Mangles, Aborts, Crashes and Stupifies" ++ "Eating Memory And Cycle-Sucking" ++ "Editing MACroS" ++ "Edwardian Manifestation of All Colonial Sins" ++ "Egregious Managers Actively Court Stallman" ++ "Eight Megabytes And Constantly Swapping" ++ "Eleven Monkeys Asynchronously Create Slogans" ++ "Elsewhere Maybe All Commands are Simple" ++ "Elsewhere Maybe Alternative Civilizations Survive" ++ "Elvis Masterminds All Computer Software" ++ "Emacs Macht Alle Computer Schoen" ++ "Emacs Made Almost Completely Screwed" ++ "Emacs Maintainers Are Crazy Sickos" ++ "Emacs Makes A Computer Slow" ++ "Emacs Makes All Computing Simple" ++ "Emacs Manuals Always Cause Senility" ++ "Emacs Manuals Are Cryptic and Surreal" ++ "Emacs Masquerades As Comfortable Shell" ++ "Emacs May Alienate Clients and Supporters" ++ "Emacs May Allow Customised Screwups" ++ "Emacs May Annihilate Command Structures" ++ "Emacs Means A Crappy Screen" ++ "Emacs: My Alternative Computer Story" ++ "Embarrassed Manual-Writer Accused of Communist Subversion" ++ "Embarrassingly Mundane Advertising Cuts Sales" ++ "Emetic Macros Assault Core and Segmentation" ++ "Energetic Merchants Always Cultivate Sales" ++ "Equine Mammals Are Considerably Smaller" ++ "Eradication of Memory Accomplished with Complete Simplicity" ++ "Erasing Minds Allows Complete Submission" ++ "Escape Meta Alt Control Shift" ++ "Esoteric Malleability Always Considered Silly" ++ "Even My Aunt Crashes the System" ++ "Even a Master of Arts Comes Simpler" ++ "Evenings, Mornings, And a Couple of Saturdays" ++ "Eventually Munches All Computer Storage" ++ "Ever Made A Control-key Setup?" ++ "Every Male Adolescent Craves Sex" ++ "Every Mode Accelerates Creation of Software" ++ "Every Mode Acknowledges Customized Strokes" ++ "Every Moron Assumes CCA is Superior" ++ "Everyday Material Almost Compiled Successfully" ++ "Excavating Mayan Architecture Comes Simpler" ++ "Excellent Manuals Are Clearly Suppressed" ++ "Exceptionally Mediocre Algorithm for Computer Scientists" ++ "Exceptionally Mediocre Autocratic Control System" ++ "Experience the Mildest Ad Campaign ever Seen" ++ "Extended Macros Are Considered Superfluous" ++ "Extensibility and Modifiability Aggravate Confirmed Simpletons" ++ "Extraneous Macros And Commands Stink" ++ "Generally Not Used (Except by Middle Aged Computer Scientists)") ++ "List of EMACS acronym expansions for `sm-add-emacs-name'." ++ :type '(set ++ (const "Each Mail A Continued Surprise") ++ (const "Each Manual's Audience is Completely Stupified") ++ (const "Easily Maintained with the Assistance of Chemical Solutions") ++ (const "Easily Mangles, Aborts, Crashes and Stupifies") ++ (const "Eating Memory And Cycle-Sucking") ++ (const "Editing MACroS") ++ (const "Edwardian Manifestation of All Colonial Sins") ++ (const "Egregious Managers Actively Court Stallman") ++ (const "Eight Megabytes And Constantly Swapping") ++ (const "Eleven Monkeys Asynchronously Create Slogans") ++ (const "Elsewhere Maybe All Commands are Simple") ++ (const "Elsewhere Maybe Alternative Civilizations Survive") ++ (const "Elvis Masterminds All Computer Software") ++ (const "Emacs Macht Alle Computer Schoen") ++ (const "Emacs Made Almost Completely Screwed") ++ (const "Emacs Maintainers Are Crazy Sickos") ++ (const "Emacs Makes A Computer Slow") ++ (const "Emacs Makes All Computing Simple") ++ (const "Emacs Manuals Always Cause Senility") ++ (const "Emacs Manuals Are Cryptic and Surreal") ++ (const "Emacs Masquerades As Comfortable Shell") ++ (const "Emacs May Alienate Clients and Supporters") ++ (const "Emacs May Allow Customised Screwups") ++ (const "Emacs May Annihilate Command Structures") ++ (const "Emacs Means A Crappy Screen") ++ (const "Emacs: My Alternative Computer Story") ++ (const "Embarrassed Manual-Writer Accused of Communist Subversion") ++ (const "Embarrassingly Mundane Advertising Cuts Sales") ++ (const "Emetic Macros Assault Core and Segmentation") ++ (const "Energetic Merchants Always Cultivate Sales") ++ (const "Equine Mammals Are Considerably Smaller") ++ (const "Eradication of Memory Accomplished with Complete Simplicity") ++ (const "Erasing Minds Allows Complete Submission") ++ (const "Escape Meta Alt Control Shift") ++ (const "Esoteric Malleability Always Considered Silly") ++ (const "Even My Aunt Crashes the System") ++ (const "Even a Master of Arts Comes Simpler") ++ (const "Evenings, Mornings, And a Couple of Saturdays") ++ (const "Eventually Munches All Computer Storage") ++ (const "Ever Made A Control-key Setup?") ++ (const "Every Male Adolescent Craves Sex") ++ (const "Every Mode Accelerates Creation of Software") ++ (const "Every Mode Acknowledges Customized Strokes") ++ (const "Every Moron Assumes CCA is Superior") ++ (const "Everyday Material Almost Compiled Successfully") ++ (const "Excavating Mayan Architecture Comes Simpler") ++ (const "Excellent Manuals Are Clearly Suppressed") ++ (const "Exceptionally Mediocre Algorithm for Computer Scientists") ++ (const "Exceptionally Mediocre Autocratic Control System") ++ (const "Experience the Mildest Ad Campaign ever Seen") ++ (const "Extended Macros Are Considered Superfluous") ++ (const "Extensibility and Modifiability Aggravate Confirmed Simpletons") ++ (const "Extraneous Macros And Commands Stink") ++ (const "Generally Not Used (Except by Middle Aged Computer Scientists)")) ++ :group 'silly-mail) + + (defun sm-add-emacs-name () + (interactive) +@@ -353,57 +604,97 @@ + + (defvar sm-emacs-taunt-header "Emacs") + +-(defvar sm-emacs-taunt-table +- '["(setq software-quality (/ 1 number-of-authors))" +- "a Lisp interpreter masquerading as ... a Lisp interpreter!" +- "a compelling argument for pencil and paper." +- "a learning curve that you can use as a plumb line." +- "a real time environment for simulating molasses-based life forms." +- "an inspiring example of form following function... to Hell." +- "anything free is worth what you paid for it." +- "ballast for RAM." +- "because Hell was full." +- "because editing your files should be a traumatic experience." +- "because extension languages should come with the editor built in." +- "because idle RAM is the Devil's playground." +- "because one operating system isn't enough." +- "because you deserve a brk today." +- "don't cry -- it won't help." +- "don't try this at home, kids!" +- "ed :: 20-megaton hydrogen bomb : firecracker" +- "featuring the world's first municipal garbage collector!" +- "freely redistributable; void where prohibited by law." +- "if SIGINT doesn't work, try a tranquilizer." +- "if it payed rent for disk space, you'd be rich." +- "impress your (remaining) friends and neighbors." +- "it's all fun and games, until somebody tries to edit a file." +- "it's like swatting a fly with a supernova." +- "it's not slow --- it's stately." +- "Lovecraft was an optimist." +- "more boundary conditions than the Middle East." +- "more than just a Lisp interpreter, a text editor as well!" +- "no job too big... no job." +- "or perhaps you'd prefer Russian Roulette, after all?" +- "Our Lady of Perpetual Garbage Collection" +- "resistance is futile; you will be assimilated and byte-compiled." +- "the Swiss Army of Editors." +- "the answer to the world surplus of CPU cycles." +- "the definitive fritterware." +- "the only text editor known to get indigestion." +- "the prosecution rests its case." +- "the road to Hell is paved with extensibility." +- "there's a reason it comes with a built-in psychotherapist." +- "well, why *shouldn't* you pay property taxes on your editor?" +- "where editing text is like playing Paganini on a glass harmonica." +- "you'll understand when you're older, dear."] +- "Facts about Emacs that you and your loved ones should be aware of.") ++(defcustom sm-emacs-taunt-table ++ '("a mistake carried out to perfection." ++ "a moment of convenience, a lifetime of regret." ++ "a terminal disease." ++ "all the problems and twice the bugs." ++ "complex nonsolutions to simple nonproblems." ++ "dissatisfaction guaranteed." ++ "don't get frustrated without it." ++ "even not doing anything would have been better than nothing." ++ "even your dog won't like it." ++ "flaky and built to stay that way." ++ "flawed beyond belief." ++ "foiled again." ++ "form follows malfunction." ++ "garbage at your fingertips." ++ "graphics hacking :: Roman numerals : sqrt (pi)" ++ "ignorance is our most important resource." ++ "it could be worse, but it'll take time." ++ "it could happen to you." ++ "it was hard to write; it should be hard to use." ++ "let it get in *your* way." ++ "live the nightmare." ++ "more than enough rope." ++ "never had it, never will." ++ "no hardware is safe." ++ "power tools for power fools." ++ "power tools for power losers." ++ "putting new limits on productivity." ++ "simplicity made complex." ++ "some voids are better left unfilled." ++ "sometimes you fill a vacuum and it still sucks." ++ "the art of incompetence." ++ "the cutting edge of obsolescence." ++ "the defacto substandard." ++ "the first fully modular software disaster." ++ "the joke that kills." ++ "the problem for your problem." ++ "there's got to be a better way." ++ "warn your friends about it." ++ "you'd better sit down." ++ "you'll envy the dead.") ++ "List of entries for `sm-add-emacs-taunt' (What users said as they collapsed)." ++ :type '(set ++ (const "a mistake carried out to perfection.") ++ (const "a moment of convenience, a lifetime of regret.") ++ (const "a terminal disease.") ++ (const "all the problems and twice the bugs.") ++ (const "complex nonsolutions to simple nonproblems.") ++ (const "dissatisfaction guaranteed.") ++ (const "don't get frustrated without it.") ++ (const "even not doing anything would have been better than nothing.") ++ (const "even your dog won't like it.") ++ (const "flaky and built to stay that way.") ++ (const "flawed beyond belief.") ++ (const "foiled again.") ++ (const "form follows malfunction.") ++ (const "garbage at your fingertips.") ++ (const "graphics hacking :: Roman numerals : sqrt (pi)") ++ (const "ignorance is our most important resource.") ++ (const "it could be worse, but it'll take time.") ++ (const "it could happen to you.") ++ (const "it was hard to write; it should be hard to use.") ++ (const "let it get in *your* way.") ++ (const "live the nightmare.") ++ (const "more than enough rope.") ++ (const "never had it, never will.") ++ (const "no hardware is safe.") ++ (const "power tools for power fools.") ++ (const "power tools for power losers.") ++ (const "putting new limits on productivity.") ++ (const "simplicity made complex.") ++ (const "some voids are better left unfilled.") ++ (const "sometimes you fill a vacuum and it still sucks.") ++ (const "the art of incompetence.") ++ (const "the cutting edge of obsolescence.") ++ (const "the defacto substandard.") ++ (const "the first fully modular software disaster.") ++ (const "the joke that kills.") ++ (const "the problem for your problem.") ++ (const "there's got to be a better way.") ++ (const "warn your friends about it.") ++ (const "you'd better sit down.") ++ (const "you'll envy the dead.")) ++ :group 'silly-mail) + + (defun sm-add-emacs-taunt () + (interactive) +- (sm-put-header sm-emacs-taunt-header ++ (sm-put-header (concat (if sm-always-X-prefix "X-") sm-emacs-taunt-header) + (sm-random-sequence-item sm-emacs-taunt-table))) + +-(setq bizarre-gratuitous-variable '(miscellaneous gratuitous list)) ++;;(setq bizarre-gratuitous-variable '(miscellaneous gratuitous list)) + + + ;; Add an insulting flame into your mail headers. +@@ -446,40 +737,76 @@ + + (defvar sm-meat-header "X-Meat") + +-(defvar sm-meat-table +- ["Abalone" +- "Back Bacon" +- "Bacon" +- "Beef Jerky" +- "Biltong" ; african-style jerky, usually beef, ostrich, or antelope +- "Blood sausage" +- "Buffalo" +- "Calimari" +- "Chicken Fried Steak" +- "Chicken" +- "Clam Jerky" +- "Duck" +- "Flanken" +- "Haggis" +- "Ham" +- "Head cheese" +- "Liverwurst" +- "Lobster" +- "Long pork" +- "Molinari" +- "Olive Loaf" +- "Parma" +- "Prosciutto" +- "Ptarmigan" +- "Roo burgers" +- "Salame" +- "Spruce grouse" +- "Squirrel" +- "Swordfish" +- "Turkey Jerky" +- "Veal" +- "Venison" +- "Wallaby steak"]) ++(defcustom sm-meat-table ++ '("Abalone" ++ "Back Bacon" ++ "Bacon" ++ "Beef Jerky" ++ "Biltong" ; african-style jerky, usually beef, ostrich, or antelope ++ "Blood sausage" ++ "Buffalo" ++ "Calimari" ++ "Chicken Fried Steak" ++ "Chicken" ++ "Clam Jerky" ++ "Duck" ++ "Flanken" ++ "Haggis" ++ "Ham" ++ "Head cheese" ++ "Liverwurst" ++ "Lobster" ++ "Long pork" ++ "Molinari" ++ "Olive Loaf" ++ "Parma" ++ "Prosciutto" ++ "Ptarmigan" ++ "Roo burgers" ++ "Salame" ++ "Spruce grouse" ++ "Squirrel" ++ "Swordfish" ++ "Turkey Jerky" ++ "Veal" ++ "Venison" ++ "Wallaby steak") ++ "List of entries for `sm-add-meat'." ++ :type '(set ++ (const "Abalone") ++ (const "Back Bacon") ++ (const "Bacon") ++ (const "Beef Jerky") ++ (const "Biltong") ++ (const "Blood sausage") ++ (const "Buffalo") ++ (const "Calimari") ++ (const "Chicken Fried Steak") ++ (const "Chicken") ++ (const "Clam Jerky") ++ (const "Duck") ++ (const "Flanken") ++ (const "Haggis") ++ (const "Ham") ++ (const "Head cheese") ++ (const "Liverwurst") ++ (const "Lobster") ++ (const "Long pork") ++ (const "Molinari") ++ (const "Olive Loaf") ++ (const "Parma") ++ (const "Prosciutto") ++ (const "Ptarmigan") ++ (const "Roo burgers") ++ (const "Salame") ++ (const "Spruce grouse") ++ (const "Squirrel") ++ (const "Swordfish") ++ (const "Turkey Jerky") ++ (const "Veal") ++ (const "Venison") ++ (const "Wallaby steak")) ++ :group 'silly-mail) + + (defun sm-add-meat () + (interactive) +@@ -491,20 +818,32 @@ + + (defvar sm-microsoft-header "Microsoft") + +-(defvar sm-microsoft-table +- ["I'm not laughing anymore." +- "Making the world a better place... for Microsoft." +- "Programs so large they have weather." +- "We've got the solution for the problem we sold you." +- "Where `market lock-in' means throwing away the keys." +- "Where even the version numbers aren't Y2K-compliant" +- "Where the service packs are larger than the original releases." +- "With our software, there's no limit to what you can't do!" +- "World domination wasn't enough -- we had to write bad software, too!"]) ++(defcustom sm-microsoft-table ++ '("I'm not laughing anymore." ++ "Making the world a better place... for Microsoft." ++ "Programs so large they have weather." ++ "We've got the solution for the problem we sold you." ++ "Where `market lock-in' means throwing away the keys." ++ "Where even the version numbers aren't Y2K-compliant" ++ "Where the service packs are larger than the original releases." ++ "With our software, there's no limit to what you can't do!" ++ "World domination wasn't enough -- we had to write bad software, too!") ++ "List of entries for `sm-add-microsoft'." ++ :type '(set ++ (const "I'm not laughing anymore.") ++ (const "Making the world a better place... for Microsoft.") ++ (const "Programs so large they have weather.") ++ (const "We've got the solution for the problem we sold you.") ++ (const "Where `market lock-in' means throwing away the keys.") ++ (const "Where even the version numbers aren't Y2K-compliant") ++ (const "Where the service packs are larger than the original releases.") ++ (const "With our software, there's no limit to what you can't do!") ++ (const "World domination wasn't enough -- we had to write bad software, too!")) ++ :group 'silly-mail) + + (defun sm-add-microsoft () + (interactive) +- (sm-put-header sm-microsoft-header ++ (sm-put-header (concat (if sm-always-X-prefix "X-") sm-microsoft-header) + (sm-random-sequence-item sm-microsoft-table))) + + +@@ -547,8 +886,8 @@ + + (defvar sm-tom-swifty-header "X-Tom-Swifty") + +-(defvar sm-tom-swifty-table +- '["\"All the cherry trees are dead,\" Tom said fruitlessly." ++(defcustom sm-tom-swifty-table ++ '("\"All the cherry trees are dead,\" Tom said fruitlessly." + "\"And what should you set your PS1 shell variable to?\" Tom prompted." + "\"Any fresh fruit in the kitchen?\" Tom asked peeringly." + "\"C++ is the wave of the future,\" Tom said objectively." +@@ -645,7 +984,108 @@ + "\"Who drank the last beer?\" Tom asked, hopping mad." + "\"You have new mail,\" Tom said in his usual delivery." + "\"You light up my life,\" Tom said brightly." +- "\"You pinhead,\" Tom said pointedly."]) ++ "\"You pinhead,\" Tom said pointedly.") ++ "List of entries for `sm-add-tom-swifty'." ++ :type '(set ++ (const "\"All the cherry trees are dead,\" Tom said fruitlessly.") ++ (const "\"And what should you set your PS1 shell variable to?\" Tom prompted.") ++ (const "\"Any fresh fruit in the kitchen?\" Tom asked peeringly.") ++ (const "\"C++ is the wave of the future,\" Tom said objectively.") ++ (const "\"Care for some `suan la chow show'?\" Tom asked wantonly.") ++ (const "\"Condensed chicken soup,\" was Tom's canned response.") ++ (const "\"Darling, what vegetable becomes an act of passion when misspelled?\", Tom breathed ravishingly.") ++ (const "\"Eat me,\" was Tom's biting response.") ++ (const "\"Ed is the Standard Text Editor,\" Tom sed.") ++ (const "\"Evergreens have always been my favorite,\" Tom opined.") ++ (const "\"He came at me out of the blue,\" Tom said airily.") ++ (const "\"I am writing lots of little verses,\" Tom said blankly.") ++ (const "\"I can't drink alcohol,\" Tom said spiritually.") ++ (const "\"I can't get this fire started,\" Tom said woodenly.") ++ (const "\"I can't stand baby food,\" Tom said in a strained voice.") ++ (const "\"I can't wait to see the doctor,\" Tom said impatiently.") ++ (const "\"I don't WANNA get drunk,\" Tom wined.") ++ (const "\"I don't have any piano music,\" Tom said listlessly.") ++ (const "\"I don't have the slightest idea how to milk this cow,\" Tom said in utter confusion.") ++ (const "\"I don't understand how square roots work,\" Tom said irrationally.") ++ (const "\"I don't want any champagne!\" Tom said, blowing his top.") ++ (const "\"I feel like I'm running around in circles,\" Tom said squarely.") ++ (const "\"I got to get a text-processor that does my files the right way,\" Tom said awkwardly.") ++ (const "\"I guess I shouldn't have broken the mirror,\" Tom reflected.") ++ (const "\"I hate Frere Jacques,\" Tom said as he roundly denounced it.") ++ (const "\"I have no intention of traversing binary trees!\", Tom barked.") ++ (const "\"I have to finish sorting these writing utensils,\" Tom said pensively.") ++ (const "\"I hope this emulsion works,\" Tom said in suspense.") ++ (const "\"I just burned my hand in the blast furnace,\" Tom said, overwrought.") ++ (const "\"I just don't understand the number seventeen,\" Tom said randomly.") ++ (const "\"I just got some chicken wire,\" Tom said defensively.") ++ (const "\"I just poisoned myself,\" Tom lyed.") ++ (const "\"I just sharpened my pencil,\" Tom said pointedly.") ++ (const "\"I like Gregorian chants,\" Tom intoned.") ++ (const "\"I like amputations,\" Tom said disarmingly.") ++ (const "\"I like sun cartridge tapes,\" Tom said quickly.") ++ (const "\"I never get good bridge hands,\" Tom said in passing.") ++ (const "\"I only like black and white,\" Tom said monotonously.") ++ (const "\"I really like penguins,\" Tom said in a flighty voice.") ++ (const "\"I recommend listening to radio station ``WHAT'',\" Tom said quietly.") ++ (const "\"I think it's time we got married,\" Tom said engagingly.") ++ (const "\"I train dolphins,\" Tom said purposefully.") ++ (const "\"I'll have to grade your test again,\" Tom remarked.") ++ (const "\"I'm completely bankrupt,\" Tom said senselessly.") ++ (const "\"I'm fond of Pavarotti,\" Tom said menacingly.") ++ (const "\"I'm gainfully employed at the Weight-Watchers gymnasium,\" Tom said wastefully.") ++ (const "\"I'm getting fat,\" Tom said expansively.") ++ (const "\"I'm going to copy this tape,\" Tom said for the record.") ++ (const "\"I'm hardly ever aware of what I'm going to do next,\" Tom said unconsciously.") ++ (const "\"I'm having deja-vu,\" Tom said again.") ++ (const "\"I'm really bored,\" Tom said flatly.") ++ (const "\"I'm sorry I broke your window,\" Tom said painfully.") ++ (const "\"I'm sorry to hear I knocked you up,\" Tom said after a pregnant pause.") ++ (const "\"I've burned my tongue,\" Tom said distastefully.") ++ (const "\"I've finished counting the horses,\" Tom said summarily.") ++ (const "\"I've got a bucket full of forearms,\" Tom said wistfully.") ++ (const "\"I've just been drafted,\" Tom said impressively.") ++ (const "\"I've made a complete ash of myself,\" Tom said brazenly.") ++ (const "\"IBM is up 3 points,\" Tom said, taking stock of the situation.") ++ (const "\"If only we could piece together this crime,\" Tom said in a puzzled voice.") ++ (const "\"It needs more seasoning,\" Tom said sagely.") ++ (const "\"It's patently obvious,\" Tom said licentiously.") ++ (const "\"It's really cold out here,\" Tom said in a muffled voice.") ++ (const "\"It's really windy outside,\" said Tom with gusto.") ++ (const "\"Lisp is such a symbol-minded language,\" Tom commonly said.") ++ (const "\"My feet hurt,\" Tom said pedantically.") ++ (const "\"My lenses will stay perfectly clear,\" Tom said optimistically.") ++ (const "\"My mouse buttons don't work,\" Tom said in a depressed voice.") ++ (const "\"My terminal is completely screwed up,\" Tom cursed.") ++ (const "\"On the other hand, eating at a table is more civilized,\" Tom countered.") ++ (const "\"Quick! Change the baby's diaper,\" Tom said rashly.") ++ (const "\"Socialism is dead,\" Tom communicated.") ++ (const "\"The ASCII standard sucks,\" Tom said characteristically.") ++ (const "\"The GNU project will probably not be Posix conformant,\" Tom said noncommittally.") ++ (const "\"The judge sentenced him to the chair,\" Tom said dielectrically.") ++ (const "\"The printer is using too much toner,\" Tom said darkly.") ++ (const "\"The rooster was decapitated,\" Tom said in a crestfallen voice.") ++ (const "\"The sequence `M-4' is equivalent to `C-u 4',\" Tom said metaphorically.") ++ (const "\"The sky is falling,\" Tom said in a crushed voiced.") ++ (const "\"The sun just rose over the cemetary,\" Tom said in mourning.") ++ (const "\"This anesthetic isn't very effective,\" Tom said unnervingly.") ++ (const "\"This awl is broken,\" Tom said pointlessly.") ++ (const "\"This is illegal, I just know it,\" Tom said with conviction.") ++ (const "\"Turn that fan off,\" Tom said coldly.") ++ (const "\"VI is much better than EMACS,\" Tom said with joy.") ++ (const "\"Wait! You need to enable interrupts first!\" Tom said preemptorally.") ++ (const "\"We'll have to take the stairs,\" Tom said in an elevated voice.") ++ (const "\"We're all out of flowers,\" Tom said lackadaisically.") ++ (const "\"We're going to sue you for that window system,\" Tom said inexorably.") ++ (const "\"We're going to use decimal notation,\" Tom said tentatively.") ++ (const "\"Well, I guess we should pitch camp,\" Tom said tentatively.") ++ (const "\"Well, it didn't increase at all,\" Tom said, nonplussed.") ++ (const "\"What is today's date?\" Tom asked in a timely fashion.") ++ (const "\"When will the Hurd be released?\" Tom asked Machingly.") ++ (const "\"Who drank the last beer?\" Tom asked, hopping mad.") ++ (const "\"You have new mail,\" Tom said in his usual delivery.") ++ (const "\"You light up my life,\" Tom said brightly.") ++ (const "\"You pinhead,\" Tom said pointedly.")) ++ :group 'silly-mail) + + (defun sm-add-tom-swifty () + (interactive) +@@ -661,17 +1101,26 @@ + + (defvar sm-tomato-header "Tomato") + +-(defvar sm-tomato-table +- ["Beige" +- "Green" +- "Heliotrope" +- "Mauve" +- "Plaid" +- "Polka-dot"]) ++(defcustom sm-tomato-table ++ '("Beige" ++ "Green" ++ "Heliotrope" ++ "Mauve" ++ "Plaid" ++ "Polka-dot") ++ "List of entries for `sm-add-tomato'." ++ :type '(set ++ (const "Beige") ++ (const "Green") ++ (const "Heliotrope") ++ (const "Mauve") ++ (const "Plaid") ++ (const "Polka-dot")) ++ :group 'silly-mail) + + (defun sm-add-tomato () + (interactive) +- (sm-put-header sm-tomato-header ++ (sm-put-header (concat (if sm-always-X-prefix "X-") sm-tomato-header) + (sm-random-sequence-item sm-tomato-table))) + + +@@ -689,8 +1138,8 @@ + + (defvar sm-x-taunt-header "X-Windows") + +-(defvar sm-x-taunt-table +- '["a mistake carried out to perfection." ++(defcustom sm-x-taunt-table ++ '("a mistake carried out to perfection." + "a moment of convenience, a lifetime of regret." + "a terminal disease." + "all the problems and twice the bugs." +@@ -729,8 +1178,51 @@ + "there's got to be a better way." + "warn your friends about it." + "you'd better sit down." +- "you'll envy the dead."] +- "What users said as they collapsed.") ++ "you'll envy the dead.") ++ "List of entries for `sm-add-x-taunt' (What users said as they collapsed)." ++ :type '(set ++ (const "a mistake carried out to perfection.") ++ (const "a moment of convenience, a lifetime of regret.") ++ (const "a terminal disease.") ++ (const "all the problems and twice the bugs.") ++ (const "complex nonsolutions to simple nonproblems.") ++ (const "dissatisfaction guaranteed.") ++ (const "don't get frustrated without it.") ++ (const "even not doing anything would have been better than nothing.") ++ (const "even your dog won't like it.") ++ (const "flaky and built to stay that way.") ++ (const "flawed beyond belief.") ++ (const "foiled again.") ++ (const "form follows malfunction.") ++ (const "garbage at your fingertips.") ++ (const "graphics hacking :: Roman numerals : sqrt (pi)") ++ (const "ignorance is our most important resource.") ++ (const "it could be worse, but it'll take time.") ++ (const "it could happen to you.") ++ (const "it was hard to write; it should be hard to use.") ++ (const "let it get in *your* way.") ++ (const "live the nightmare.") ++ (const "more than enough rope.") ++ (const "never had it, never will.") ++ (const "no hardware is safe.") ++ (const "power tools for power fools.") ++ (const "power tools for power losers.") ++ (const "putting new limits on productivity.") ++ (const "simplicity made complex.") ++ (const "some voids are better left unfilled.") ++ (const "sometimes you fill a vacuum and it still sucks.") ++ (const "the art of incompetence.") ++ (const "the cutting edge of obsolescence.") ++ (const "the defacto substandard.") ++ (const "the first fully modular software disaster.") ++ (const "the joke that kills.") ++ (const "the problem for your problem.") ++ (const "there's got to be a better way.") ++ (const "warn your friends about it.") ++ (const "you'd better sit down.") ++ (const "you'll envy the dead.")) ++ :group 'silly-mail) ++ + + (defun sm-add-x-taunt () + (interactive) +@@ -747,6 +1239,7 @@ + (or (fboundp 'yow) (load "yow")) + (sm-put-header-fill-content sm-zippy-quote-header (yow))) + ++ + (provide 'silly-mail) + +-;;; silly-mail.el ends here. ++;;; silly-mail.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/51_todoo_bug267637.dpatch +++ emacs-goodies-el-29.4/debian/patches/51_todoo_bug267637.dpatch @@ -0,0 +1,55 @@ +#!/bin/sh -e +## 51_todoo_bug267637.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/todoo.el emacs-goodies-el/elisp/emacs-goodies-el/todoo.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/todoo.el 2004-11-25 21:51:26.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/todoo.el 2004-11-25 21:56:39.000000000 -0500 +@@ -57,6 +57,10 @@ + + ;;; ChangeLog: + ++;; 2004-11-24 Peter S Galbraith ++;; Debian bug 267637 fix: changes to outline-regexp should be buffer-local. ++;; Thanks to Daniel Skarda <0rfelyus@hobitin.ucw.cz> for pointing it out. ++ + ;; 1.2 - Fixed bug in menu (todoo-show->todoo) + ;; Fixed bug when deleting window in todoo-save-and-exit + ;; Added early sub-item support (might be buggy, but still +@@ -512,10 +516,11 @@ + (make-local-variable 'font-lock-defaults) + (setq font-lock-defaults '(todoo-font-lock-keywords t)) + +- (setq outline-regexp (concat "^\\(" (regexp-quote todoo-item-marker) " \\|" +- (regexp-quote todoo-item-marker-assigned) +- " \\|[ ]*" (regexp-quote todoo-sub-item-marker) +- " \\)")) ++ (set (make-local-variable 'outline-regexp) ++ (concat "^\\(" (regexp-quote todoo-item-marker) " \\|" ++ (regexp-quote todoo-item-marker-assigned) ++ " \\|[ ]*" (regexp-quote todoo-sub-item-marker) ++ " \\)")) + + (outline-minor-mode 1) + --- emacs-goodies-el-29.4.orig/debian/patches/50_marker-visit_autoloads.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_marker-visit_autoloads.dpatch @@ -0,0 +1,52 @@ +#!/bin/sh -e +## 50_marker-visit_autoloads.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add autoloads. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/marker-visit.el emacs-goodies-el/elisp/emacs-goodies-el/marker-visit.el +--- /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/marker-visit.el 2001-05-22 02:13:48.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/marker-visit.el 2003-11-16 21:30:42.000000000 -0500 +@@ -87,6 +87,7 @@ + (message error-message) + (beep)) + ++;;;###autoload + (defun marker-visit-prev () + "From point, visit the nearest mark earlier in the buffer." + (interactive) +@@ -102,6 +103,7 @@ + (goto-char dest-mark) + (marker-visit-warn "No previous mark to visit"))))) + ++;;;###autoload + (defun marker-visit-next () + "From point, visit the nearest mark later in the buffer." + (interactive) +@@ -121,6 +123,7 @@ + (goto-char dest-mark) + (marker-visit-warn "No next mark to visit"))))) + ++;;;###autoload + (defun marker-visit-truncate-mark-ring () + "Truncate the `mark-ring'." + (interactive) --- emacs-goodies-el-29.4.orig/debian/patches/51_edit-env_copy-list.dpatch +++ emacs-goodies-el-29.4/debian/patches/51_edit-env_copy-list.dpatch @@ -0,0 +1,36 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 51_edit-env_copy-list.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/edit-env.el emacs-goodies-el/elisp/emacs-goodies-el/edit-env.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/edit-env.el 2006-02-02 22:21:32.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/edit-env.el 2006-02-02 22:22:38.000000000 -0500 +@@ -111,6 +111,16 @@ + (list (widget-get widget 'environment-variable-name) + widget))) + ++;; Local copy from `copy-list' from cl.el (PSG, Closes #340735) ++(defun edit-env-copy-list (list) ++ "Return a copy of a list, which may be a dotted list. ++The elements of the list are not copied, just the list structure itself." ++ (if (consp list) ++ (let ((res nil)) ++ (while (consp list) (push (pop list) res)) ++ (prog1 (nreverse res) (setcdr res list))) ++ (car list))) ++ + ;;;###autoload + (defun edit-env () + "Display, edit, delete and add environment variables." +@@ -132,7 +142,7 @@ + (val nil) + (longest-var 0) + (current-widget nil)) +- (setq edit-env-ls (copy-list process-environment)) ++ (setq edit-env-ls (edit-env-copy-list process-environment)) + (setq edit-env-ls (sort edit-env-ls (lambda (a b) (string-lessp a b)))) + + (widget-create 'push-button --- emacs-goodies-el-29.4.orig/debian/patches/50_browse-kill-ring_bug225082.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_browse-kill-ring_bug225082.dpatch @@ -0,0 +1,53 @@ +#!/bin/sh -e +## 50_browse-kill-ring_bug225082.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el 2004-01-15 14:53:33.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el 2004-01-15 14:59:45.000000000 -0500 +@@ -772,12 +772,18 @@ + (len (length item))) + (browse-kill-ring-add-overlays-for origitem + (insert item)) +- (insert "\n") +- (when separatep +- (insert (browse-kill-ring-propertize browse-kill-ring-separator +- 'browse-kill-ring-extra t +- 'browse-kill-ring-separator t)) +- (insert "\n")))) ++ ;; When the kill-ring has items with read-only text property at ++ ;; **the end of** string, browse-kill-ring-setup fails with error ++ ;; `Text is read-only'. So inhibit-read-only here. ++ ;; See http://bugs.debian.org/225082 ++ ;; - INOUE Hiroyuki ++ (let ((inhibit-read-only t)) ++ (insert "\n") ++ (when separatep ++ (insert (browse-kill-ring-propertize browse-kill-ring-separator ++ 'browse-kill-ring-extra t ++ 'browse-kill-ring-separator t)) ++ (insert "\n"))))) + + (defun browse-kill-ring-occur (regexp) + "Display all `kill-ring' entries matching REGEXP." --- emacs-goodies-el-29.4.orig/debian/patches/50_todoo_bug220718.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_todoo_bug220718.dpatch @@ -0,0 +1,50 @@ +#!/bin/sh -e +## 50_todoo_bug220718.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Fix XEmacs keybindings (bug #220718) + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/todoo.el emacs-goodies-el/elisp/emacs-goodies-el/todoo.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/todoo.el 2003-10-07 19:18:28.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/todoo.el 2003-11-17 15:47:07.000000000 -0500 +@@ -201,10 +201,17 @@ + (define-key map "\C-c\C-n" 'outline-next-visible-heading) + (define-key map "\C-c\M-p" 'todoo-raise-item) + (define-key map "\C-c\M-n" 'todoo-lower-item) +- (define-key map [C-up] 'outline-previous-visible-heading) +- (define-key map [C-down] 'outline-next-visible-heading) +- (define-key map [C-S-up] 'todoo-raise-item) +- (define-key map [C-S-down] 'todoo-lower-item) ++ (cond ++ ((string-match "XEmacs\\|Lucid" emacs-version) ++ (define-key map '(control up) 'outline-previous-visible-heading) ++ (define-key map '(control down) 'outline-next-visible-heading) ++ (define-key map '(control shift up) 'todoo-raise-item) ++ (define-key map '(control shift down) 'todoo-lower-item)) ++ (t ++ (define-key map [C-up] 'outline-previous-visible-heading) ++ (define-key map [C-down] 'outline-next-visible-heading) ++ (define-key map [C-S-up] 'todoo-raise-item) ++ (define-key map [C-S-down] 'todoo-lower-item))) + (setq todoo-mode-map map))) + + ;; Menu --- emacs-goodies-el-29.4.orig/debian/patches/6_diminish-defcustom.dpatch +++ emacs-goodies-el-29.4/debian/patches/6_diminish-defcustom.dpatch @@ -0,0 +1,177 @@ +#!/bin/sh -e +## 6_diminish-defcustom.dpatch.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/diminish.el emacs-goodies-el/elisp/emacs-goodies-el/diminish.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/diminish.el 2003-06-17 21:01:24.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/diminish.el 2003-06-18 19:51:22.000000000 -0400 +@@ -1,11 +1,11 @@ + ;;; diminish.el --- Diminished modes are minor modes with no modeline display + +-;; Copyright (C) 1998 Free Software Foundation, Inc. ++;; Copyright (C) 1998, 2003 Free Software Foundation, Inc. + + ;; Author: Will Mengarini + ;; URL: + ;; Created: Th 19 Feb 98 +-;; Version: 0.44, Sa 23 Jan 99 ++;; Version: 0.45, 18 Jun 2003 + ;; Keywords: extensions, diminish, minor, codeprose + + ;; This file is part of GNU Emacs. +@@ -95,6 +95,11 @@ + ;; near the end of your .emacs file. It should be near the end so that any + ;; minor modes your .emacs loads will already have been loaded by the time + ;; they're to be converted to diminished modes. ++;; ++;; Alternatively, you can setup dimished modes using the customize ++;; interface by customizing the variable `diminished-minor-modes'. The ++;; same caveat as above applies and the minor mode libraries should be ++;; loaded in ~/.emacs before the `(custom-set-variables' line. + + ;; To diminish a major mode, (setq mode-name "whatever") in the mode hook. + +@@ -104,6 +109,21 @@ + ;; by our facility with language." + ;; --J. Michael Straczynski + ++ ++;;; History: ++;; ++;; 2003-06-08 Peter S. Galbraith ++;; ++;; - Make diminished-minor-modes a defcustom. You can now setup the ++;; package using `M-x customize-variable[RET]diminished-minor-modes[RET]'. ++;; ++;; The minor modes still need to be loaded in ~/.emacs prior to diminish ++;; setup but I'm not too sure how to best handle that. An list of ++;; (MINOR-MODE . LIBRARY-FILE) obtained by pre-parsing the Emacs elisp ++;; files perhaps, and then add an eval-after-load? Seems like a kludge ++;; because it relies on outside information remaining constant, but it ++;; would help. ++ + ;;; Code: + + (eval-when-compile (require 'cl)) +@@ -152,7 +172,7 @@ + ;; perhaps at first in surprise, the freedom they thus gain, and grow strong. + + ;;;###autoload +-(defun diminish (mode &optional to-what) ++(defun diminish (mode &optional to-what annotate-flag) + "Diminish mode-line display of minor mode MODE to TO-WHAT (default \"\"). + + Interactively, enter (with completion) the name of any minor mode, followed +@@ -167,7 +187,10 @@ + letters for some modes, without leading spaces. Capitalizing them works + best; if you then diminish some mode to \"X\" but have abbrev-mode enabled as + well, you'll get a display like \"AbbrevX\". This function prepends a space +-to TO-WHAT if it's > 1 char long & doesn't already begin with a space." ++to TO-WHAT if it's > 1 char long & doesn't already begin with a space. ++ ++If ANNOTATE-FLAG is nil or omitted, the normal case in interactive use, then ++the variable `diminished-minor-modes' will be modified to reflect the change." + (interactive (list (read (completing-read + "Diminish what minor mode: " + (mapcar (lambda (x) (list (symbol-name (car x)))) +@@ -184,7 +207,11 @@ + (callf2 concat " " to-what))) + (or (assq mode diminished-mode-alist) + (push (copy-sequence minor) diminished-mode-alist)) +- (setcdr minor (list to-what)))) ++ (setcdr minor (list to-what)) ++ (if (not annotate-flag) ++ (setq diminished-minor-modes ++ (append diminished-minor-modes ++ (list (cons (car minor) to-what))))))) + + ;; But an image comes to me, vivid in its unreality, of a loon alone on his + ;; forest lake, shrieking his soul out into a canopy of stars. Alone this +@@ -203,7 +230,7 @@ + ;; He was shot dead by police. + + ;;;###autoload +-(defun diminish-undo (mode) ++(defun diminish-undo (mode &optional annotate-flag) + "Restore mode-line display of diminished mode MODE to its minor-mode value. + Do nothing if the arg is a minor mode that hasn't been diminished. + +@@ -211,7 +238,10 @@ + mode that was formerly a minor mode on which you invoked M-x diminish). + To restore all diminished modes to minor status, answer `diminished-modes'. + The response to the prompt shouldn't be quoted. However, in Lisp code, +-the arg must be quoted as a symbol, as in (diminish-undo 'diminished-modes)." ++the arg must be quoted as a symbol, as in (diminish-undo 'diminished-modes). ++ ++If ANNOTATE-FLAG is nil or omitted, the normal case in interactive use, then ++the variable `diminished-minor-modes' will be modified to reflect the change." + (interactive + (list (read (completing-read + "Restore what diminished mode: " +@@ -229,7 +259,10 @@ + (or minor + (error "%S is not currently registered as a minor mode" mode)) + (when diminished +- (setcdr minor (cdr diminished)))))) ++ (setcdr minor (cdr diminished)) ++ (when (not annotate-flag) ++ (setq diminished-minor-modes ++ (assq-delete-all (car minor) diminished-minor-modes))))))) + + ;; Plumber Bob was not from Seattle, my grey city, for rainy Seattle is a + ;; city of interiors, a city of the self-diminished. When I moved here one +@@ -288,6 +321,31 @@ + ;; in line with the ducks and geese at the espresso counter, gazing placidly + ;; out on the world through loon-red eyes, thinking secret thoughts. + ++(defgroup diminish nil ++ "Diminished modes are minor modes with no modeline display." ++ :group 'convenience) ++ ++(defcustom diminished-minor-modes nil ++ "List of minor modes to diminish and their mode line display strings. ++The display string can be the empty string if you want the name of the mode ++completely removed from the mode line. If you prefer, you can abbreviate ++the name. For 2 characters or more will be displayed as a separate word on ++the mode line, just like minor modes' names. A single character will be ++scrunched up against the previous word. Multiple single-letter diminished ++modes will all be scrunched together. ++ ++The display of undiminished modes will not be affected." ++ :group 'diminish ++ :type '(alist :key-type (symbol :tag "Minor-mode") ++ :value-type (string :tag "Title")) ++ :options (mapcar 'car minor-mode-alist) ++ :set (lambda (symbol value) ++ (if (and (boundp 'diminished-minor-modes) diminished-minor-modes) ++ (mapcar ++ (lambda (x) (diminish-undo (car x) t)) diminished-minor-modes)) ++ (set-default symbol value) ++ (mapcar (lambda (x) (diminish (car x) (cdr x) t)) value))) ++ + (provide 'diminish) + +-;;; diminish.el ends here +\ No newline at end of file ++;;; diminish.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/53_gnus-pers.dpatch +++ emacs-goodies-el-29.4/debian/patches/53_gnus-pers.dpatch @@ -0,0 +1,98 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 53_gnus-pers.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/gnus-bonus-el/gnus-pers.el emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el +--- emacs-goodies-el~/elisp/gnus-bonus-el/gnus-pers.el 2003-10-17 16:20:53.000000000 -0400 ++++ emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2007-04-15 20:50:04.000000000 -0400 +@@ -325,8 +325,8 @@ + ((stringp fromfoo) + fromfoo) + ((or (symbolp fromfoo) +- (gnus-functionp fromfoo)) +- (cond ((gnus-functionp fromfoo) ++ (functionp fromfoo)) ++ (cond ((functionp fromfoo) + (funcall fromfoo)) + ((boundp fromfoo) + (symbol-value fromfoo)))) +@@ -339,8 +339,8 @@ + ((stringp extrasfoo) + extrasfoo) + ((or (symbolp extrasfoo) +- (gnus-functionp extrasfoo)) +- (cond ((gnus-functionp extrasfoo) ++ (functionp extrasfoo)) ++ (cond ((functionp extrasfoo) + (funcall extrasfoo)) + ((boundp extrasfoo) + (symbol-value extrasfoo)))) +@@ -386,8 +386,8 @@ + ((stringp fromfoo) + fromfoo) + ((or (symbolp fromfoo) +- (gnus-functionp fromfoo)) +- (cond ((gnus-functionp fromfoo) ++ (functionp fromfoo)) ++ (cond ((functionp fromfoo) + (funcall fromfoo)) + ((boundp fromfoo) + (symbol-value fromfoo)))) +@@ -400,8 +400,8 @@ + ((stringp extrasfoo) + extrasfoo) + ((or (symbolp extrasfoo) +- (gnus-functionp extrasfoo)) +- (cond ((gnus-functionp extrasfoo) ++ (functionp extrasfoo)) ++ (cond ((functionp extrasfoo) + (funcall extrasfoo)) + ((boundp extrasfoo) + (symbol-value extrasfoo)))) +@@ -414,8 +414,8 @@ + ((stringp signaturesfoo) + signaturesfoo) + ((or (symbolp signaturesfoo) +- (gnus-functionp signaturesfoo)) +- (cond ((gnus-functionp signaturesfoo) ++ (functionp signaturesfoo)) ++ (cond ((functionp signaturesfoo) + (funcall signaturesfoo)) + ((boundp signaturesfoo) + (symbol-value signaturesfoo)))) +@@ -544,8 +544,8 @@ + ((stringp fromfoo) + fromfoo) + ((or (symbolp fromfoo) +- (gnus-functionp fromfoo)) +- (cond ((gnus-functionp fromfoo) ++ (functionp fromfoo)) ++ (cond ((functionp fromfoo) + (funcall fromfoo)) + ((boundp fromfoo) + (symbol-value fromfoo)))) +@@ -558,8 +558,8 @@ + ((stringp extrasfoo) + extrasfoo) + ((or (symbolp extrasfoo) +- (gnus-functionp extrasfoo)) +- (cond ((gnus-functionp extrasfoo) ++ (functionp extrasfoo)) ++ (cond ((functionp extrasfoo) + (funcall extrasfoo)) + ((boundp extrasfoo) + (symbol-value extrasfoo)))) +@@ -572,8 +572,8 @@ + ((stringp signaturesfoo) + signaturesfoo) + ((or (symbolp signaturesfoo) +- (gnus-functionp signaturesfoo)) +- (cond ((gnus-functionp signaturesfoo) ++ (functionp signaturesfoo)) ++ (cond ((functionp signaturesfoo) + (funcall signaturesfoo)) + ((boundp signaturesfoo) + (symbol-value signaturesfoo)))) --- emacs-goodies-el-29.4.orig/debian/patches/50_projects.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_projects.dpatch @@ -0,0 +1,220 @@ +#!/bin/sh -e +## 50_projects.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Make projects.el less intrusive by default. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/projects.el emacs-goodies-el/elisp/emacs-goodies-el/projects.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/projects.el 2003-10-07 19:18:26.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/projects.el 2003-10-27 21:23:47.000000000 -0500 +@@ -1,6 +1,8 @@ + ;;; projects.el -- Project-based buffer name management + + ;; Copyright 1998 Naggum Software ++;; Copyright 2003 Peter S Galbraith ++;; (Erik, please contact me for copyright assignment back to you. -psg) + + ;; Author: Erik Naggum + ;; Keywords: internal +@@ -33,19 +35,20 @@ + ;; define what looks suspiciously like logical pathname hosts from Common + ;; Lisp and get abbreviated yet meaningful buffer names in the modeline. + +-;; Commands include ADD-PROJECT, which takes a project name and a directory +-;; (which conveniently defaults to the current directory), REMOVE-PROJECT +-;; (which completes on existing projects), and LIST-PROJECTS, which lists +-;; the current projects in a rudimentary table. UPDATE-BUFFER-NAMES is +-;; called automatically when either ADD-PROJECT or REMOVE-PROJECT changes ++;; Commands include PROJECT-ADD, which takes a project name and a directory ++;; (which conveniently defaults to the current directory), PROJECT-REMOVE ++;; (which completes on existing projects), and PROJECT-LIST, which lists the ++;; current projects in a rudimentary table. PROJECT-UPDATE-BUFFER-NAMES is ++;; called automatically when either PROJECT-ADD or PROJECT-REMOVE changes + ;; the project list, but may also be called by the user as a command. + + ;; Variables include PROJECT-ROOT-ALIST, which contains the list of current + ;; projects and their root directories, and two variables that control the +-;; naming of buffers: BUFFER-NAME-DIRECTORY-LIMIT, the uppper limit on the +-;; number of characters in the last few directory elements in the pathname +-;; that makes up the buffer name and BUFFER-NAME-DIRECTORY-PREFIX, the +-;; string prepended to buffer names that would be too long. ++;; naming of buffers: PROJECT-BUFFER-NAME-DIRECTORY-LIMIT, the uppper limit ++;; on the number of characters in the last few directory elements in the ++;; pathname that makes up the buffer name and ++;; PROJECT-BUFFER-NAME-DIRECTORY-PREFIX, the string prepended to buffer ++;; names that would be too long. + + ;; Internal functions include PROJECT-BUFFER-NAME, which computes the + ;; buffer name from the filename argument, PROJECT-ROOT-ALIST, which +@@ -59,12 +62,54 @@ + ;; Loading this file is sufficient to install the package. + ;; Reloading has no effect. + ++;;; History: ++ ++;; 2003-10-27 Peter S Galbraith ++;; ++;; I tried to contact the author but his host is down. I like the concept ++;; of prefixing certain buffer names with a project name, but not renaming ++;; all unrelated buffers with the full directory path. This breaks MH-E ++;; mail folder names for example. So I'm introducing the variable ++;; `project-rename-all-buffers' with a default of nil. You may customize ++;; this to obtain the old behaviour. ++;; ++;; In addition, I am renaming commands: ++;; ++;; `add-project' to `project-add' ++;; `remove-project' to `project-remove'. ++;; `list-projects' to `project-list'. ++;; `update-buffer-names' to `project-update-buffer-names' ++;; ++;; variables (also made into defcustoms): ++;; ++;; `buffer-name-directory-limit' to `project-buffer-name-directory-limit' ++;; `buffer-name-directory-prefix' to `project-buffer-name-directory-prefix' ++ + ;;; Code: + + (require 'cl) + + (provide 'projects) + ++(defgroup projects nil ++ "Project-based buffer name management." ++ :group 'convenience) ++ ++(defcustom project-rename-all-buffers nil ++ "*Whether to rename buffer not belonging to a project." ++ :type 'boolean ++ :group 'projects) ++ ++(defcustom project-buffer-name-directory-limit 20 ++ "*Directories in buffer names are attempted kept shorter than this." ++ :type 'integer ++ :group 'projects) ++ ++(defcustom project-buffer-name-directory-prefix "<" ++ "*String to prepend to an abbreviated buffer name." ++ :type 'string ++ :group 'projects) ++ + ;; External symbols + + (defvar project-root-alist nil +@@ -73,22 +118,23 @@ + The value should be the project's root directory. + Multiple projects in the same hierarchy is handled correctly.") + +-(defun add-project (name directory) ++;;;###autoload ++(defun project-add (name directory) + "Add the project named NAME with root directory DIRECTORY." + (interactive "sName of project: \nDDirectory of project %s: ") + (push (cons name directory) project-root-alist) + (message "Project `%s' maps to `%s'" name directory) +- (update-buffer-names)) ++ (project-update-buffer-names)) + +-(defun remove-project (name) ++(defun project-remove (name) + "Remove the project named NAME." + (interactive + (list (completing-read "Name of project: " project-root-alist nil t))) + (setf project-root-alist + (remove* name project-root-alist :key #'car :test #'equal)) +- (update-buffer-names)) ++ (project-update-buffer-names)) + +-(defun list-projects (&optional sort-by-root) ++(defun project-list (&optional sort-by-root) + "List all projects sorted by project name. + If optional argument SORT-BY-ROOT is true, sort by project root, instead." + (interactive "P") +@@ -108,13 +154,7 @@ + (terpri))) + (message "There are no projects.")))) + +-(defvar buffer-name-directory-limit 20 +- "*Directories in buffer names are attempted kept shorter than this.") +- +-(defvar buffer-name-directory-prefix "<" +- "*String to prepend to an abbreviated buffer name.") +- +-(defun update-buffer-names (&rest buffers) ++(defun project-update-buffer-names (&rest buffers) + "Update the name of the indicated BUFFERS. + Interactively, or if no buffers are given, the names of all file-visiting + buffers are updated according to the new value of PROJECT-ROOT-ALIST." +@@ -148,29 +188,38 @@ + If the file is under a project hierarchy, as determined by the variable + PROJECT-ROOT-ALIST, prefix its project-relative name with the name of the + project. Otherwise, name the buffer like the filename, but limit the +-directory to BUFFER-NAME-DIRECTORY-LIMIT characters by chopping off from +-the front and prepending BUFFER-NAME-DIRECTORY-PREFIX." ++directory to PROJECT-BUFFER-NAME-DIRECTORY-LIMIT characters by chopping ++off from the front and prepending PROJECT-BUFFER-NAME-DIRECTORY-PREFIX." + (block name + (let* ((truename (file-truename (if (file-directory-p filename) +- (file-name-as-directory filename) ++ (file-name-as-directory filename) + filename)))) + (loop for (name . dir) in (project-root-alist) + when (and (>= (length truename) (length dir)) + (string= dir (substring truename 0 (length dir)))) + do (return-from name + (concat name ":" (substring truename (length dir))))) +- ;; may not need to abbreviate if directory is short enough +- (when (<= (position ?/ (abbreviate-file-name truename) :from-end t) +- buffer-name-directory-limit) +- (return-from name (abbreviate-file-name truename))) +- ;; keep directories shorter than BUFFER-NAME-DIRECTORY-LIMIT. +- ;; prepend BUFFER-NAME-DIRECTORY-PREFIX to abbreviated names. +- (let* ((final (position ?/ truename :from-end t)) +- (start (- final buffer-name-directory-limit)) +- (first (or (position ?/ truename :start start :end final) +- (position ?/ truename :end start :from-end t) +- start))) +- (concat buffer-name-directory-prefix (subseq truename first)))))) ++ (cond ++ ((not project-rename-all-buffers) ++ (let ((lastname (file-name-nondirectory filename))) ++ (if (string= lastname "") ++ (setq lastname filename)) ++ lastname)) ++ (t ++ ;; Old behaviour ++ ;; may not need to abbreviate if directory is short enough ++ (when (<= (position ?/ (abbreviate-file-name truename) :from-end t) ++ project-buffer-name-directory-limit) ++ (return-from name (abbreviate-file-name truename))) ++ ;; keep directories shorter than PROJECT-BUFFER-NAME-DIRECTORY-LIMIT. ++ ;; prepend PROJECT-BUFFER-NAME-DIRECTORY-PREFIX to abbreviated names. ++ (let* ((final (position ?/ truename :from-end t)) ++ (start (- final project-buffer-name-directory-limit)) ++ (first (or (position ?/ truename :start start :end final) ++ (position ?/ truename :end start :from-end t) ++ start))) ++ (concat project-buffer-name-directory-prefix ++ (subseq truename first)))))))) + + ;; This overrides a function in EMACS:lisp/files.el + --- emacs-goodies-el-29.4.orig/debian/patches/50_perl-doc-pager-bug144963.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_perl-doc-pager-bug144963.dpatch @@ -0,0 +1,126 @@ +#!/bin/sh -e +## 50_perl-doc-pager-bug144963.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Make perl-doc run a benign pager (Closes: #144963) + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/perldoc.el emacs-goodies-el/elisp/emacs-goodies-el/perldoc.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/perldoc.el 2003-04-04 15:16:09.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/perldoc.el 2003-10-01 20:23:37.000000000 -0400 +@@ -41,7 +41,9 @@ + ;; 1.1 - Show error message when no help is found. + ;; - Fix name. + ;; - Include GPL + URL. +-;; ++;; 1.2 - Alan Shutko ++;; perldoc runs a pager, so run a benign one. See Debian bug ++;; http://bugs.debian.org/144963 + + ;;; Source + ;; +@@ -54,6 +56,8 @@ + + (require 'thingatpt) + ++(autoload 'Man-fontify-manpage "man") ++ + (defvar perldoc-functions + (list + "-X" +@@ -287,35 +291,39 @@ + (perldoc-module string))) + ) + ++(defun perldoc-start-process (&rest args) ++ "Call perldoc with ARGS. ++Sets up process sentinals and needed environment to call perldoc." ++ (let* ((pager (if (member system-type '(ms-dos windows-nt)) ++ "type" ++ "cat")) ++ (perldoc-process) ++ (process-environment ++ (cons (concat "PERLDOC_PAGER=" pager) ++ process-environment))) ++ ;; Can't convince perldoc not to run a pager, so we run a ++ ;; benign one ++ (set-buffer (get-buffer-create "*Perldoc*")) ++ (kill-all-local-variables) ++ (erase-buffer) ++ (text-mode) ++ (message "Loading documentation ..") ++ (setq perldoc-process (apply 'start-process args)) ++ (set-process-filter perldoc-process 'perldoc-process-filter) ++ (set-process-sentinel perldoc-process 'perldoc-sentinel) ++ (process-kill-without-query perldoc-process))) ++ ++ + (defun perldoc-function( function ) + "Show the help text for the given Perl function / builtin." + (interactive "sPerl function / builtin / module : ") +- (let ((perldoc-process nil)) +- (set-buffer (get-buffer-create "*Perldoc*")) +- (kill-all-local-variables) +- (erase-buffer) +- (text-mode) +- (message "Loading documentation ..") +- (setq perldoc-process (start-process "perldol" nil "perldoc" "-f" function)) +- (set-process-filter perldoc-process 'perldoc-process-filter) +- (set-process-sentinel perldoc-process 'perldoc-sentinel) +- (process-kill-without-query perldoc-process) +- )) ++ (perldoc-start-process "perldol" nil "perldoc" "-f" function)) + + (defun perldoc-module( module ) + "Show the help text for the given Perl module." + (interactive "sPerl module : ") +- (let ((perldoc-process nil)) +- (set-buffer (get-buffer-create "*Perldoc*")) +- (kill-all-local-variables) +- (erase-buffer) +- (text-mode) +- (message "Loading documentation ..") +- (setq perldoc-process (start-process "perldol" nil "perldoc" module)) +- (set-process-filter perldoc-process 'perldoc-process-filter) +- (set-process-sentinel perldoc-process 'perldoc-sentinel) +- (process-kill-without-query perldoc-process) +- )) ++ (perldoc-start-process "perldol" nil "perldoc" module)) ++ + + (defun perldoc-process-filter (proc string) + "Process the results from the catdoc process." +@@ -329,11 +337,12 @@ + (set-buffer "*Perldoc*") + (if (< (count-lines (point-min) (point-max)) 2) + (progn +- (message "No perdoc help found.") ++ (message "No perldoc help found.") + (kill-buffer (get-buffer "*Perldoc*"))) + (pop-to-buffer "*Perldoc*") +- (goto-char (point-min))) +- ))) ++ (goto-char (point-min)) ++ (let ((Man-args "perldoc")) ++ (Man-fontify-manpage)))))) + + + (defun perldoc-cperl-hook () --- emacs-goodies-el-29.4.orig/debian/patches/50_bar-cursor_bug331430.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_bar-cursor_bug331430.dpatch @@ -0,0 +1,19 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 50_bar-cursor_bug331430.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/bar-cursor.el emacs-goodies-el/elisp/emacs-goodies-el/bar-cursor.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/bar-cursor.el 2005-10-06 19:22:27.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/bar-cursor.el 2005-10-12 20:16:18.000000000 -0400 +@@ -175,7 +175,7 @@ + if not passed in." + (if (and bar-cursor-mode (not overwrite-mode)) + (bar-cursor-set-cursor-type 'bar frame) +- (bar-cursor-set-cursor-type 'block frame))) ++ (bar-cursor-set-cursor-type 'box frame))) + + ;;; ************************************************************************** + ;;; ***** we're done --- emacs-goodies-el-29.4.orig/debian/patches/50_pod_autoload.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_pod_autoload.dpatch @@ -0,0 +1,18 @@ +#!/bin/sh /usr/share/dpatch/dpatch-run +## 50_pod_autoload.dpatch by Cyril Brulebois +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add autoload. + +@DPATCH@ + +--- emacs-goodies-el/elisp/emacs-goodies-el/pod-mode.el~ 2007-11-27 15:36:36.000000000 +0100 ++++ emacs-goodies-el/elisp/emacs-goodies-el/pod-mode.el 2007-11-27 15:36:45.000000000 +0100 +@@ -129,6 +129,7 @@ + )) + + ;; main ++;;;###autoload + (defun pod-mode () + "Major mode for editing POD files (Plain Old Documentation for Perl)." + (interactive) --- emacs-goodies-el-29.4.orig/debian/patches/00list +++ emacs-goodies-el-29.4/debian/patches/00list @@ -0,0 +1,50 @@ +1_home-end-xemacs +2_muttrc-manual +3_bar-cursor-customize +5_highlight-beyond-fill-column +6_diminish-defcustom +8_whitespace_rename +9_whitespace_enable_custom +9_missing_provide +50_bar-cursor_bug331430 +50_browse-kill-ring_bug224751 +50_browse-kill-ring_bug225082 +50_ctypes +50_coffee_no-autoload +50_color-theme_custom +50_dedicated +50_df_minor_mode_alist +50_edit-env_autoload +51_edit-env_copy-list +50_filladapt_bug420845 +50_gnus-BTS +51_gnus-BTS_bug363161 +52_gnus-BTS_bug218286 +50_gnus-filterhist +50_gnus-pers +51_gnus-pers +52_gnus-pers +53_gnus-pers +54_gnus-pers_bug384209 +55_gnus-pers_bug263371 +50_joc-toggle-case +50_joc-toggle-buffer +50_lcomp +50_marker-visit_autoloads +50_newsticker_non-fatal_xml +50_session_enable_custom +51_session_autoload +50_silly-mail +50_slang-mode_bug336352 +50_perl-doc-pager-bug144963 +51_perl-doc-rewrite +50_protbuf_custom_and_toggle +50_table-add-to-text-mode-hook +50_todoo_bug220718 +51_todoo_bug267637 +52_todoo_bug414781 +53_todoo_bug438964 +50_setnu +50_projects +50_markdown_autoload +50_pod_autoload --- emacs-goodies-el-29.4.orig/debian/patches/8_whitespace_rename.dpatch +++ emacs-goodies-el-29.4/debian/patches/8_whitespace_rename.dpatch @@ -0,0 +1,143 @@ +#! /bin/sh -e +## 8_whitespace_rename.dpatch +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Rename whitespace.el and its internals to nuke-trailing-whitespace + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi +case "$1" in + -patch) patch -f --no-backup-if-mismatch -p1 < $0;; + -unpatch) patch -f --no-backup-if-mismatch -R -p1 < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +diff -urNad 8.tmp/elisp/whitespace.el 8/elisp/whitespace.el +--- 8.tmp/elisp/emacs-goodies-el/nuke-trailing-whitespace.el 2003-05-05 22:20:30.000000000 -0400 ++++ 8/elisp/emacs-goodies-el/nuke-trailing-whitespace.el 2003-05-05 22:56:27.000000000 -0400 +@@ -1,4 +1,4 @@ +-;;; whitespace.el --- strip trailing whitespace from buffers ++;;; nuke-trailing-whitespace.el --- strip trailing whitespace from buffers + + ;; Copyright (C) 1995, 1996, 1997, 2000 Noah S. Friedman + +@@ -26,15 +26,20 @@ + + ;;; Commentary: + ++;; This file was modified from Noah Friedman's whitespace.el by Cristian ++;; Ionescu-Idbohrn because emacs21 also provides a whitespace.el. This ++;; file, and its functions, were renamed to nuke-trailing-whitespace to ++;; avoid the namespace collision. ++ + ;; You may wish to do the following in your .emacs: + ;; +-;; (autoload 'nuke-trailing-whitespace "whitespace" nil t) ++;; (autoload 'nuke-trailing-whitespace "nuke-trailing-whitespace" nil t) + ;; (add-hook 'mail-send-hook 'nuke-trailing-whitespace) + ;; (add-hook 'write-file-hooks 'nuke-trailing-whitespace) + + ;;; Code: + +-(defvar nuke-trailing-whitespace-p 'whitespace-check-mode ++(defvar nuke-trailing-whitespace-p 'nuke-trailing-whitespace-check-mode + "*Specify when stripping whitespace should be done. + This variable affects how the function `nuke-trailing-whitespace' behaves. + If `t', unreservedly strip trailing whitespace, including excess newlines. +@@ -51,12 +56,12 @@ + ;; The regexp "\\s-+$" is too general, since form feeds (\n), carriage + ;; returns (\r), and form feeds/page breaks (C-l) count as whitespace in + ;; some syntaxes even though they serve a functional purpose in the file. +-(defconst whitespace-regexp "[ \t]+$" ++(defconst nuke-trailing-whitespace-regexp "[ \t]+$" + "Regular expression which matches trailing whitespace.") + + ;; Match two or more trailing newlines at the end of the buffer; all but + ;; the first newline will be deleted. +-(defconst whitespace-eob-newline-regexp "\n\n+\\'" ++(defconst nuke-trailing-whitespace-eob-newline-regexp "\n\n+\\'" + "Regular expression which matches newlines at the end of the buffer.") + + (defvar nuke-trailing-whitespace-always-major-modes +@@ -80,7 +85,7 @@ + slitex-mode + sml-mode + texinfo-mode) +- "*Major modes for which `whitespace-check-mode' will return `t'. ++ "*Major modes for which `nuke-trailing-whitespace-check-mode' will return `t'. + These are major modes for which `nuke-trailing-whitespace' should + strip all trailing whitespace and excess newlines at the end of the buffer + without asking.") +@@ -90,7 +95,7 @@ + rmail-mode + vm-mode + vm-summary-mode) +- "*Major modes for which `whitespace-check-mode' will return `nil'. ++ "*Major modes for which `nuke-trailing-whitespace-check-mode' will return `nil'. + These are major modes for which `nuke-trailing-whitespace' should + never strip trailing whitespace automatically.") + +@@ -107,7 +112,7 @@ + replacement if the buffer is read-only." + (interactive) + (cond ((interactive-p) +- (call-interactively 'whitespace-do-nuke-whitespace)) ++ (call-interactively 'nuke-trailing-whitespace-do-nuke-whitespace)) + (t + (let ((flag nuke-trailing-whitespace-p)) + (and nuke-trailing-whitespace-p +@@ -116,11 +121,11 @@ + (setq flag (funcall nuke-trailing-whitespace-p))) + + (and flag +- (whitespace-do-nuke-whitespace flag))))) ++ (nuke-trailing-whitespace-do-nuke-whitespace flag))))) + ;; always return nil, in case this is on write-file-hooks. + nil) + +-(defun whitespace-do-nuke-whitespace (&optional flag) ++(defun nuke-trailing-whitespace-do-nuke-whitespace (&optional flag) + (interactive) + (let ((buffer-orig-read-only buffer-read-only) + (buffer-read-only nil)) +@@ -133,20 +138,20 @@ + ((or (and (eq flag t) + (not buffer-orig-read-only)) + (interactive-p)) +- (while (re-search-forward whitespace-regexp (point-max) t) ++ (while (re-search-forward nuke-trailing-whitespace-regexp (point-max) t) + (delete-region (match-beginning 0) (match-end 0))) + (goto-char (point-min)) +- (and (re-search-forward whitespace-eob-newline-regexp nil t) ++ (and (re-search-forward nuke-trailing-whitespace-eob-newline-regexp nil t) + (delete-region (1+ (match-beginning 0)) (match-end 0)))) + (t +- (query-replace-regexp whitespace-regexp "") ++ (query-replace-regexp nuke-trailing-whitespace-regexp "") + (goto-char (point-min)) +- (and (re-search-forward whitespace-eob-newline-regexp nil t) ++ (and (re-search-forward nuke-trailing-whitespace-eob-newline-regexp nil t) + (y-or-n-p + "Delete excess trailing newlines at end of buffer? ") + (delete-region (1+ (match-beginning 0)) (match-end 0)))))))))) + +-(defun whitespace-check-mode (&optional mode) ++(defun nuke-trailing-whitespace-check-mode (&optional mode) + (or mode (setq mode major-mode)) + (cond ((memq mode nuke-trailing-whitespace-always-major-modes) t) + ((memq mode nuke-trailing-whitespace-never-major-modes) nil) +@@ -156,6 +161,6 @@ + ((get-buffer-window (current-buffer) t) 'query) + (t nil))) + +-(provide 'whitespace) ++(provide 'nuke-trailing-whitespace) + +-;;; whitespace.el ends here. ++;;; nuke-trailing-whitespace.el ends here. --- emacs-goodies-el-29.4.orig/debian/patches/50_edit-env_autoload.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_edit-env_autoload.dpatch @@ -0,0 +1,36 @@ +#!/bin/sh -e +## 50_edit-env_autoload.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add autoload. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/edit-env.el emacs-goodies-el/elisp/emacs-goodies-el/edit-env.el +--- /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/edit-env.el 2003-11-12 20:17:21.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/edit-env.el 2003-11-14 15:00:01.000000000 -0500 +@@ -111,6 +111,7 @@ + (list (widget-get widget 'environment-variable-name) + widget))) + ++;;;###autoload + (defun edit-env () + "Display, edit, delete and add environment variables." + (interactive) --- emacs-goodies-el-29.4.orig/debian/patches/50_gnus-BTS.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_gnus-BTS.dpatch @@ -0,0 +1,192 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 50_gnus-BTS.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad --exclude=CVS --exclude=.svn ./elisp/debian-el/gnus-BTS.el /tmp/dpep-work.XVQhTr/emacs-goodies-el/elisp/debian-el/gnus-BTS.el +--- ./elisp/debian-el/gnus-BTS.el 2005-09-15 21:38:07.000000000 -0400 ++++ /tmp/dpep-work.XVQhTr/emacs-goodies-el/elisp/debian-el/gnus-BTS.el 2005-09-19 18:54:07.000000000 -0400 +@@ -33,42 +33,74 @@ + ;; references to the Bug Tracking system in them. It expects to see + ;; Bug references in the form of (for example): "#48273", "closes: + ;; 238742" or similar. ++;; ++;; Use `M-x' `gnus-dbts-browse-debpkg-or-bug' over the bug number. + ++;;; Change log: ++;; 2005-08-20 Jari Aalto ++;; ++;; * gnus-BTS.el: ++;; (top level): Changed all variable and function names to use common ++;; prefix `gnus-dbts-'. This makes package namespace clean. Converted ++;; all lambda forms to real functions. Cleaned up ++;; `gnus-select-article-hook' setting. ++;; Changed all 'setq' to 'defvar'. ++;; (gnus-dbts-gnus-install): New. ++;; (gnus-dbts-gnus-select-article-hook): New. ++;; (gnus-dbts-buttonize): New. ++;; (eval-after-load): New. Install at point when Gnus is being loaded. ++;; ++;; 2005-09-19 Peter S Galbraith ++;; ++;; Minor bug fix: gnus-dbts-gnus-install missing brackets. ++;; + ;;; Code: + + +-(setq anti-bug-special-keywords "reassign\\|merge") +-(setq anti-bug-keywords (concat +- "tags\\|severity\\|retitle\\|close\\|closes:\\|Merged\\|reopen\\|Bug\\|" +- anti-bug-special-keywords)) ++;; gnus-dbts = Gnus inerface to Debian Bug Tracking System + +-(setq anti-bug-prefix " *#?\\|Bugs?\\|#") +-(setq anti-bug-number " *\\([0-9]+\\)") +-(setq anti-bug-special " +\\([0-9]+\\|[-.A-Za-z0-9]+\\)") ++(autoload 'thing-at-point "thingatpt") + +-(setq anti-gnus-debian-bug-regexp (concat +- "\\(" +- "\\(" +- anti-bug-keywords +- "\\)" +- anti-bug-prefix +- "\\)" +- anti-bug-number)) ++(defvar gnus-dbts-in-debian-group-p nil) + +-(setq anti-gnus-debian-reassign-or-merge-regexp +- (concat +- "\\(" +- anti-bug-special-keywords +- "\\)" +- anti-bug-number +- anti-bug-special)) ++(defvar gnus-dbts-in-debian-devel-announce-group-p nil) + +-(setq anti-gnus-debian-reassign-regexp "reassigned from package `\\([^']*\\)' to `\\([^']*\\)'") +-(setq anti-gnus-debian-bug-BTS-regexp "^ *\\([0-9]+\\)") ++(defvar gnus-dbts-bug-special-keywords "reassign\\|merge") + +-(defun anti-browse-debpkg-or-bug (thing) ++(defvar gnus-dbts-bug-keywords ++ (concat ++ "tags\\|severity\\|retitle\\|close\\|closes:\\|Merged\\|reopen\\|Bug\\|" ++ gnus-dbts-bug-special-keywords)) ++ ++(defvar gnus-dbts-bug-prefix " *#?\\|Bugs?\\|#") ++(defvar gnus-dbts-bug-number " *\\([0-9]+\\)") ++(defvar gnus-dbts-bug-special " +\\([0-9]+\\|[-.A-Za-z0-9]+\\)") ++ ++(defvar gnus-dbts-debian-bug-regexp ++ (concat ++ "\\(" ++ "\\(" ++ gnus-dbts-bug-keywords ++ "\\)" ++ gnus-dbts-bug-prefix ++ "\\)" ++ gnus-dbts-bug-number)) ++ ++(defvar gnus-dbts-debian-reassign-or-merge-regexp ++ (concat ++ "\\(" ++ gnus-dbts-bug-special-keywords ++ "\\)" ++ gnus-dbts-bug-number ++ gnus-dbts-bug-special)) ++ ++(defvar gnus-dbts-debian-reassign-regexp ++ "reassigned from package `\\([^']*\\)' to `\\([^']*\\)'") ++ ++(defvar gnus-dbts-debian-bug-regexp "^ *\\([0-9]+\\)") ++ ++(defun gnus-dbts-browse-debpkg-or-bug (thing) + (interactive "i") +- (require 'thingatpt) + (let* ((the-thing (if (null thing) + (thing-at-point 'sexp) + thing)) +@@ -80,45 +112,48 @@ + the-thing)) + (url (if bugp + "http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=" +- "http://cgi.debian.org/cgi-bin/search_packages.pl?&searchon=names&version=all&release=all&keywords="))) ++ (concat ++ "http://cgi.debian.org/cgi-bin/search_packages.pl" ++ "?&searchon=names&version=all&release=all&keywords=")))) + (browse-url (concat url bug-or-feature)))) + +-(defvar in-debian-group-p nil) +-(add-hook 'gnus-select-article-hook +- (lambda () +- (setq in-debian-group-p (string-match "debian" +- (gnus-group-real-name +- gnus-newsgroup-name))))) +- +-(defvar in-debian-devel-announce-group-p nil) +-(add-hook 'gnus-select-article-hook +- (lambda () +- (setq in-debian-devel-announce-group-p +- (string-match "debian.devel.announce" +- (gnus-group-real-name +- gnus-newsgroup-name))))) +- +-(defun anti-buttonize-debian (regexp num predicate) ++(defun gnus-dbts-buttonize-debian (regexp num predicate) + (add-to-list 'gnus-button-alist + (list regexp + num + predicate +- 'anti-browse-debpkg-or-bug ++ 'gnus-dbts-browse-debpkg-or-bug + num))) + +-(add-hook +- 'gnus-article-mode-hook ; only run once, as soon as the article buffer has been created. +- (lambda () +- (anti-buttonize-debian anti-gnus-debian-bug-regexp 3 +- 'in-debian-group-p) +- (anti-buttonize-debian anti-gnus-debian-reassign-or-merge-regexp 3 +- 'in-debian-group-p) +- (anti-buttonize-debian anti-gnus-debian-bug-BTS-regexp 1 +- 'in-debian-devel-announce-group-p) +- +- (anti-buttonize-debian anti-gnus-debian-reassign-regexp 1 +- 'in-debian-group-p) +- (anti-buttonize-debian anti-gnus-debian-reassign-regexp 2 +- 'in-debian-group-p))) ++(defun gnus-dbts-buttonize () ++ (gnus-dbts-buttonize-debian gnus-dbts-debian-bug-regexp 3 ++ 'gnus-dbts-in-debian-group-p) ++ (gnus-dbts-buttonize-debian gnus-dbts-debian-reassign-or-merge-regexp 3 ++ 'gnus-dbts-in-debian-group-p) ++ (gnus-dbts-buttonize-debian gnus-dbts-debian-bug-regexp 1 ++ 'gnus-dbts-in-debian-devel-announce-group-p) ++ (gnus-dbts-buttonize-debian gnus-dbts-debian-reassign-regexp 1 ++ 'gnus-dbts-in-debian-group-p) ++ (gnus-dbts-buttonize-debian gnus-dbts-debian-reassign-regexp 2 ++ 'gnus-dbts-in-debian-group-p)) ++ ++(defun gnus-dbts-gnus-select-article-hook () ++ (setq gnus-dbts-in-debian-group-p ++ (string-match "debian" ++ (gnus-group-real-name ++ gnus-newsgroup-name))) ++ (setq gnus-dbts-in-debian-devel-announce-group-p ++ (string-match "debian.devel.announce" ++ (gnus-group-real-name ++ gnus-newsgroup-name)))) ++ ++(defun gnus-dbts-gnus-install () ++ (add-hook 'gnus-select-article-hook 'gnus-dbts-gnus-select-article-hook) ++ ;; only run once, as soon as the article buffer has been created. ++ (add-hook 'gnus-article-mode-hook 'gnus-dbts-buttonize)) ++ ++(eval-after-load "gnus" '(progn (gnus-dbts-gnus-install))) + + (provide 'gnus-BTS) ++ ++;; End of file --- emacs-goodies-el-29.4.orig/debian/patches/50_browse-kill-ring_bug224751.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_browse-kill-ring_bug224751.dpatch @@ -0,0 +1,40 @@ +#!/bin/sh -e +## 50_browse-kill-ring_bug224751.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el 2003-10-07 19:18:23.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/browse-kill-ring.el 2003-12-22 20:42:42.000000000 -0500 +@@ -456,7 +456,10 @@ + (unwind-protect + (progn + (setq buffer-read-only nil) +- (let ((target (overlay-get over 'browse-kill-ring-target))) ++ (let ((target (overlay-get over 'browse-kill-ring-target)) ++ ;; See http://bugs.debian.org/224751 ++ ;; Emacs 21.1 fails when text was read-only ++ (inhibit-read-only t)) + (delete-region (overlay-start over) + (1+ (overlay-end over))) + (setq kill-ring (delete target kill-ring))) --- emacs-goodies-el-29.4.orig/debian/patches/50_protbuf_custom_and_toggle.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_protbuf_custom_and_toggle.dpatch @@ -0,0 +1,185 @@ +#!/bin/sh -e +## 50_protbuf_custom_and_toggle.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: protbuf - custom support + true toggles. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/protbuf.el emacs-goodies-el/elisp/emacs-goodies-el/protbuf.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/protbuf.el 2003-10-07 19:18:26.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/protbuf.el 2003-10-07 21:20:08.000000000 -0400 +@@ -29,24 +29,49 @@ + + ;; This package allows you to make it harder to kill buffers accidentally, + ;; e.g. by being too trigger happy selecting items in the buffer menu. +-;; protect-process-buffer-from-kill-mode is perhaps the more useful of the +-;; two, making it harder to accidentally kill shell buffers without ++;; ++;; The commands are: ++;; ++;; `protect-buffer-from-kill-mode' ++;; Toggle kill-buffer protection on current buffer. ++;; ++;; `protect-process-buffer-from-kill-mode' ++;; Toggle kill-buffer protection on current buffer with active process. ++;; Protection only applies as long as the buffer has an active process. ++;; ++;; `protect-process-buffer-from-kill-mode' is perhaps the more useful of ++;; the two, making it harder to accidentally kill shell buffers without + ;; terminating the process in them first. + ++;;; History: ++;; ++;; 2003-10-07 Peter S Galbraith ++;; - custom interface support. ++;; - make interactive commands toggle the minor-mode. ++;; - some checkdoc changes. ++ + ;;; Code: + +-(defvar protect-buffer-verbose t +- "*If non-nil, print a message when attempting to kill a protected buffer.") ++(defgroup protect-buffer nil ++ "Protect buffers from accidental killing." ++ :group 'killing) + +-(defvar protect-buffer-bury-p t ++(defcustom protect-buffer-verbose t ++ "*If non-nil, print a message when attempting to kill a protected buffer." ++ :type 'boolean ++ :group 'protect-buffer) ++ ++(defcustom protect-buffer-bury-p t + "*If non-nil, bury buffer when attempting to kill it. + This only has an effect if the buffer to be killed is the one +-visible in the selected window.") ++visible in the selected window." ++ :type 'boolean ++ :group 'protect-buffer) + + + ;;;###autoload + (defvar protect-buffer-from-kill-mode nil +- "*If non-`nil', then prevent buffer from being accidentally killed. ++ "*If non-nil, then prevent buffer from being accidentally killed. + This variable is local to all buffers.") + (progn + (make-variable-buffer-local 'protect-buffer-from-kill-mode) +@@ -57,7 +82,7 @@ + + ;;;###autoload + (defvar protect-process-buffer-from-kill-mode nil +- "*If non-`nil', then protect buffer with live process from being killed. ++ "*If non-nil, then protect buffer with live process from being killed. + This variable is local to all buffers.") + (progn + (make-variable-buffer-local 'protect-process-buffer-from-kill-mode) +@@ -84,32 +109,26 @@ + + ;;;###autoload + (defun protect-buffer-from-kill-mode (&optional prefix buffer) +- "Protect buffer from being killed. +-To remove this protection, call this command with a negative prefix argument." ++ "Toggle `kill-buffer' protection on current buffer. ++Optionally, set a PREFIX argument to set or unset protection, and specify ++alternate BUFFER." + (interactive "P") +- (or buffer (setq buffer (current-buffer))) + (save-excursion +- ;; Each cond does its own set-buffer *after* comparing prefix just in +- ;; case there's a buffer-local variable `prefix' to screw up the works. +- (cond +- ((null prefix) +- (set-buffer buffer) +- (setq protect-buffer-from-kill-mode +- (not protect-buffer-from-kill-mode))) +- ((>= prefix 0) +- (set-buffer buffer) +- (setq protect-buffer-from-kill-mode t)) +- (t +- (set-buffer buffer) +- (setq protect-buffer-from-kill-mode nil))) ++ (if buffer ++ (set-buffer buffer)) ++ (set (make-local-variable 'protect-buffer-from-kill-mode) ++ (if prefix ++ (> (prefix-numeric-value prefix) 0) ++ (not protect-buffer-from-kill-mode))) + ;; This is always done because kill-buffer-query-functions might have + ;; been buffer-local when this package was initially loaded, leaving + ;; the global value unchanged. + (add-hook 'kill-buffer-query-functions 'protect-buffer-from-kill))) + +-;; This function is listed in kill-buffer-query-functions; it should return +-;; nil if the buffer should not be killed, t otherwise. + (defun protect-buffer-from-kill () ++ "Implements protection from buffer killing. ++This function is listed in `kill-buffer-query-functions'; it should return ++nil if the buffer should not be killed, t otherwise." + (cond + (protect-buffer-from-kill-mode + (and protect-buffer-verbose +@@ -125,32 +144,27 @@ + + ;;;###autoload + (defun protect-process-buffer-from-kill-mode (&optional prefix buffer) +- "Protect buffer from being killed as long as it has an active process. +-To remove this protection, call this command with a negative prefix argument." ++ "Toggle `kill-buffer' protection on current buffer with active process. ++Protection only applies as long as the buffer has an active process. ++Optionally, set a PREFIX argument to set or unset protection, and specify ++alternate BUFFER." + (interactive "P") +- (or buffer (setq buffer (current-buffer))) + (save-excursion +- ;; Each cond does its own set-buffer *after* comparing prefix just in +- ;; case there's a buffer-local variable `prefix' to screw up the works. +- (cond +- ((null prefix) +- (set-buffer buffer) +- (setq protect-process-buffer-from-kill-mode +- (not protect-process-buffer-from-kill-mode))) +- ((>= prefix 0) +- (set-buffer buffer) +- (setq protect-process-buffer-from-kill-mode t)) +- (t +- (set-buffer buffer) +- (setq protect-process-buffer-from-kill-mode nil))) ++ (if buffer ++ (set-buffer buffer)) ++ (set (make-local-variable 'protect-process-buffer-from-kill-mode) ++ (if prefix ++ (> (prefix-numeric-value prefix) 0) ++ (not protect-process-buffer-from-kill-mode))) + ;; This is always done because kill-buffer-query-functions might have + ;; been buffer-local when this package was initially loaded, leaving + ;; the global value unchanged. + (add-hook 'kill-buffer-query-functions 'protect-process-buffer-from-kill))) + +-;; This function is listed in kill-buffer-query-functions; it should return +-;; nil if the buffer should be protected, t if buffer should be killed. + (defun protect-process-buffer-from-kill () ++ "Implements protection from buffer killing. ++This function is listed in `kill-buffer-query-functions'; it should return ++nil if the buffer should be protected, t if buffer should be killed." + (cond + ((not protect-process-buffer-from-kill-mode) t) + ((or (and (boundp 'protect-process-buffer-from-kill-preserve-function) --- emacs-goodies-el-29.4.orig/debian/patches/50_filladapt_bug420845.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_filladapt_bug420845.dpatch @@ -0,0 +1,27 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 50_filladapt_bug420845.dpatch by +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/filladapt.el emacs-goodies-el/elisp/emacs-goodies-el/filladapt.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/filladapt.el 2003-04-04 15:16:01.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/filladapt.el 2007-05-14 19:41:02.000000000 -0400 +@@ -72,7 +72,7 @@ + + (provide 'filladapt) + +-(defvar filladapt-version "2.12" ++(defvar filladapt-version "2.12debian" + "Version string for filladapt.") + + ;; BLOB to make custom stuff work even without customize +@@ -620,6 +620,7 @@ + + (defun turn-on-filladapt-mode () + "Unconditionally turn on Filladapt mode in the current buffer." ++ (interactive) + (filladapt-mode 1)) + + (defun turn-off-filladapt-mode () --- emacs-goodies-el-29.4.orig/debian/patches/51_session_autoload.dpatch +++ emacs-goodies-el-29.4/debian/patches/51_session_autoload.dpatch @@ -0,0 +1,36 @@ +#!/bin/sh -e +## 51_session_autoload.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Remove a defmacro autoload tag. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/session.el emacs-goodies-el/elisp/emacs-goodies-el/session.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/session.el 2003-10-15 20:59:25.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/session.el 2003-10-15 20:59:36.000000000 -0400 +@@ -1467,7 +1467,6 @@ + (cond ((vectorp first) (aref first 0)) + ((consp first) (car first)))))))) + +-;;;###autoload + (defunx session-initialize (&rest dummies) + ;; checkdoc-params: (dummies) + "Initialize package session and read previous session file. --- emacs-goodies-el-29.4.orig/debian/patches/50_session_enable_custom.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_session_enable_custom.dpatch @@ -0,0 +1,71 @@ +#!/bin/sh -e +## 50_session_enable_custom.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/session.el emacs-goodies-el/elisp/emacs-goodies-el/session.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/session.el 2003-10-05 20:15:00.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/session.el 2003-10-05 20:29:09.000000000 -0400 +@@ -53,7 +53,8 @@ + + ;; Put this file into your load-path and the following into your ~/.emacs: + ;; (require 'session) +-;; (add-hook 'after-init-hook 'session-initialize) ++;; and customize the variable `session-initialize; to some non-nil value. ++ + + ;; If you want to use both desktop and session, use: + ;; (setq desktop-globals-to-save '(desktop-missing-file-warning)) +@@ -192,7 +193,7 @@ + :help-echo "Initialize package Session." + :action session-initialize)) + +-(defcustom session-initialize t ++(defcustom session-initialize nil + "Whether/what to initialize with `session-initialize'. + If t, do full initialization. Otherwise, the value should be a list + with element. To enable, include +@@ -202,14 +203,20 @@ + * `places' to store and use places for files/buffers, + * `keys' to setup the default key and mouse bindings, + * `menus' to setup the menus." +- :group 'session-miscellaneous +- :type '(choice (const :tag "All" t) ++ :group 'session ++ :type '(choice (const :tag "Not used" nil) ++ (const :tag "All" t) + (set :value (de-saveplace session places keys menus) + (const :tag "De-install saveplace" de-saveplace) + (const :tag "Load/Save Session" session) + (const :tag "Store/Use Places" places) + (const :tag "Setup Key/Mouse Bindings" keys) +- (const :tag "Setup Menus" menus)))) ++ (const :tag "Setup Menus" menus))) ++ :require 'session ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (when value ++ (add-hook 'after-init-hook 'session-initialize)))) + + + ;;;=========================================================================== --- emacs-goodies-el-29.4.orig/debian/patches/50_color-theme_custom.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_color-theme_custom.dpatch @@ -0,0 +1,272 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 50_color-theme_custom.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/color-theme.el emacs-goodies-el/elisp/emacs-goodies-el/color-theme.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/color-theme.el 2005-10-25 21:50:52.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/color-theme.el 2005-10-25 22:01:01.000000000 -0400 +@@ -220,7 +220,7 @@ + + ;; face-attr-construct has a problem in Emacs 20.7 and older when + ;; dealing with inverse-video faces. Here is a short test to check +-;; wether you are affected. ++;; whether you are affected. + + ;; (set-background-color "wheat") + ;; (set-foreground-color "black") +@@ -263,92 +263,6 @@ + + ;; Customization + +-(defgroup color-theme nil +- "Color Themes for Emacs. +-A color theme consists of frame parameter settings, variable settings, +-and face definitions." +- :version "20.6" +- :group 'faces) +- +-(defcustom color-theme-legal-frame-parameters "\\(color\\|mode\\)$" +- "Regexp that matches frame parameter names. +-Only frame parameter names that match this regexp can be changed as part +-of a color theme." +- :type '(choice (const :tag "Colors only" "\\(color\\|mode\\)$") +- (const :tag "Colors, fonts, and size" +- "\\(color\\|mode\\|font\\|height\\|width\\)$") +- (regexp :tag "Custom regexp")) +- :group 'color-theme +- :link '(info-link "(elisp)Window Frame Parameters")) +- +-(defcustom color-theme-legal-variables "\\(color\\|face\\)$" +- "Regexp that matches variable names. +-Only variables that match this regexp can be changed as part of a color +-theme. In addition to matching this name, the variables have to be user +-variables (see function `user-variable-p')." +- :type 'regexp +- :group 'color-theme) +- +-(defcustom color-theme-illegal-faces "^w3-" +- "Regexp that matches face names forbidden in themes. +-The default setting \"^w3-\" excludes w3 faces since these +-are created dynamically." +- :type 'regexp +- :group 'color-theme +- :link '(info-link "(elisp)Faces for Font Lock") +- :link '(info-link "(elisp)Standard Faces")) +- +-(defcustom color-theme-illegal-default-attributes '(:family :height :width) +- "A list of face properties to be ignored when installing faces. +-This prevents Emacs from doing terrible things to your display just because +-a theme author likes weird fonts." +- :type '(repeat symbol) +- :group 'color-theme) +- +-(defcustom color-theme-is-global t +- "*Determines wether a color theme is installed on all frames or not. +-If non-nil, color themes will be installed for all frames. +-If nil, color themes will be installed for the selected frame only. +- +-A possible use for this variable is dynamic binding. Here is a larger +-example to put in your ~/.emacs; it will make the Blue Sea color theme +-the default used for the first frame, and it will create two additional +-frames with different color themes. +- +-setup: +- \(require 'color-theme) +- ;; set default color theme +- \(color-theme-blue-sea) +- ;; create some frames with different color themes +- \(let ((color-theme-is-global nil)) +- \(select-frame (make-frame)) +- \(color-theme-gnome2) +- \(select-frame (make-frame)) +- \(color-theme-standard)) +- +-Please note that using XEmacs and and a nil value for +-color-theme-is-global will ignore any variable settings for the color +-theme, since XEmacs doesn't have frame-local variable bindings. +- +-Also note that using Emacs and a non-nil value for color-theme-is-global +-will install a new color theme for all frames. Using XEmacs and a +-non-nil value for color-theme-is-global will install a new color theme +-only on those frames that are not using a local color theme." +- :type 'boolean +- :group 'color-theme) +- +-(defcustom color-theme-is-cumulative t +- "*Determines wether new color themes are installed on top of each other. +-If non-nil, installing a color theme will undo all settings made by +-previous color themes." +- :type 'boolean +- :group 'color-theme) +- +-(defcustom color-theme-mode-hook nil +- "Hook for color-theme-mode." +- :type 'hook +- :group 'color-theme) +- + (defvar color-theme-mode-map + (let ((map (make-sparse-keymap))) + (define-key map (kbd "RET") 'color-theme-install-at-point) +@@ -375,15 +289,6 @@ + (defvar color-theme-history nil + "List of color-themes called, in reverse order") + +-(defcustom color-theme-history-max-length nil +- "Max length of history to maintain. +-Two other values are acceptable: t means no limit, and +-nil means that no history is maintained." +- :type '(choice (const :tag "No history" nil) +- (const :tag "Unlimited length" t) +- integer) +- :group 'color-theme) +- + (defvar color-theme-counter 0 + "Counter for every addition to `color-theme-history'. + This counts how many themes were installed, regardless +@@ -542,6 +447,7 @@ + color-theme-legal-frame-parameters)))) + (add-hook 'after-init-hook 'color-theme-backup-original-values) + ++;;;###autoload + (defun color-theme-select (&optional arg) + "Displays a special buffer for selecting and installing a color theme. + With optional prefix ARG, this buffer will include color theme libraries +@@ -15165,6 +15071,135 @@ + (widget-inactive-face ((t (:foreground "dim gray")))) + (widget-single-line-field-face ((t (:background "gray85"))))))) + ++(defgroup color-theme nil ++ "Color Themes for Emacs. ++A color theme consists of frame parameter settings, variable settings, ++and face definitions." ++ :version "20.6" ++ :group 'faces) ++ ++;; Added by Peter S Galbraith , 2005-10-25 ++;; ++;; A color-theme can can selected and enabled for future sessions by ++;; customizing this instead of calling `color-theme-select' ++(defcustom color-theme-selection nil ++ "Color theme selection. ++Select and save to enable your choice in future sessions. ++There is very limited undo capability to the previous state only." ++ :type (progn ++ (setq color-themes (delq (assq 'color-theme-snapshot color-themes) ++ color-themes) ++ color-themes (delq (assq 'bury-buffer color-themes) ++ color-themes)) ++ (append ++ '(radio) ++ (cons '(const :tag "Undo" nil) ++ (mapcar (function (lambda (arg) `(const ,arg))) ++ (mapcar '(lambda (x) (elt x 1)) color-themes))))) ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (cond ++ (value ++ (fset 'color-theme-snapshot (color-theme-make-snapshot)) ++ (eval ++ (delq nil ++ (mapcar ++ '(lambda (x) (if (string-equal (elt x 1) value) ++ (car x))) ++ color-themes)))) ++ ((fboundp 'color-theme-snapshot) ++ (color-theme-snapshot)))) ++ :group 'color-theme ++ :require 'color-theme) ++ ++(defcustom color-theme-legal-frame-parameters "\\(color\\|mode\\)$" ++ "Regexp that matches frame parameter names. ++Only frame parameter names that match this regexp can be changed as part ++of a color theme." ++ :type '(choice (const :tag "Colors only" "\\(color\\|mode\\)$") ++ (const :tag "Colors, fonts, and size" ++ "\\(color\\|mode\\|font\\|height\\|width\\)$") ++ (regexp :tag "Custom regexp")) ++ :group 'color-theme ++ :link '(info-link "(elisp)Window Frame Parameters")) ++ ++(defcustom color-theme-legal-variables "\\(color\\|face\\)$" ++ "Regexp that matches variable names. ++Only variables that match this regexp can be changed as part of a color ++theme. In addition to matching this name, the variables have to be user ++variables (see function `user-variable-p')." ++ :type 'regexp ++ :group 'color-theme) ++ ++(defcustom color-theme-illegal-faces "^w3-" ++ "Regexp that matches face names forbidden in themes. ++The default setting \"^w3-\" excludes w3 faces since these ++are created dynamically." ++ :type 'regexp ++ :group 'color-theme ++ :link '(info-link "(elisp)Faces for Font Lock") ++ :link '(info-link "(elisp)Standard Faces")) ++ ++(defcustom color-theme-illegal-default-attributes '(:family :height :width) ++ "A list of face properties to be ignored when installing faces. ++This prevents Emacs from doing terrible things to your display just because ++a theme author likes weird fonts." ++ :type '(repeat symbol) ++ :group 'color-theme) ++ ++(defcustom color-theme-is-global t ++ "*Determines whether a color theme is installed on all frames or not. ++If non-nil, color themes will be installed for all frames. ++If nil, color themes will be installed for the selected frame only. ++ ++A possible use for this variable is dynamic binding. Here is a larger ++example to put in your ~/.emacs; it will make the Blue Sea color theme ++the default used for the first frame, and it will create two additional ++frames with different color themes. ++ ++setup: ++ \(require 'color-theme) ++ ;; set default color theme ++ \(color-theme-blue-sea) ++ ;; create some frames with different color themes ++ \(let ((color-theme-is-global nil)) ++ \(select-frame (make-frame)) ++ \(color-theme-gnome2) ++ \(select-frame (make-frame)) ++ \(color-theme-standard)) ++ ++Please note that using XEmacs and and a nil value for ++color-theme-is-global will ignore any variable settings for the color ++theme, since XEmacs doesn't have frame-local variable bindings. ++ ++Also note that using Emacs and a non-nil value for color-theme-is-global ++will install a new color theme for all frames. Using XEmacs and a ++non-nil value for color-theme-is-global will install a new color theme ++only on those frames that are not using a local color theme." ++ :type 'boolean ++ :group 'color-theme) ++ ++(defcustom color-theme-is-cumulative t ++ "*Determines whether new color themes are installed on top of each other. ++If non-nil, installing a color theme will undo all settings made by ++previous color themes." ++ :type 'boolean ++ :group 'color-theme) ++ ++(defcustom color-theme-mode-hook nil ++ "Hook for color-theme-mode." ++ :type 'hook ++ :group 'color-theme) ++ ++(defcustom color-theme-history-max-length nil ++ "Max length of history to maintain. ++Two other values are acceptable: t means no limit, and ++nil means that no history is maintained." ++ :type '(choice (const :tag "No history" nil) ++ (const :tag "Unlimited length" t) ++ integer) ++ :group 'color-theme) ++ + (provide 'color-theme) + + ;;; color-theme.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/50_gnus-filterhist.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_gnus-filterhist.dpatch @@ -0,0 +1,41 @@ +#!/bin/sh -e +## 50_gnus-filterhist.dpatch by Jaakko Kangasharju +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Set font before turning buffer read-only (Fixes #331234) + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad ../emacs-goodies-el/elisp/gnus-bonus-el/gnus-filterhist.el emacs-goodies-el/elisp/gnus-bonus-el/gnus-filterhist.el +--- ../emacs-goodies-el/elisp/gnus-bonus-el/gnus-filterhist.el 2003-10-17 23:20:53.000000000 +0300 ++++ emacs-goodies-el/elisp/gnus-bonus-el/gnus-filterhist.el 2005-10-13 20:59:18.000000000 +0300 +@@ -188,9 +188,9 @@ + ) + ))) + (setq nnmail-session-split-history my-session-split-history) +- )))) +- (add-text-properties (point-min) (point-max) +- '(face gnus-filterhist-face-1)) ++ )) ++ (add-text-properties (point-min) (point-max) ++ '(face gnus-filterhist-face-1)))) + (switch-to-buffer buf) + (if gnus-filter-history-popup + (pop-to-buffer "*Filter History*") --- emacs-goodies-el-29.4.orig/debian/patches/50_joc-toggle-case.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_joc-toggle-case.dpatch @@ -0,0 +1,211 @@ +#!/bin/sh -e +## 50_joc-toggle-case.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Rename and add joc- prefix. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-case.el emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-case.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-case.el 2003-11-26 20:55:45.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-case.el 2003-11-26 20:56:49.000000000 -0500 +@@ -28,7 +28,9 @@ + ;; Boston, MA 02111-1307, USA. + ;;; ************************************************************************** + +-;;; Description: ++;;; Commentary: ++;; ++;; Description: + ;; + ;; This packages provides a sophisticated (over-engineered?) set of + ;; functions to toggle the case of the character under point, with +@@ -38,16 +40,16 @@ + ;; character, allowing successive invocations to progress down the + ;; line. + +-;;; Installation: ++;; Installation: + ;; + ;; Put this file on your Emacs-Lisp load path and add the following to your + ;; ~/.emacs startup file + ;; +-;; (require 'toggle-case) ++;; (require 'joc-toggle-case) + ;; + ;; See below for key-binding suggestions. + +-;;; Usage: ++;; Usage: + ;; + ;; M-x `joc-toggle-case' + ;; Toggles the case of the character under point. If called with +@@ -81,7 +83,7 @@ + ;; M-x `joc-toggle-case-by-word-backwards' + ;; Toggles the case of all characters in the current region. + +-;;; Customization: ++;; Customization: + ;; + ;; M-x `joc-toggle-case-customize' to customize all package options. + ;; +@@ -95,7 +97,7 @@ + ;; is reversed, the semantics of this are reveresed as well + ;; (i.e. does it stop at the beginning of the line). + +-;;; Keybinding examples: ++;; Keybinding examples: + ;; + ;; This is what I have -- use it or not as you like. + ;; +@@ -119,7 +121,7 @@ + ;; Any comments, suggestions, bug reports or upgrade requests are welcome. + ;; Please send them to Joe Casadonte (emacs@northbound-train.com). + ;; +-;; This version of toggle-case was developed and tested with NTEmacs ++;; This version of joc-toggle-case was developed and tested with NTEmacs + ;; 2.7 under Windows NT 4.0 SP6 and Emacs 20.7.1 under Linux (RH7). + ;; Please, let me know if it works with other OS and versions of Emacs. + +@@ -128,6 +130,14 @@ + ;;; ************************************************************************** + ;;; ************************************************************************** + ;;; ************************************************************************** ++ ++;;; History: ++;; ++;; 2003-11-23 Peter S Galbraith ++;; This version, distributed in the Debian package `emacs-goodies-el', ++;; was renamed from toggle-case.el to joc-toggle-case.el. The prefix ++;; was also added in the file where appropriate. ++ + ;;; Code: + + ;;; ************************************************************************** +@@ -139,7 +149,7 @@ + + ;; --------------------------------------------------------------------------- + (defun joc-toggle-case-customize () +- "Customization of the group joc-toggle-case." ++ "Customization of the group `joc-toggle-case'." + (interactive) + (customize-group "joc-toggle-case")) + +@@ -150,7 +160,7 @@ + stop at the end of the line, set to `nil' it will not (it + will continue on to the next line). If direction of toggle + is reversed, the semantics of this are reveresed as well +-(i.e. does it stop at the beginning of the line)." ++\(i.e. does it stop at the beginning of the line)." + :group 'joc-toggle-case + :type 'boolean) + +@@ -158,31 +168,32 @@ + ;;; ***** version related routines + ;;; ************************************************************************** + (defconst joc-toggle-case-version +- "$Revision: 1.2 $" ++ "$Revision: 1.2 $" + "joc-toggle-case version number.") + + ;; --------------------------------------------------------------------------- + (defun joc-toggle-case-version-number () +- "Returns joc-toggle-case version number." ++ "Return `joc-toggle-case' version number." + (string-match "[0123456789.]+" joc-toggle-case-version) + (match-string 0 joc-toggle-case-version)) + + ;; --------------------------------------------------------------------------- + (defun joc-toggle-case-display-version () +- "Displays joc-toggle-case version." ++ "Displays `joc-toggle-case' version." + (interactive) + (message "joc-toggle-case version <%s>." (joc-toggle-case-version-number))) + + ;;; ************************************************************************** + ;;; ***** interactive functions + ;;; ************************************************************************** ++;;;###autoload + (defun joc-toggle-case (prefix) +- "Toggles the case of the character under point. If called with +-a prefix argument, it toggles that many characters (see +-joc-toggle-case-stop-at-eol). If the prefix is negative, the +-case of the character before point is toggled, and if called +-with a prefix argument, N characters before point will have +-their case toggled (see also joc-toggle-case-backwards)." ++ "Toggle the case of the character under point. ++If called with a PREFIX argument, it toggles that many ++characters (see joc-toggle-case-stop-at-eol). If the prefix is ++negative, the case of the character before point is toggled, and ++if called with a prefix argument, N characters before point will ++have their case toggled (see also joc-toggle-case-backwards)." + + (interactive "*p") + +@@ -207,14 +218,16 @@ + (setq lcv count))))) + + ;; --------------------------------------------------------------------------- ++;;;###autoload + (defun joc-toggle-case-backwards (prefix) +- "Convenience function to toggle case of character preceeding +-point. This is the same as calling joc-toggle-case with a +-negative prefix (and is in fact implemented that way)." ++ "Convenience function to toggle case of character preceeding point. ++This is the same as calling joc-toggle-case with a negative ++prefix (and is in fact implemented that way)." + (interactive "*p") + (joc-toggle-case (- prefix))) + + ;; --------------------------------------------------------------------------- ++;;;###autoload + (defun joc-toggle-case-by-word (prefix) + "Similar to joc-toggle-case except that the count (supplied by + the prefix argument) is of the number of words, not letters, to +@@ -238,14 +251,16 @@ + (joc-toggle-case (- end start)))) + + ;; --------------------------------------------------------------------------- ++;;;###autoload + (defun joc-toggle-case-by-word-backwards (prefix) +- "Convenience function to toggle case by word, backwards. This +-is the same as calling joc-toggle-case-by-word with a ++ "Convenience function to toggle case by word, backwards. ++This is the same as calling joc-toggle-case-by-word with a + negative prefix (and is in fact implemented that way)." + (interactive "*p") + (joc-toggle-case-by-word (- prefix))) + + ;; --------------------------------------------------------------------------- ++;;;###autoload + (defun joc-toggle-case-by-region (start end) + "Toggles the case of all characters in the current region." + (interactive "*r") +@@ -310,8 +325,6 @@ + ;;; ************************************************************************** + ;;; ***** we're done + ;;; ************************************************************************** +-(provide 'toggle-case) ++(provide 'joc-toggle-case) + +-;; toggle-case.el ends here! +-;;; ************************************************************************** +-;;;; ***** EOF ***** EOF ***** EOF ***** EOF ***** EOF ************* ++;;; joc-toggle-case.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/52_gnus-pers.dpatch +++ emacs-goodies-el-29.4/debian/patches/52_gnus-pers.dpatch @@ -0,0 +1,38 @@ +#!/bin/sh -e +## 52_gnus-pers.dpatch by Elias Oltmanns +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Verify gnus-newsgroup-name is set before using it (See bug #384402) + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2004-08-16 20:49:16.000000000 -0400 ++++ emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2004-08-16 20:51:59.000000000 -0400 +@@ -868,7 +868,8 @@ + (retval (nthcdr 2 split)) + partial regexp) + ;; Check to see if it's a "gnus-newsgroup-name" split +- (if (equal ",gnus-newsgroup-name" (cdr (assq field gnus-personality-split-abbrev-alist))) ++ (if (and gnus-newsgroup-name ++ (equal ",gnus-newsgroup-name" (cdr (assq field gnus-personality-split-abbrev-alist)))) + (let ((groupname gnus-newsgroup-name)) + (if (string-match value groupname) + retval)) --- emacs-goodies-el-29.4.orig/debian/patches/50_lcomp.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_lcomp.dpatch @@ -0,0 +1,156 @@ +#!/bin/sh -e +## 50_lcomp.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Do not enable simply by loading. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/lcomp.el emacs-goodies-el/elisp/emacs-goodies-el/lcomp.el +--- /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/lcomp.el 2003-11-17 13:31:50.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/lcomp.el 2003-11-17 13:23:44.000000000 -0500 +@@ -20,6 +20,49 @@ + ;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + ;; Boston, MA 02111-1307, USA. + ++;;; Commentary: ++ ++;; This package adds keybindings to the completions buffer: ++;; ++;; "\C-i" -> next-completion ++;; "\M-\C-i" -> previous-completion ++;; "f" -> next-completion ++;; "b" -> previous-completion ++;; "n" -> next-line ++;; "p" -> previous-line ++;; " " -> scroll-up ++;; [del] -> scroll-down ++;; [backspace] -> scroll-down ++;; "q" -> delete-completion-window ++;; ++;; and a global keybinding: ++;; ++;; "\M-v" -> lcomp-select-completion-window-or-scroll-down ++;; ++;; You may also enable advice to other Emacs functions to make the ++;; completions buffer window disappear after use. The completions buffer ++;; is usually only dismissed after completion when it is created from ++;; minibuffer completion, but this advice makes it get dismissed correctly ++;; from any buffer (e.g. shell, or by calling ++;; `comint-dynamic-complete-filename'). To enable this advice, put these ++;; lines into your ~/.emacs. ++;; ++;; (require 'lcomp) ++;; (lcomp-activate-advices t) ++;; ++;; Or alternatively, customize the variable `lcomp-enable' and save the ++;; setting for future sessions. ++ ++;;; History: ++;; ++;; 2003-11-11 Peter S Galbraith ++;; - Create `lcomp-activate-advices' to activate the advice instead of ++;; doing it by default. This complies with Elisp Coding conventions ++;; that state that loading a file shouldn't install anything. Perhaps ++;; the same should be done with all the key definitions? ++;; - Create defcustom `lcomp-enable' as an alternate and user-frienfly ++;; method to enable the advice. ++ + ;;; Code: + + (defvar lcomp-before-completion-winconf nil) +@@ -40,7 +83,7 @@ + (define-key completion-list-mode-map "q" 'delete-completion-window) + (define-key global-map "\M-v" 'lcomp-select-completion-window-or-scroll-down) + +-(defadvice try-completion (around lcomp-ad activate) ++(defadvice try-completion (around lcomp-ad disable) + (let ((ret ad-do-it)) + (setq lcomp-completion-halfway-p (stringp ret)) + ret)) +@@ -54,10 +97,11 @@ + + (add-hook 'completion-setup-hook 'lcomp-setup-completion) + ++(defvar err) + (defun lcomp-resume-before-completion-winconf-1 () + (condition-case nil + (set-window-configuration lcomp-before-completion-winconf) +- (error ++ (error + (message "%s occured. bat ignore." (error-message-string err)))) + (setq lcomp-before-completion-winconf nil) + (setq lcomp-completion-buffer nil)) +@@ -80,11 +124,11 @@ + + (add-hook 'post-command-hook 'lcomp-resume-before-completion-winconf) + +-(defadvice choose-completion (after lcomp-ad activate) ++(defadvice choose-completion (after lcomp-ad disable) + (when lcomp-before-completion-winconf + (lcomp-resume-before-completion-winconf-1))) + +-(defadvice delete-completion-window (around lcomp-ad activate) ++(defadvice delete-completion-window (around lcomp-ad disable) + (if lcomp-before-completion-winconf + (lcomp-resume-before-completion-winconf) + ad-do-it)) +@@ -99,6 +143,39 @@ + (lcomp-select-completion-window) + (scroll-down arg))) + ++;;;###autoload ++(defun lcomp-activate-advices (on) ++ "Activate lcomp advices if ON is non-nil, disable otherwise." ++ (interactive "p") ++ (cond ++ (on ++ (message "Enabling lcomp") ++ (ad-enable-advice 'try-completion 'around 'lcomp-ad) ++ (ad-enable-advice 'choose-completion 'after 'lcomp-ad) ++ (ad-enable-advice 'delete-completion-window 'around 'lcomp-ad)) ++ (t ++ (message "Disabling lcomp") ++ (ad-disable-advice 'try-completion 'around 'lcomp-ad) ++ (ad-disable-advice 'choose-completion 'after 'lcomp-ad) ++ (ad-disable-advice 'delete-completion-window 'around 'lcomp-ad))) ++ (ad-activate 'try-completion) ++ (ad-activate 'choose-completion) ++ (ad-activate 'delete-completion-window)) ++ ++(defgroup lcomp nil ++ "list-completion hacks." ++ :group 'completion) ++ ++(defcustom lcomp-enable nil ++ "*Enable advice in lcomp to make completion buffer disappear after use." ++ :type 'boolean ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (if (featurep 'lcomp) ++ (lcomp-activate-advices t))) ++ :require 'lcomp ++ :group 'lcomp) ++ + (provide 'lcomp) + +-;;; lcomp.el ends here +\ No newline at end of file ++;;; lcomp.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/50_joc-toggle-buffer.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_joc-toggle-buffer.dpatch @@ -0,0 +1,99 @@ +#!/bin/sh -e +## 50_joc-toggle-buffer.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add joc- prefix. $Revision: 1.5 $ + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/rhogee/emacs/pkg-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-buffer.el emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-buffer.el +--- /home/rhogee/emacs/pkg-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-buffer.el 2004-04-20 14:44:06.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/joc-toggle-buffer.el 2004-04-20 14:46:48.000000000 -0400 +@@ -1,4 +1,4 @@ +-;;; @(#) toggle-buffer.el --- flips back and forth between two buffers ++;;; @(#) joc-toggle-buffer.el --- flips back and forth between two buffers + + ;; Copyright (C) 2001 by Joseph L. Casadonte Jr. + +@@ -62,7 +62,7 @@ + ;; Put this file on your Emacs-Lisp load path and add the following to your + ;; ~/.emacs startup file + ;; +-;; (require 'toggle-buffer) ++;; (require 'joc-toggle-buffer) + + ;;; Usage: + ;; +@@ -99,13 +99,18 @@ + ;; Any comments, suggestions, bug reports or upgrade requests are welcome. + ;; Please send them to Joe Casadonte (emacs@northbound-train.com). + ;; +-;; This version of toggle-buffer was developed and tested with NTEmacs 20.5.1 ++;; This version of joc-toggle-buffer was developed and tested with NTEmacs 20.5.1 + ;; and 2.7 under Windows NT 4.0 SP6 and Emacs 20.7.1 under Linux (RH7). + ;; Please, let me know if it works with other OS and versions of Emacs. + + ;;; Change Log: + ;; + ;; see http://www.northbound-train.com/emacs/toggle-buffer.log ++;; ++;; 2003-11-23 Peter S Galbraith ++;; This version, distributed in the Debian package `emacs-goodies-el', ++;; was renamed from toggle-buffer.el to joc-toggle-buffer.el. The prefix ++;; was also added to a few variables. + + ;;; ************************************************************************** + ;;; ************************************************************************** +@@ -151,7 +156,7 @@ + :group 'joc-toggle-buffer) + + ;; --------------------------------------------------------------------------- +-(defcustom toggle-buffer-load-hook nil ++(defcustom joc-toggle-buffer-load-hook nil + "Hook to run when package is loaded." + :type 'hook + :group 'joc-toggle-buffer) +@@ -181,10 +186,12 @@ + (defvar joc-toggle-buffer-last-buffer nil + "Contains the name of the previous buffer.") + ++;;;###autoload + (defun joc-toggle-buffer () + "Switch to previous active buffer." + (interactive) +- (if (not (boundp 'joc-toggle-buffer-last-buffer)) ++ (if (or (not (boundp 'joc-toggle-buffer-last-buffer)) ++ (not joc-toggle-buffer-last-buffer)) + (error "No previous buffer to switch to (yet)")) + (let ((buff (get-buffer joc-toggle-buffer-last-buffer))) + (if (not buff) +@@ -231,9 +238,8 @@ + ;;; ************************************************************************** + ;;; ***** we're done + ;;; ************************************************************************** +-(provide 'toggle-buffer) +-(run-hooks 'toggle-buffer-load-hook) ++(run-hooks 'joc-toggle-buffer-load-hook) ++ ++(provide 'joc-toggle-buffer) + + ;;; toggle-buffer.el ends here +-;;; ************************************************************************** +-;;;; ***** EOF ***** EOF ***** EOF ***** EOF ***** EOF ************* --- emacs-goodies-el-29.4.orig/debian/patches/3_bar-cursor-customize.dpatch +++ emacs-goodies-el-29.4/debian/patches/3_bar-cursor-customize.dpatch @@ -0,0 +1,186 @@ +#!/bin/sh -e +## 3_bar-cursor-customize.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/bar-cursor.el emacs-goodies-el/elisp/emacs-goodies-el/bar-cursor.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/bar-cursor.el 2003-10-05 15:12:44.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/bar-cursor.el 2003-10-05 15:14:54.000000000 -0400 +@@ -3,7 +3,7 @@ + + ;; This file is not part of Emacs + +-;; Copyright (C) 2001 by Joseph L. Casadonte Jr. ++;; Copyright (C) 2001, 2003 by Joseph L. Casadonte Jr. + ;; Author: Joe Casadonte (emacs@northbound-train.com) + ;; Maintainer: Joe Casadonte (emacs@northbound-train.com) + ;; Created: July 1, 2001 +@@ -44,13 +44,17 @@ + ;; + ;; To add a directory to your load-path, use something like the following: + ;; +-;; (add-to-list 'load-path (expand-file-name "/some/load/path")) ++;; (add-to-list 'load-path (expand-file-name "/some/load/path")) + + ;;; Usage: + ;; + ;; M-x `bar-cursor-mode' + ;; Toggles bar-cursor-mode on & off. Optional arg turns +-;; bar-cursor-mode on iff arg is a positive integer. ++;; bar-cursor-mode on if arg is a positive integer. ++;; ++;; You may also use the custom interface to enable or disable it: ++;; ++;; M-x customize-variable [RET] bar-cursor-mode [RET] + + ;;; To Do: + ;; +@@ -60,6 +64,9 @@ + ;; + ;; The basis for this code comes from Steve Kemp by way of the + ;; NTEmacs mailing list. ++;; ++;; Peter S. Galbraith contributed a patch making ++;; bar-cursor-mode customizable. + + ;;; Comments: + ;; +@@ -85,7 +92,9 @@ + (eval-when-compile + ;; silence the old byte-compiler + (defvar byte-compile-dynamic nil) +- (set (make-local-variable 'byte-compile-dynamic) t)) ++ (set (make-local-variable 'byte-compile-dynamic) t) ++ (require 'advice) ++ (defvar bar-cursor-mode)) + + ;;; ************************************************************************** + ;;; ***** version related routines +@@ -109,43 +118,43 @@ + ;;; ************************************************************************** + ;;; ***** real functions + ;;; ************************************************************************** +-(defvar bar-cursor-mode nil "Non-nil if 'bar-cursor-mode' is enabled.") + +-;;; -------------------------------------------------------------------------- + ;;;###autoload + (defun bar-cursor-mode (&optional arg) +- "Toggle use of 'bar-cursor-mode'. +- ++ "Toggle use of variable `bar-cursor-mode'. + This quasi-minor mode changes cursor to a bar cursor in insert mode, + and a block cursor in overwrite mode. It may only be turned on and + off globally, not on a per-buffer basis (hence the quasi- designation). + +-Optional ARG turns mode on iff ARG is a positive integer." ++Optional ARG turns mode on if ARG is a positive integer." + (interactive "P") + + ;; toggle on and off + (let ((old-mode bar-cursor-mode)) +- (setq bar-cursor-mode +- (if arg (or (listp arg) +- (> (prefix-numeric-value arg) 0)) +- (not bar-cursor-mode))) ++ (setq bar-cursor-mode ++ (if arg (or (listp arg) ++ (> (prefix-numeric-value arg) 0)) ++ (not bar-cursor-mode))) ++ ++ (when (not (equal old-mode bar-cursor-mode)) ++ (bar-cursor-change)))) + +- (when (not (equal old-mode bar-cursor-mode)) +- ;; enable/disable advice +- (if bar-cursor-mode +- (ad-enable-advice 'overwrite-mode 'after 'bar-cursor-overwrite-mode-ad) +- (ad-disable-advice 'overwrite-mode 'after 'bar-cursor-overwrite-mode-ad)) ++;;;###autoload ++(defun bar-cursor-change () ++ "Enable or disable advice based on value of variable `bar-cursor-mode'." ++ (if bar-cursor-mode ++ (ad-enable-advice 'overwrite-mode 'after 'bar-cursor-overwrite-mode-ad) ++ (ad-disable-advice 'overwrite-mode 'after 'bar-cursor-overwrite-mode-ad)) + +- (ad-activate 'overwrite-mode) ++ (ad-activate 'overwrite-mode) + +- ;; set the initial cursor type now +- (bar-cursor-set-cursor) ++ ;; set the initial cursor type now ++ (bar-cursor-set-cursor) + +- ;; add or remove to frame hook +- (if bar-cursor-mode +- (add-hook 'after-make-frame-functions 'bar-cursor-set-cursor) +- (remove-hook 'after-make-frame-functions 'bar-cursor-set-cursor)) +- ))) ++ ;; add or remove to frame hook ++ (if bar-cursor-mode ++ (add-hook 'after-make-frame-functions 'bar-cursor-set-cursor) ++ (remove-hook 'after-make-frame-functions 'bar-cursor-set-cursor))) + + ;;;-------------------------------------------------------------------------- + (defadvice overwrite-mode (after bar-cursor-overwrite-mode-ad disable) +@@ -154,7 +163,7 @@ + + ;;;-------------------------------------------------------------------------- + (defun bar-cursor-set-cursor-type (cursor &optional frame) +- "Set the cursor-type for the named frame. ++ "Set the `cursor-type' for the named frame. + + CURSOR is the name of the cursor to use (bar or block -- any others?). + FRAME is optional frame to set the cursor for; current frame is used +@@ -169,7 +178,7 @@ + + ;;; -------------------------------------------------------------------------- + (defun bar-cursor-set-cursor (&optional frame) +- "Set the cursor-type according to the insertion mode. ++ "Set the `cursor-type' according to the insertion mode. + + FRAME is optional frame to set the cursor for; current frame is used + if not passed in." +@@ -177,6 +186,23 @@ + (bar-cursor-set-cursor-type 'bar frame) + (bar-cursor-set-cursor-type 'block frame))) + ++;;; -------------------------------------------------------------------------- ++(defgroup bar-cursor nil ++ "switch block cursor to a bar." ++ :group 'convenience) ++ ++(defcustom bar-cursor-mode nil ++ "*Non-nil means to convert the block cursor into a bar cursor. ++In overwrite mode, the bar cursor changes back into a block cursor. ++This is a quasi-minor mode, meaning that it can be turned on & off easily ++though only globally (hence the quasi-)" ++ :type 'boolean ++ :group 'bar-cursor ++ :require 'bar-cursor ++ :set (lambda (symbol value) ++ (set-default symbol value) ++ (bar-cursor-change))) ++ + ;;; ************************************************************************** + ;;; ***** we're done + ;;; ************************************************************************** --- emacs-goodies-el-29.4.orig/debian/patches/50_ctypes.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_ctypes.dpatch @@ -0,0 +1,322 @@ +#!/bin/sh -e +## 50_ctypes.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: Add custom support to ctypes.el + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/ctypes.el emacs-goodies-el/elisp/emacs-goodies-el/ctypes.el +--- /home/psg/emacs/emacs-goodies-el/newfiles/emacs-goodies-el/elisp/emacs-goodies-el/ctypes.el 2003-11-06 22:30:06.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/ctypes.el 2003-11-10 21:42:40.000000000 -0500 +@@ -4,9 +4,9 @@ + + ;; Author: Anders Lindgren + ;; Maintainer: Anders Lindgren +-;; Version: 1.3.1 ++;; Version: 1.4 by Peter S Galbraith + ;; Created: 1997-03-16 +-;; Date: 1999-06-23 ++;; Date: 2003-11-10 + + ;; CTypes is free software; you can redistribute it and/or modify + ;; it under the terms of the GNU General Public License as published by +@@ -228,11 +228,22 @@ + + ;;}}} + ++;;; History: ++;; ++;; 1.3.1 is from http://www.juliocastillo.com/emacs/site-lisp/ctypes.el ++;; ++;; 1.4 Peter S Galbraith ++;; I can't find the author, so did a few changes myself. ++;; - minor checkdoc changes (it still lists 43 documentation errors). ++;; - custom support. ++;; - add defcustom `ctypes-install' for easier setup in Debian package ++;; emacs-goodies-el. ++ + ;;; Code: + + ;;{{{ Dependencies + +-;; The only reason to load font-lock is to determinate the font-lock ++;; The only reason to load font-lock is to determine the font-lock + ;; version we are using. + + (require 'font-lock) +@@ -243,19 +254,38 @@ + ;;}}} + ;;{{{ Variables + +-(defvar ctypes-file-name "~/.ctypes" +- "*Default name of file to read types from. ++(defgroup ctypes nil ++ "Enhanced Font lock support for custom defined types." ++ :group 'programming) + +-When `ctypes-read-file' and `ctypes-write-file' are called interactively +-the directory part of the file name is ignored.") ++(defcustom ctypes-install nil ++ "*Whether to load this file at macs startup. ++Setting this variable will load the file to install the 'find-file-hooks ++and 'kill-emacs-hook hooks. The effect is the same as adding ++ (require 'ctypes) ++in your Emacs initilization file. ++The file ctypes.el must be in the Emacs load-path when the customization ++code is run in .emacs otherwise Emacs will not find it and will yield an ++error." ++ :type 'boolean ++ :require 'ctypes ++ :group 'ctypes) + ++(defcustom ctypes-file-name "~/.ctypes" ++ "*Default name of file to read types from. ++When `ctypes-read-file' and `ctypes-write-file' are called interactively ++the directory part of the file name is ignored." ++ :type 'file ++ :group 'ctypes) + +-(defvar ctypes-write-types-at-exit nil ++(defcustom ctypes-write-types-at-exit nil + "*When non-nil types are saved to file when Emacs exits. +- +-When this variable be 'ask, the user is prompted before the +-types are saved.") +- ++When this variable be 'ask, the user is prompted before the types are saved." ++ :type '(choice ++ (const :tag "t; save to file when Emacs exits" t) ++ (const :tag "nil; do not save to file when Emacs exits" nil) ++ (const :tag "ask; prompt before saving" ask)) ++ :group 'ctypes) + + (defvar ctypes-mode-descriptor + (if (boundp 'c-font-lock-extra-types) +@@ -300,13 +330,13 @@ + when the function is called.") + + +-(defvar ctypes-dir-read-file nil +- "*Variable determinating which files `ctypes-dir' should read. ++(defcustom ctypes-dir-read-file nil ++ "*Variable determining which files `ctypes-dir' should read. + +-When search for types in a large number of files it is difficult +-to determine which files to parse. Should to few be opened, we +-can miss some types. The opposite, to open to many be opened, +-the parse process could take much longer than needed. ++When searching for types in a large number of files it is difficult to ++determine which files to parse. Some types can be missed should too few ++file be opened, and the parse process could take much longer than needed ++with too many files. + + The default behavior, when `ctypes-dir-read-file' is nil, is to look + at the extension of the files found. Should it match a major mode in +@@ -331,11 +361,29 @@ + (setq ctypes-dir-read-file \"\\\\.cplusplus\\\\'\") + + However, the files would still need a -*- C++ -*- header line +-to be parsed as C++ files.") ++to be parsed as C++ files." ++ :type '(choice (const :tag "nil; fast approach." nil) ++ (const :tag "t; read all non-backup files" t) ++ (regexp :tag "regexp to match files")) ++ :group 'ctypes) + ++(defcustom ctypes-dir-backup-files nil ++ "*Non-nil means that `ctypes-dir' should parse backup files." ++ :type 'boolean ++ :group 'ctypes) + +-(defvar ctypes-dir-backup-files nil +- "*Non-nil means that `ctypes-dir' should parse backup files.") ++(defcustom ctypes-auto-parse-mode-hook nil ++ "*List of functions to run when `ctypes-auto-parse-mode' is activated." ++ :type 'hook ++ :group 'ctypes) ++ ++(defcustom ctypes-load-hook nil ++ "*List of functions to run when `ctypes' is loaded." ++ :type 'hook ++ :group 'ctypes) ++ ++(defvar ctypes-saved-p t ++ "Nil when types not saved to file.") + + (defvar ctypes-auto-parse-mode nil + "Non-nil when the minor mode `ctypes-auto-parse-mode' is enabled. +@@ -346,18 +394,6 @@ + To start the mode call the function `ctypes-auto-parse-mode', do not + set this variable explicitly.") + +- +-(defvar ctypes-auto-parse-mode-hook nil +- "*List of functions to run when `ctypes-auto-parse-mode' is activated.") +- +-(defvar ctypes-load-hook nil +- "*List of functions to run when `ctypes' is loaded.") +- +- +-(defvar ctypes-saved-p t +- "Nil when types not saved to file.") +- +- + (defvar ctypes-repetitive-type-regexp + (concat "\\<\\(short\\|int\\|long\\|float\\|" + "double\\|char\\|\\(un\\)?signed\\|const\\)\\>") +@@ -387,7 +423,7 @@ + When preceded by C-u the display is not updated. + + Return non-nil if the type was not known before." +- (interactive ++ (interactive + (list + (let* ((default (ctypes-get-type-under-point)) + (prompt (if default +@@ -400,7 +436,7 @@ + (error "Can't define \"\" as a type")) + (or mode + (setq mode major-mode)) +- (and type ++ (and type + (> (length type) 0) + (let ((added (ctypes-add-types mode (list type)))) + (ctypes-perform-action mode added delay-action) +@@ -552,7 +588,7 @@ + When preceded by C-u the display is not updated. + + Return non-nil if type is removed." +- (interactive ++ (interactive + (list + (let* ((default (ctypes-get-type-under-point)) + (prompt (if default +@@ -828,7 +864,7 @@ + ;;{{{ Edit + + (defvar ctypes-edit-map nil +- "Keymap used in ctypes-edit mode.") ++ "Keymap used in `ctypes-edit' mode.") + (if ctypes-edit-map + nil + (setq ctypes-edit-map (make-sparse-keymap)) +@@ -1087,7 +1123,7 @@ + + + (defun ctypes-subset (type-list1 type-list2) +- "Non-nil if type-list1 is included in type-list2." ++ "Non-nil if TYPE-LIST1 is included in TYPE-LIST2." + (let ((included t)) + (while (and included type-list1) + (if (not (member (car type-list1) type-list2)) +@@ -1127,7 +1163,7 @@ + + The action is performed immediately for major modes in MODES, and for + major modes that inherits types from modes in MODES, when +-`delay-action' is nil, and either changed-p is non-nil or the modes ++`delay-action' is nil, and either CHANGED-P is non-nil or the modes + previously have been marked for delayed action. + + Should DELAY-ACTION be non-nil, the actions are not performed +@@ -1189,7 +1225,7 @@ + + + (defun ctypes-perform-delayed-action () +- "Perform the action (normally update the display)" ++ "Perform the action (normally update the display)." + (ctypes-perform-action ctypes-delayed-action-list nil nil)) + + ;;}}} +@@ -1243,7 +1279,7 @@ + (set (make-local-variable 'parse-sexp-ignore-comments) t) + (unwind-protect + (let ((lst '())) +- (while (re-search-forward ++ (while (re-search-forward + "^\\(\\(typedef\\)\\|class\\|struct\\|enum\\)\\>" nil t) + (condition-case () + (if (match-beginning 2) +@@ -1494,15 +1530,15 @@ + (forward-char -1) + (goto-char end)) + (skip-chars-backward " \t") +- (setq modes +- (cons (intern +- (concat +- (downcase ++ (setq modes ++ (cons (intern ++ (concat ++ (downcase + (buffer-substring beg (point))) "-mode")) + modes))) + ;; Simple -*-MODE-*- case. +- (setq modes +- (cons (intern ++ (setq modes ++ (cons (intern + (concat (downcase (buffer-substring beg end)) + "-mode")) + modes)))))) +@@ -1559,7 +1595,7 @@ + + + (defun ctypes-string-to-mode (mode) +- "Convert a mode name, entered by the user, to a mode symbol. ++ "Convert a MODE name, entered by the user, to a mode symbol. + + Example: + (ctypes-string-to-mode \"C++\") => c++-mode" +@@ -1659,7 +1695,7 @@ + ;; Fontify each declaration item. + (list 'font-lock-match-c++-style-declaration-item-and-skip-to-next + ;; Start with point after all type specifiers. +- (list 'goto-char ++ (list 'goto-char + (list 'or (list 'match-beginning + (+ 2 (regexp-opt-depth regexp))) + '(match-end 1))) +@@ -1682,7 +1718,7 @@ + ((= number 2) + (setq keywords keyword-2)) + (t +- (error "Incorrect entry in rule. Found `%s', expected 1 or 2." ++ (error "Incorrect entry in rule. Found `%s', expected 1 or 2" + number))) + (if append-p + (set var (append (symbol-value var) (list keywords))) +@@ -1730,13 +1766,11 @@ + + ;;}}} + +-;; The End +- ++;; Install ourself + (add-hook 'find-file-hooks 'ctypes-find-file-hook) + (add-hook 'kill-emacs-hook 'ctypes-kill-emacs-hook) + +-(provide 'ctypes) +- + (run-hooks 'ctypes-load-hook) ++(provide 'ctypes) + +-;; ctypes.el ends here. ++;;; ctypes.el ends here --- emacs-goodies-el-29.4.orig/debian/patches/50_df_minor_mode_alist.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_df_minor_mode_alist.dpatch @@ -0,0 +1,19 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 50_df_minor_mode_alist.dpatch by Rémi Vanicat +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + + +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/df.el emacs-goodies-el/elisp/emacs-goodies-el/df.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/df.el ++++ emacs-goodies-el/elisp/emacs-goodies-el/df.el +@@ -235,7 +235,7 @@ + (run-with-timer 0 df-refresh 'df-update) + (if (not (assq 'df-mode minor-mode-alist)) + (setq minor-mode-alist +- (cons minor-mode-alist '((df-mode df-string))))) ++ (cons '(df-mode df-string) minor-mode-alist))) + (add-hook 'find-file-hooks 'df-update) + ;;(add-hook 'write-file-hooks 'df-check) + (df-update)) --- emacs-goodies-el-29.4.orig/debian/patches/50_coffee_no-autoload.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_coffee_no-autoload.dpatch @@ -0,0 +1,36 @@ +#!/bin/sh -e +## 50_coffee_no-autoload.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi + +[ -f debian/patches/00patch-opts ] && . debian/patches/00patch-opts +patch_opts="${patch_opts:--f --no-backup-if-mismatch}" + +case "$1" in + -patch) patch $patch_opts -p1 < $0;; + -unpatch) patch $patch_opts -p1 -R < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +@DPATCH@ +diff -urNad /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/coffee.el emacs-goodies-el/elisp/emacs-goodies-el/coffee.el +--- /home/psg/emacs/emacs-goodies-el/emacs-goodies-el/elisp/emacs-goodies-el/coffee.el 2004-01-15 16:22:57.000000000 -0500 ++++ emacs-goodies-el/elisp/emacs-goodies-el/coffee.el 2004-01-15 16:25:46.000000000 -0500 +@@ -69,7 +69,6 @@ + ("Sweetener" . ,coffee-sweetener-types) + ("Alcohol" . ,coffee-alcohol-types))) + +-;;;###autoload + (defun coffee () + "Submit a BREW request to an RFC2324-compliant coffee device" + (interactive) --- emacs-goodies-el-29.4.orig/debian/patches/50_slang-mode_bug336352.dpatch +++ emacs-goodies-el-29.4/debian/patches/50_slang-mode_bug336352.dpatch @@ -0,0 +1,19 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 50_slang-mode_bug336352.dpatch by Peter S Galbraith +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/emacs-goodies-el/slang-mode.el emacs-goodies-el/elisp/emacs-goodies-el/slang-mode.el +--- emacs-goodies-el~/elisp/emacs-goodies-el/slang-mode.el 2004-08-14 23:36:34.000000000 -0400 ++++ emacs-goodies-el/elisp/emacs-goodies-el/slang-mode.el 2005-10-30 19:53:52.000000000 -0500 +@@ -93,7 +93,7 @@ + :prefix "slang-" + :group 'languages) + +-(defcustom slang-default-application "c:/bin/slsh.exe" ++(defcustom slang-default-application "/usr/bin/slsh" + "Default slang application to run in slang subprocess." + :type 'string + :group 'slang) --- emacs-goodies-el-29.4.orig/debian/patches/2_muttrc-manual.dpatch +++ emacs-goodies-el-29.4/debian/patches/2_muttrc-manual.dpatch @@ -0,0 +1,32 @@ +#! /bin/sh -e +## 2_newpatch.dpatch by Roland Mas +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: muttrc-mode.el: change default location of the Mutt manual + +if [ $# -ne 1 ]; then + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1 +fi +case "$1" in + -patch) patch -f --no-backup-if-mismatch -p1 < $0;; + -unpatch) patch -f --no-backup-if-mismatch -R -p1 < $0;; + *) + echo >&2 "`basename $0`: script expects -patch|-unpatch as argument" + exit 1;; +esac + +exit 0 + +diff -urNad 2.tmp/elisp/emacs-goodies-el/muttrc-mode.el 2/elisp/muttrc-mode.el +--- 2.tmp/elisp/emacs-goodies-el/muttrc-mode.el 2003-01-05 17:10:41.000000000 +0100 ++++ 2/elisp/muttrc-mode.el 2003-01-05 17:27:33.000000000 +0100 +@@ -89,7 +89,7 @@ + :group 'files + :prefix "muttrc-") + +-(defcustom muttrc-manual-path "/usr/share/doc/mutt/manual.txt" ++(defcustom muttrc-manual-path "/usr/share/doc/mutt/manual.txt.gz" + "Path to the Mutt manual." + :type 'string + :group 'muttrc) --- emacs-goodies-el-29.4.orig/debian/patches/55_gnus-pers_bug263371.dpatch +++ emacs-goodies-el-29.4/debian/patches/55_gnus-pers_bug263371.dpatch @@ -0,0 +1,36 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 55_gnus-pers_bug263371.dpatch by +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: No description. + +@DPATCH@ +diff -urNad emacs-goodies-el~/elisp/gnus-bonus-el/gnus-pers.el emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el +--- emacs-goodies-el~/elisp/gnus-bonus-el/gnus-pers.el 2007-09-18 21:34:19.000000000 -0400 ++++ emacs-goodies-el/elisp/gnus-bonus-el/gnus-pers.el 2007-09-18 21:35:32.000000000 -0400 +@@ -73,6 +73,13 @@ + ;; Reported and fixed Debian bug #384209 + ;; `Cc-fix feature in gnus-pers is horribly broken' + ++;; 1.4 Bruce Stephens and ++;; Elias Oltmanns ++;; ++;; When in a group which has a personality setting (I set a general one in ++;; my top-level topic) gnus-personality-choose doesn't allow me to change ++;; personality. (Closes #263371) ++ + ;Todo: + ; + redo x-tra headers to be a repeat list of two parts, header name + ; and header data. Then allow either to be a function. +@@ -380,9 +387,8 @@ + + + ; if group has a personality parameter, use it. +- (when gnus-newsgroup-name +- (let* ((group (or gnus-newsgroup-name "")) +- (tmp-pers (gnus-group-find-parameter group 'personality t))) ++ (when (and (not personality) gnus-newsgroup-name) ++ (let ((tmp-pers (gnus-group-find-parameter gnus-newsgroup-name 'personality t))) + (when tmp-pers + (setq personality tmp-pers)))) +