CVS update by viteno xemacs ...
19 years, 9 months
CVS Monitor
CVS Monitor
User: viteno
Date: 05/03/20 23:51:41
Modified: xemacs version.sh
Log:
Update xemacs_extra_name.
Revision Changes Path
1.1103 +1 -1 XEmacs/xemacs/version.sh
Index: version.sh
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/version.sh,v
retrieving revision 1.1102
retrieving revision 1.1103
diff -u -p -r1.1102 -r1.1103
--- version.sh 2005/03/19 22:50:57 1.1102
+++ version.sh 2005/03/20 22:51:39 1.1103
＠＠ -8,5 +8,5 ＠＠ emacs_kit_version=
infodock_major_version=4
infodock_minor_version=0
infodock_build_version=8
-xemacs_extra_name="(+CVS-20050319)"
+xemacs_extra_name="(+CVS-20050320)"
xemacs_release_date="2005-02-18"
- 1 participants
- 0 comments
CVS update by daiki packages/xemacs-packages/riece/lisp, riece-toolbar.el ...
19 years, 9 months
CVS Monitor
CVS Monitor
User: daiki
Date: 05/03/20 23:32:39
Modified: packages/xemacs-packages/riece/lisp ChangeLog
riece-toolbar.el
Log:
riece: fix location of *.xpm files
Revision Changes Path
1.17 +4 -0 XEmacs/packages/xemacs-packages/riece/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/riece/ChangeLog,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -p -r1.16 -r1.17
--- ChangeLog 2005/03/20 11:33:14 1.16
+++ ChangeLog 2005/03/20 22:32:35 1.17
＠＠ -1,3 +1,7 ＠＠
+2005-03-20 Daiki Ueno <ueno(a)unixuser.org>
+
+ * Makefile (DATA_DEST): Put *.xpm files into etc/riece/.
+
2005-03-20 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.18 released.
1.18 +2 -1 XEmacs/packages/xemacs-packages/riece/Makefile
Index: Makefile
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/riece/Makefile,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -p -r1.17 -r1.18
--- Makefile 2005/03/20 11:33:14 1.17
+++ Makefile 2005/03/20 22:32:35 1.18
＠＠ -62,6 +62,7 ＠＠ endif
PRELOADS = -eval \("push \"./lisp\" load-path"\)
-DATA_1_FILES = $(wildcard lisp/*.xpm)
+DATA_FILES = $(wildcard lisp/*.xpm)
+DATA_DEST = $(PACKAGE)
include ../../XEmacs.rules
1.7 +5 -0 XEmacs/packages/xemacs-packages/riece/lisp/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/riece/lisp/ChangeLog,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -p -r1.6 -r1.7
--- ChangeLog 2005/03/20 09:11:20 1.6
+++ ChangeLog 2005/03/20 22:32:38 1.7
＠＠ -1,3 +1,8 ＠＠
+2005-03-20 Daiki Ueno <ueno(a)unixuser.org>
+
+ * riece-toolbar.el [XEmacs] (riece-make-toolbar-from-menu):
+ Pick up toolbar icons from etc/riece/.
+
2005-03-06 Daiki Ueno <ueno(a)unixuser.org>
* Riece: Version 1.0.8 released.
1.2 +6 -2 XEmacs/packages/xemacs-packages/riece/lisp/riece-toolbar.el
Index: riece-toolbar.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/riece/lisp/riece-toolbar.el,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -p -r1.1 -r1.2
--- riece-toolbar.el 2005/03/20 09:11:24 1.1
+++ riece-toolbar.el 2005/03/20 22:32:38 1.2
＠＠ -62,10 +62,14 ＠＠
(let ((pointer items)
toolbar
file
- menu-item)
+ menu-item
+ (riece-data-directory (locate-data-directory "riece")))
(while pointer
(setq file (locate-file (symbol-name (car pointer))
- load-path
+ (if riece-data-directory
+ (cons riece-data-directory
+ load-path)
+ load-path)
'(".xpm" ".pbm" ".xbm"))
menu-item (riece-toolbar-find-menu-item (car pointer)))
(if (and file (file-exists-p file))
- 1 participants
- 0 comments
CVS update by albinus packages/xemacs-packages/tramp/texi, trampver.texi ...
19 years, 9 months
CVS Monitor
CVS Monitor
User: albinus
Date: 05/03/20 21:14:51
Modified: packages/xemacs-packages/tramp/texi ChangeLog tramp.texi
trampver.texi
Log:
Sync with 2.0.48.
Revision Changes Path
1.45 +6 -2 XEmacs/packages/xemacs-packages/tramp/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/ChangeLog,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -p -r1.44 -r1.45
--- ChangeLog 2005/01/17 11:01:45 1.44
+++ ChangeLog 2005/03/20 20:14:38 1.45
＠＠ -1,3 +1,7 ＠＠
+2005-03-20 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * Makefile (AUTHOR_VERSION): Bump to 2.0.48.
+
2005-01-17 Norbert Koch <viteno(a)xemacs.org>
* Makefile (VERSION): XEmacs package 1.22 released.
＠＠ -40,8 +44,8 ＠＠
2003-11-25 Jeff Miller <jmiller(a)cablespeed.com>
- * Makefile (MAKEINFO_FLAGS):
- Add -D xemacs so that XEmacs specific tramp syntax is used
+ * Makefile (MAKEINFO_FLAGS):
+ Add -D xemacs so that XEmacs specific tramp syntax is used
in the info files, not the Emacs syntax.
2003-07-21 Norbert Koch <viteno(a)xemacs.org>
1.8 +32 -8 XEmacs/packages/xemacs-packages/tramp/ChangeLog.upstream
Index: ChangeLog.upstream
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/ChangeLog.upstream,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -p -r1.7 -r1.8
--- ChangeLog.upstream 2005/01/16 13:46:49 1.7
+++ ChangeLog.upstream 2005/03/20 20:14:39 1.8
＠＠ -1,3 +1,27 ＠＠
+2005-03-20 Michael Albinus <michael.albinus(a)gmx.de>
+
+ Version 2.0.48 released.
+
+ * configure.ac: Bump version.
+
+ * Makefile.in (FTP_UPLOAD): Change upload address to
+ "ftp://ftp-upload.gnu.org/incoming/ftp".
+ (tar): Handle "$(TARNAME).tar.gz.directive".
+
+2005-02-09 Kim F. Storm <storm(a)cua.dk>
+
+ Change release version from 21.4 to 22.1 throughout.
+
+2005-02-05 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * INSTALL: Change bug report address to [tramp-devel(a)gnu.org].
+
+2005-02-02 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * configure.ac: Bump version (to 2.0.48-pre). Update merge
+ version to 2.0.47. Change bug report address to
+ [tramp-devel(a)gnu.org].
+
2005-01-16 Michael Albinus <michael.albinus(a)gmx.de>
Version 2.0.47 released.
＠＠ -193,7 +217,7 ＠＠
* INSTALL (Installation Names): Describe what to do in case of
errors and warnings.
(Load Path): Add XEmacs example.
-
+
2004-03-28 Michael Albinus <Michael.Albinus(a)alcatel.de>
* configure.ac: Check existence of "install-info". Taken from
＠＠ -219,7 +243,7 ＠＠
* configure.ac: Apply `AC_CONTRIB_FILES' for all Lisp files of
contrib directory.
-
+
2004-03-05 Michael Albinus <Michael.Albinus(a)alcatel.de>
* configure.ac: Write "${MAKE}" if appropriate (but "make").
＠＠ -274,8 +298,8 ＠＠
* aclocal.m4 (AC_JA_MANUAL): New function.
* configure.ac: Move AC_EMACS_INSTALL. Call AC_JA_MANUAL.
-
-2003-10-01 Michael Albinus <Michael.Albinus(a)alcatel.de>
+
+2003-10-01 Michael Albinus <Michael.Albinus(a)alcatel.de>
* aclocal.m4 (AC_PATH_INFODIR): Fix path to xemacs site-packages.
From Norbert Koch <viteno(a)xemacs.org>.
＠＠ -387,7 +411,7 ＠＠
* aclocal.m4 (AC_EMACS_INSTALL): New macro. Depending on
configure option `--with-packaging', Tramp installation chapter
will be part of the manual, or not.
-
+
* configure.ac (top-level): Apply `AC_EMACS_INSTALL'.
* Makefile.in (xemacs, emacs): Call `./configure --with-packaging'
＠＠ -564,7 +588,7 ＠＠
* Makefile (VERSION): Bump.
2002-08-05 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
-
+
Version 2.0.11 released.
* Makefile (xemacs): Adjust to new directory names after moving
＠＠ -626,13 +650,13 ＠＠
2002-07-19 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
Version 2.0.2 released.
-
+
* Makefile (VERSION): New version 2.0.2.
2002-06-25 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
Version 2.0.1 released.
-
+
* Makefile (VERSION): New version 2.0.1.
2002-06-19 Kai Großjohann <grossjoh(a)ls6.informatik.uni-dortmund.de>
1.45 +1 -1 XEmacs/packages/xemacs-packages/tramp/Makefile
Index: Makefile
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/Makefile,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -p -r1.44 -r1.45
--- Makefile 2005/01/17 11:01:45 1.44
+++ Makefile 2005/03/20 20:14:39 1.45
＠＠ -18,7 +18,7 ＠＠
# Boston, MA 02111-1307, USA.
VERSION = 1.22
-AUTHOR_VERSION = 2.0.47
+AUTHOR_VERSION = 2.0.48
MAINTAINER = Kai Großjohann <kai.grossjohann(a)gmx.net>
PACKAGE = tramp
PKG_TYPE = regular
1.24 +130 -78 XEmacs/packages/xemacs-packages/tramp/lisp/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/lisp/ChangeLog,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -p -r1.23 -r1.24
--- ChangeLog 2005/01/16 13:46:55 1.23
+++ ChangeLog 2005/03/20 20:14:42 1.24
＠＠ -1,3 +1,55 ＠＠
+2005-03-20 Michael Albinus <michael.albinus(a)gmx.de>
+
+ Version 2.0.48 released.
+
+2005-02-27 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp.el (tramp-append-tramp-buffers): New defun.
+ (tramp-bug): Apply `tramp-append-tramp-buffers' as post-hook.
+ Catch `dont-send' signal.
+
+2005-02-20 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp.el (tramp-set-auto-save-file-modes): Set always
+ permissions, because there might be an old auto-saved file
+ belonging to another original file. This could be a security
+ threat. Reported by Kjetil Kjernsmo <kjetil(a)kjernsmo.net>.
+
+ * tramp-smb.el (tramp-smb-open-connection): `executable-find'
+ doesn't exist in older Emacsen. To be checked before applied.
+
+2005-02-16 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp-smb.el (all): Remove debug construct for
+ `with-parsed-tramp-file-name'.
+ (tramp-smb-prompt): Prompt can contain spaces inside directory
+ names.
+ (tramp-smb-handle-delete-directory, tramp-smb-handle-delete-file):
+ No error message if DIRECTORY or FILENAME doesn't exist.
+ (tramp-smb-open-connection): Check existence of
+ `tramp-smb-program'.
+
+2005-02-12 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp.el (tramp-file-name-for-operation) Use 'dired-call-process
+ but 'dired-call-process-command. Still the same cut'n'waste
+ error.
+ (tramp-set-auto-save-file-modes) Check for Emacs 21.3.50 removed.
+
+2005-02-09 Kim F. Storm <storm(a)cua.dk>
+
+ Change release version from 21.4 to 22.1 throughout.
+
+2005-02-05 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp.el (all): Change all addresses to .gnu.org.
+
+2005-02-02 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp.el (tramp-file-name-for-operation) Use 'shell-command but
+ 'shell. Cut'n'waste error. Reported by Vincent Bernat
+ <bernat(a)free.fr>.
+
2005-01-16 Michael Albinus <michael.albinus(a)gmx.de>
Version 2.0.47 released.
＠＠ -16,7 +68,7 ＠＠
(tramp-do-copy-or-rename-file-directly): Mask `cp -p' error. Call
`set-file-modes' when appropriate.
(tramp-action-out-of-band): Mask `scp -p' error.
- Reported by Isak Johnsson <isak(a)hypergene.com>
+ Reported by Isak Johnsson <isak(a)hypergene.com>.
2005-01-09 Michael Albinus <michael.albinus(a)gmx.de>
＠＠ -31,12 +83,12 ＠＠
* tramp-util.el: Fix copyright years. Adapt author address.
(tramp-minor-mode): Mode must toggle.
-
+
2005-01-04 Michael Albinus <michael.albinus(a)gmx.de>
* tramp-util.el (tramp-compile, tramp-recompile): Enable
`tramp-minor-mode' in buffer "*Compilation*".
-
+
2004-12-29 Michael Albinus <michael.albinus(a)gmx.de>
* tramp-util.el (tramp-minor-mode): New minor mode. Add it to
＠＠ -53,7 +105,7 ＠＠
* tramp.el (tramp-get-buffer, tramp-get-debug-buffer): Discard the
undo list of both Tramp buffer and debug buffer. Reported by
- Joakim Verona <joakim(a)verona.se>
+ Joakim Verona <joakim(a)verona.se>.
2004-12-23 Michael Albinus <michael.albinus(a)gmx.de>
＠＠ -95,7 +147,7 ＠＠
2004-11-26 Lars Hansen <larsh(a)math.ku.dk>
Sync with Emacs CVS (Michael Albinus <michael.albinus(a)gmx.de>).
-
+
* tramp.el (tramp-handle-directory-files-and-attributes): New function.
(tramp-perl-directory-files-and-attributes): New constant.
(tramp-file-name-handler-alist): Delete file-directory-files, add
＠＠ -175,12 +227,12 ＠＠
* tramp.el (tramp-perl-decode): Fixed an error in Perl
implementation. $pending must be cleared every loop. Reported by
- Benjamin Place <benjaminplace(a)sprintmail.com>
+ Benjamin Place <benjaminplace(a)sprintmail.com>.
2004-08-10 Michael Albinus <michael.albinus(a)gmx.de>
Version 2.0.44 released.
-
+
2004-08-06 Michael Albinus <michael.albinus(a)gmx.de>
* tramp.el (tramp-post-connection): Quote $1 and $2 of shell
＠＠ -391,7 +443,7 ＠＠
* tramp-smb.el (toplevel): Suppress byte-compiler warnings.
Define `last-coding-system-used' in XEmacs case.
-
+
* tramp-vc.el (toplevel): Suppress byte-compiler warnings.
(tramp-vc-do-command-new): Pacify funcall of `vc-setup-buffer' and
`vc-exec-after'.
＠＠ -470,12 +522,12 ＠＠
(all): Depends on $(CONTRIB_FILES), too.
(install): Copy $(INSTALL_FILES) but $?.
(distclean): Remove also $(CONTRIB_FILES).
-
+
2004-03-13 Kai Grossjohann <kgrossjo(a)eu.uu.net>
* tramp.el (tramp-do-copy-or-rename-file-via-buffer): Renamed
from tramp-do-copy-or-rename-via-buffer (without `file'), to make
- it consistent with the other tramp-do-* functions.
+ it consistent with the other tramp-do-* functions.
(tramp-do-copy-or-rename-file): Calls adjusted.
2004-03-08 Michael Albinus <Michael.Albinus(a)alcatel.de>
＠＠ -663,7 +715,7 ＠＠
* tramp-smb.el (top): Setting default value in
`tramp-default-method-alist' corrected. Order of USER and HOST
have been wrong. Nobody claimed for months ...
-
+
2003-12-25 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.el (tramp-completion-mode) Don't check for 'xemacs but
＠＠ -747,7 +799,7 ＠＠
`file-attributes' has a second parameter. If yes, apply it with
value "'integer". Otherwise, don't use that parameter (default
is integer format).
-
+
2003-11-02 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp-ftp.el, tramp.el: Add new Todo item.
＠＠ -869,8 +921,8 ＠＠
* tramp.el (tramp-shell-prompt-pattern): Allow multiple escape
sequences.
- * tramp-uu.el:
- * tramp-util.el:
+ * tramp-uu.el:
+ * tramp-util.el:
* tramp-efs.el: Use iso-2022-7bit encoding with coding cookie for
XEmacs compatibility.
＠＠ -1019,7 +1071,7 ＠＠
(tramp-wait-for-shell-prompt, tramp-barf-if-no-shell-prompt): New
functions, used by tramp-send-command-internal.
(tramp-open-connection-setup-interactive-shell): Simplify using
- `tramp-send-command-internal'.
+ `tramp-send-command-internal'.
(tramp-send-command-internal): New function.
2003-04-14 Michael Albinus <Michael.Albinus(a)alcatel.de>
＠＠ -1149,7 +1201,7 ＠＠
* tramp.el (tramp-do-copy-or-rename-file-one-local): New
function. Not implemented. Not used. Should invoke rcp or scp
directly to keep the time.
-
+
2003-02-09 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.el (tramp-chunksize): It's now a defcustom. Set to 500 on
＠＠ -1355,7 +1407,7 ＠＠
2002-12-05 Kai Großjohann <kai.grossjohann(a)uni-duisburg.de>
- * tramp.el (tramp-run-real-handler)
+ * tramp.el (tramp-run-real-handler)
(tramp-completion-run-real-handler): Disable cygwin-mount, too.
All files handled by Tramp are on Unix systems, where
cygwin-mount is not useful. (Ie, remote Cygwin systems are not
＠＠ -1510,8 +1562,8 ＠＠
(tramp-smb-check-shares): Removed. Functionality moved to
`tramp-smb-open-connection' and `tramp-smb-get-file-entries',
respectively.
-
+
2002-11-10 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.el (tramp-handle-file-name-completion): Use Emacs file
＠＠ -1559,7 +1611,7 ＠＠
(tramp-smb-handle-insert-directory): Mode string adapted.
(tramp-smb-read-file-entry): Block introduced for better return
handling. Return list values changed. Callers adapted.
-
+
2002-11-04 Michael Albinus <Michael.Albinus(a)alcatel.de>
＠＠ -1574,7 +1626,7 ＠＠
smbclient output lines by a single regexp.
(tramp-smb-send-command): Parameters of commands enclosed in
\"...\".
-
+
2002-11-03 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.el (tramp-handle-insert-file-contents): Use Emacs file
＠＠ -1692,7 +1744,7 ＠＠
`apply'.
* tramp-ftp.el (top-level): Require `tramp'.
-
+
2002-10-11 Michael Albinus <Michael.Albinus(a)alcatel.de>
＠＠ -1863,11 +1915,11 ＠＠
* tramp.el (tramp-handle-file-newer-than-file-p): If mtime of
both files is known, return a useful result. Better error
message in case one is a Tramp file and one isn't.
- (tramp-handle-file-local-copy, tramp-handle-write-region)
- (tramp-find-shell, tramp-open-connection-telnet)
- (tramp-open-connection-rsh, tramp-open-connection-su)
- (tramp-open-connection-setup-interactive-shell)
- (tramp-post-connection, tramp-maybe-open-connection)
+ (tramp-handle-file-local-copy, tramp-handle-write-region)
+ (tramp-find-shell, tramp-open-connection-telnet)
+ (tramp-open-connection-rsh, tramp-open-connection-su)
+ (tramp-open-connection-setup-interactive-shell)
+ (tramp-post-connection, tramp-maybe-open-connection)
(tramp-method-out-of-band-p): Correct number of args for
`tramp-get-rsh-program' and similar functions.
＠＠ -1999,13 +2051,13 ＠＠
host.
(tramp-call-local-coding-command): New function for calling local
encoding and decoding commands.
- (tramp-set-remote-encoding, tramp-get-remote-encoding)
- (tramp-set-remote-decoding, tramp-get-remote-decoding)
- (tramp-set-local-encoding, tramp-get-local-encoding)
+ (tramp-set-remote-encoding, tramp-get-remote-encoding)
+ (tramp-set-remote-decoding, tramp-get-remote-decoding)
+ (tramp-set-local-encoding, tramp-get-local-encoding)
(tramp-set-local-decoding, tramp-get-local-decoding): New functions.
- (tramp-get-encoding-command, tramp-set-encoding-command)
- (tramp-get-decoding-command, tramp-set-decoding-command)
- (tramp-get-encoding-function, tramp-set-encoding-function)
+ (tramp-get-encoding-command, tramp-set-encoding-command)
+ (tramp-get-decoding-command, tramp-set-decoding-command)
+ (tramp-get-encoding-function, tramp-set-encoding-function)
(tramp-get-decoding-function, tramp-set-decoding-function): Old
functions, removed.
＠＠ -2074,7 +2126,7 ＠＠
(tramp-parse-passwd): Added exception handling for "root", because
`tramp-get-completion-su' (the previous place for this stuff)
doesn't exist any longer.
-
+
2002-09-07 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-enter-password): Use
＠＠ -2089,7 +2141,7 ＠＠
2002-09-06 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
- * tramp.el (tramp-handle-file-local-copy, tramp-find-shell)
+ * tramp.el (tramp-handle-file-local-copy, tramp-find-shell)
(tramp-open-connection-setup-interactive-shell): Add some
comments about Douglas Grey Stephen's suggestions to make Tramp
work better with plink under Windows. I'm not sure what to think
＠＠ -2196,7 +2248,7 ＠＠
(tramp-get-completion-user-host): New function.
(tramp-get-completion-rsh)
(tramp-get-completion-ssh): Apply it.
-
+
2002-08-29 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.el (tramp-completion-file-name-handler-alist): Add handler
＠＠ -2293,7 +2345,7 ＠＠
to `inhibit-file-name-handlers'.
(tramp-completion-handle-file-name-all-completions)
(tramp-completion-handle-file-name-completion): New functions.
-
+
2002-08-12 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.el (tramp-invoke-ange-ftp): `tramp-disable-ange-ftp' must
＠＠ -2356,7 +2408,7 ＠＠
2002-08-29 Michael Albinus <Michael.Albinus(a)alcatel.de>
- * tramp.el (tramp-invoke-ange-ftp):
+ * tramp.el (tramp-invoke-ange-ftp):
(tramp-ange-ftp-file-name-p): Check for Xemacs.
(tramp-do-copy-or-rename-file): Don't pass KEEP-DATE to
tramp-invoke-ange-ftp 'rename.
＠＠ -2370,7 +2422,7 ＠＠
2002-08-22 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-open-connection-su): Use user name "root" if no
- user name is given.
+ user name is given.
2002-08-22 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -2433,7 +2485,7 ＠＠
2002-08-05 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
Version 2.0.11 released.
-
+
* tramp.el (tramp-invoke-ange-ftp): Avoid infloop by Ange-FTP
calling Tramp again: use tramp-run-real-handler to invoke
Ange-FTP.
＠＠ -2446,7 +2498,7 ＠＠
2002-08-04 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
Version 2.0.10 released.
-
+
* tramp.el (tramp-perl-encode-with-module,
tramp-perl-decode-with-module)
(tramp-perl-encode, tramp-perl-decode): Doc fix. From Andreas
＠＠ -2496,7 +2548,7 ＠＠
(tramp-default-method): Change to "ssh".
(tramp-perl-encode, tramp-perl-decode): New (faster) versions.
From Juanma Barranquero <lektu(a)terra.es>.
- (tramp-perl-encode-with-module, tramp-perl-decode-with-module)
+ (tramp-perl-encode-with-module, tramp-perl-decode-with-module)
(tramp-perl-encode, tramp-perl-encode): Strings are passwd
through `format', so double all percent characters and document.
＠＠ -2525,7 +2577,7 ＠＠
2002-07-30 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-handle-file-attributes): Restructure logic.
- (tramp-handle-file-attributes-with-ls)
+ (tramp-handle-file-attributes-with-ls)
(tramp-handle-file-attributes-with-perl): Debugging output.
(tramp-coding-commands): Provide base64 encoding with recode.
＠＠ -2621,9 +2673,9 ＠＠
2002-07-23 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
Release 2.0.3.
-
- * tramp.el (tramp-open-connection-su, tramp-multi-connect-telnet)
- (tramp-multi-connect-rlogin, tramp-multi-connect-su)
+
+ * tramp.el (tramp-open-connection-su, tramp-multi-connect-telnet)
+ (tramp-multi-connect-rlogin, tramp-multi-connect-su)
(tramp-make-tramp-file-name, tramp-make-tramp-multi-file-name):
Correct alist for `format-spec', use (a . b) instead of (a b).
(tramp-handle-directory-files): Handle fifth, XEmacs-specific,
＠＠ -2655,13 +2707,13 ＠＠
* tramp.el: Revert my previous patch. It's better to work around
the colour prompt problem outside of Tramp, eg in ~/.bashrc or
- similar.
+ similar.
2002-07-19 Steve Youngs <youngs(a)xemacs.org>
* tramp.el (tramp-find-shell): Remove "\\'" from regexp so we can
deal with shell prompts that have colour control characters in
- them.
+ them.
(tramp-open-connection-telnet): Ditto.
(tramp-open-connection-rsh): Ditto.
(tramp-open-connection-su): Ditto.
＠＠ -2675,8 +2727,8 ＠＠
* tramp.el (tramp-multi-file-name-structure-separate): Typo, it's
name was set to 'tramp-file-name-structure-separate'.
-
+
2002-07-18 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-methods): Rename methods invoking "ssh1" or
＠＠ -2690,7 +2742,7 ＠＠
adjust this regexp accordingly.
(tramp-file-name-structure-separate): Bug fix.
(tramp-multi-file-name-hop-structure-unified): Move colon from
- beginning to end.
+ beginning to end.
2002-07-11 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -2734,7 +2786,7 ＠＠
On Emacs, use the *-unified variants, on XEmacs, use the
*-separate variants. Tramp and Ange-FTP share a common filename
syntax on Emacs, but Tramp and EFS use separate filename syntaxes
- on XEmacs.
+ on XEmacs.
(tramp-handle-ange-ftp): Removed.
(tramp-disable-ange-ftp): New function to disable Ange-FTP if
enabled. Unconditionally call it at top level when file is
＠＠ -2767,17 +2819,17 ＠＠
2002-06-26 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
- * tramp.el (tramp-file-name-structure, tramp-file-name-regexp)
- (tramp-make-tramp-file-format)
- (tramp-make-tramp-file-user-nil-format)
- (tramp-multi-file-name-structure)
- (tramp-multi-file-name-hop-structure)
+ * tramp.el (tramp-file-name-structure, tramp-file-name-regexp)
+ (tramp-make-tramp-file-format)
+ (tramp-make-tramp-file-user-nil-format)
+ (tramp-multi-file-name-structure)
+ (tramp-multi-file-name-hop-structure)
(tramp-make-multi-tramp-file-format): Change to an Ange-FTP-like
filename syntax.
(tramp-handle-ange-ftp, toplevel): Remove Ange-FTP from filename
handler alist if tramp-handle-ange-ftp is non-nil.
- (tramp-handle-delete-file)
- (tramp-handle-verify-visited-file-modtime)
+ (tramp-handle-delete-file)
+ (tramp-handle-verify-visited-file-modtime)
(tramp-handle-make-symbolic-link): Fix typos.
(tramp-wait-for-regexp, tramp-wait-for-output): Convert int to
string before passing it to `insert'.
＠＠ -2788,7 +2840,7 ＠＠
argument to specify a port number.
Version 2.0.1 released.
-
+
* lisp/tramp.el (tramp-version): New version 2.0.1.
2002-06-24 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -2802,11 +2854,11 ＠＠
* tramp.el (tramp-ftp-method): New user option.
(with-parsed-tramp-file-name): New macro for the usual big `let'
statement to dissect a file-name.
- (tramp-handle-make-symbolic-link, tramp-handle-load)
- (tramp-handle-file-name-directory)
- (tramp-handle-file-name-nondirectory, tramp-handle-file-truename)
- (tramp-handle-file-truename, tramp-handle-file-directory-p)
- (tramp-handle-file-regular-p, tramp-handle-file-symlink-p)
+ (tramp-handle-make-symbolic-link, tramp-handle-load)
+ (tramp-handle-file-name-directory)
+ (tramp-handle-file-name-nondirectory, tramp-handle-file-truename)
+ (tramp-handle-file-truename, tramp-handle-file-directory-p)
+ (tramp-handle-file-regular-p, tramp-handle-file-symlink-p)
(tramp-handle-file-writable-p, tramp-handle-file-writable-p): Use
the new macro and forward call to Ange-FTP if applicable.
(tramp-make-ange-ftp-file-name): New helper function to convert a
＠＠ -2842,7 +2894,7 ＠＠
2002-06-10 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-methods): New method "fcp". Suggested by
- graydon(a)redhat.com.
+ graydon(a)redhat.com.
2002-06-04 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -2853,12 +2905,12 ＠＠
2002-05-22 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
- * tramp.el (tramp-find-shell, tramp-open-connection-telnet)
- (tramp-open-connection-rsh, tramp-open-connection-su)
- (tramp-open-connection-multi, tramp-multi-connect-telnet)
- (tramp-multi-connect-rlogin)
+ * tramp.el (tramp-find-shell, tramp-open-connection-telnet)
+ (tramp-open-connection-rsh, tramp-open-connection-su)
+ (tramp-open-connection-multi, tramp-multi-connect-telnet)
+ (tramp-multi-connect-rlogin)
(tramp-open-connection-setup-interactive-shell): Shell prompt
- must match at end of buffer.
+ must match at end of buffer.
2002-05-21 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -2951,7 +3003,7 ＠＠
brought to the surface.
Add a "." after directory name so that symlinked directories
display properly on platforms that have breakage on symlinks like
- Solaris.
+ Solaris.
2002-02-08 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -3036,7 +3088,7 ＠＠
Skip Montanaro <skip(a)pobox.com>.
Also swap preference order of `itimer-time-difference' and
`subtract-time': prefer the latter.
-
+
2002-01-10 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-handle-expand-file-name): Bind
＠＠ -3149,7 +3201,7 ＠＠
file-attributes, for tramp-buffer-file-attributes.
(tramp-handle-verify-visited-file-modtime): Use output of "ls
-ild", not return value of file-attributes, for
- tramp-buffer-file-attributes.
+ tramp-buffer-file-attributes.
(tramp-handle-insert-file-contents): Call set-visited-file-modtime
without args.
(tramp-handle-insert-file-contents): Ditto.
＠＠ -3400,7 +3452,7 ＠＠
(tramp-get-rcp-args): Typo in error message. This should be
`didn't specify rcp args' rather than `didn't specify tramp
args'... A relic of the Great Renaming from RCP to Tramp, no
- doubt.
+ doubt.
2001-03-03 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -3417,7 +3469,7 ＠＠
2001-02-28 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-open-connection-rsh): Doc bug. Reported by Tom
- Roche.
+ Roche.
2001-02-25 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -3429,7 +3481,7 ＠＠
* tramp.el: Patch by Francesco Potortì, slightly modified.
(tramp-discard-garbage): New variable. When non-nil,
expect that remote shell sends some garbage on startup, and delete
- it.
+ it.
(tramp-discard-garbage-erase-buffer): New function.
(tramp-open-connection-setup-interactive-shell): Use it.
(tramp-methods): New method for Kerberos and mimencode.
＠＠ -3561,7 +3613,7 ＠＠
2000-10-20 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.el (tramp-open-connection-telnet): Missed occurrences of
- match-string.
+ match-string.
(tramp-open-connection-rsh): Dito.
(tramp-open-connection-su): Dito.
(tramp-multi-connect-telnet): Dito.
＠＠ -3668,13 +3720,13 ＠＠
2000-08-25 Yuji Yamano <yyamano(a)kt.rim.or.jp>
- * tramp.el (tramp-perl-file-attributes): Use 0170000 as the right
+ * tramp.el (tramp-perl-file-attributes): Use 0170000 as the right
value of Bitwise And instead of 0120000 and 040000. It works fine
with block devices and sockets now.
2000-08-25 Yuji Yamano <yyamano(a)kt.rim.or.jp>
- * tramp.el (tramp-remote-path): Add "/usr/pkg/bin" to
+ * tramp.el (tramp-remote-path): Add "/usr/pkg/bin" to
tramp-remote-path for the NetBSD packages.
2000-08-19 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
1.6 +50 -92 XEmacs/packages/xemacs-packages/tramp/lisp/tramp-smb.el
Index: tramp-smb.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/lisp/tramp-smb.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -p -r1.5 -r1.6
--- tramp-smb.el 2004/12/24 00:24:05 1.5
+++ tramp-smb.el 2005/03/20 20:14:42 1.6
＠＠ -1,8 +1,8 ＠＠
;;; tramp-smb.el --- Tramp access functions for SMB servers -*- coding: iso-8859-1; -*-
-;; Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
+;; Copyright (C) 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
-;; Author: Michael Albinus <Michael.Albinus(a)alcatel.de>
+;; Author: Michael Albinus <michael.albinus(a)gmx.de>
;; Keywords: comm, processes
;; This file is part of GNU Emacs.
＠＠ -75,7 +75,7 ＠＠
:group 'tramp
:type 'string)
-(defconst tramp-smb-prompt "^smb: \\S-+> \\|^\\s-+Server\\s-+Comment$"
+(defconst tramp-smb-prompt "^smb: .+> \\|^\\s-+Server\\s-+Comment$"
"Regexp used as prompt in smbclient.")
(defconst tramp-smb-errors
＠＠ -235,10 +235,7 ＠＠ KEEP-DATE is not handled in case NEWNAME
(file-exists-p newname))
(error "copy-file: file %s already exists" newname))
-; (with-parsed-tramp-file-name newname nil
- (let (user host localname)
- (with-parsed-tramp-file-name newname l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name newname nil
(save-excursion
(let ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname t)))
＠＠ -258,59 +255,46 ＠＠ KEEP-DATE is not handled in case NEWNAME
(defun tramp-smb-handle-delete-directory (directory)
"Like `delete-directory' for tramp files."
(setq directory (directory-file-name (expand-file-name directory)))
- (unless (file-exists-p directory)
- (error "Cannot delete non-existing directory `%s'" directory))
-; (with-parsed-tramp-file-name directory nil
- (let (user host localname)
- (with-parsed-tramp-file-name directory l
- (setq user l-user host l-host localname l-localname))
- (save-excursion
- (let ((share (tramp-smb-get-share localname))
- (dir (tramp-smb-get-localname (file-name-directory localname) t))
- (file (file-name-nondirectory localname)))
- (tramp-smb-maybe-open-connection user host share)
- (if (and
- (tramp-smb-send-command user host (format "cd \"%s\"" dir))
- (tramp-smb-send-command user host (format "rmdir \"%s\"" file)))
- ;; Go Home
+ (when (file-exists-p directory)
+ (with-parsed-tramp-file-name directory nil
+ (save-excursion
+ (let ((share (tramp-smb-get-share localname))
+ (dir (tramp-smb-get-localname (file-name-directory localname) t))
+ (file (file-name-nondirectory localname)))
+ (tramp-smb-maybe-open-connection user host share)
+ (if (and
+ (tramp-smb-send-command user host (format "cd \"%s\"" dir))
+ (tramp-smb-send-command user host (format "rmdir \"%s\"" file)))
+ ;; Go Home
+ (tramp-smb-send-command user host (format "cd \\"))
+ ;; Error
(tramp-smb-send-command user host (format "cd \\"))
- ;; Error
- (tramp-smb-send-command user host (format "cd \\"))
- (error "Cannot delete directory `%s'" directory))))))
+ (error "Cannot delete directory `%s'" directory)))))))
(defun tramp-smb-handle-delete-file (filename)
"Like `delete-file' for tramp files."
(setq filename (expand-file-name filename))
- (unless (file-exists-p filename)
- (error "Cannot delete non-existing file `%s'" filename))
-; (with-parsed-tramp-file-name filename nil
- (let (user host localname)
- (with-parsed-tramp-file-name filename l
- (setq user l-user host l-host localname l-localname))
- (save-excursion
- (let ((share (tramp-smb-get-share localname))
- (dir (tramp-smb-get-localname (file-name-directory localname) t))
- (file (file-name-nondirectory localname)))
- (unless (file-exists-p filename)
- (error "Cannot delete non-existing file `%s'" filename))
- (tramp-smb-maybe-open-connection user host share)
- (if (and
- (tramp-smb-send-command user host (format "cd \"%s\"" dir))
- (tramp-smb-send-command user host (format "rm \"%s\"" file)))
- ;; Go Home
+ (when (file-exists-p filename)
+ (with-parsed-tramp-file-name filename nil
+ (save-excursion
+ (let ((share (tramp-smb-get-share localname))
+ (dir (tramp-smb-get-localname (file-name-directory localname) t))
+ (file (file-name-nondirectory localname)))
+ (tramp-smb-maybe-open-connection user host share)
+ (if (and
+ (tramp-smb-send-command user host (format "cd \"%s\"" dir))
+ (tramp-smb-send-command user host (format "rm \"%s\"" file)))
+ ;; Go Home
+ (tramp-smb-send-command user host (format "cd \\"))
+ ;; Error
(tramp-smb-send-command user host (format "cd \\"))
- ;; Error
- (tramp-smb-send-command user host (format "cd \\"))
- (error "Cannot delete file `%s'" filename))))))
+ (error "Cannot delete file `%s'" filename)))))))
(defun tramp-smb-handle-directory-files
(directory &optional full match nosort)
"Like `directory-files' for tramp files."
(setq directory (directory-file-name (expand-file-name directory)))
-; (with-parsed-tramp-file-name directory nil
- (let (user host localname)
- (with-parsed-tramp-file-name directory l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name directory nil
(save-excursion
(let* ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname nil))
＠＠ -340,17 +324,14 ＠＠ KEEP-DATE is not handled in case NEWNAME
(mapcar
(lambda (x)
;; We cannot call `file-attributes' for backward compatibility reasons.
- ;; Its optional parameter ID-FORMAT is introduced with Emacs 21.4.
+ ;; Its optional parameter ID-FORMAT is introduced with Emacs 22.
(cons x (tramp-smb-handle-file-attributes
(if full x (concat (file-name-as-directory directory) x)) id-format)))
(directory-files directory full match nosort)))
-
+
(defun tramp-smb-handle-file-attributes (filename &optional id-format)
"Like `file-attributes' for tramp files."
-; (with-parsed-tramp-file-name filename nil
- (let (user host localname)
- (with-parsed-tramp-file-name filename l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name filename nil
(save-excursion
(let* ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname nil))
＠＠ -380,10 +361,7 ＠＠ KEEP-DATE is not handled in case NEWNAME
(defun tramp-smb-handle-file-directory-p (filename)
"Like `file-directory-p' for tramp files."
-; (with-parsed-tramp-file-name filename nil
- (let (user host localname)
- (with-parsed-tramp-file-name filename l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name filename nil
(save-excursion
(let* ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname nil))
＠＠ -396,10 +374,7 ＠＠ KEEP-DATE is not handled in case NEWNAME
(defun tramp-smb-handle-file-exists-p (filename)
"Like `file-exists-p' for tramp files."
-; (with-parsed-tramp-file-name filename nil
- (let (user host localname)
- (with-parsed-tramp-file-name filename l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name filename nil
(save-excursion
(let* ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname nil))
＠＠ -433,10 +408,7 ＠＠ KEEP-DATE is not handled in case NEWNAME
;; files.
(defun tramp-smb-handle-file-name-all-completions (filename directory)
"Like `file-name-all-completions' for tramp files."
-; (with-parsed-tramp-file-name directory nil
- (let (user host localname)
- (with-parsed-tramp-file-name directory l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name directory nil
(save-match-data
(save-excursion
(let* ((share (tramp-smb-get-share localname))
＠＠ -467,10 +439,7 ＠＠ KEEP-DATE is not handled in case NEWNAME
(let ((dir (file-name-directory filename)))
(and (file-exists-p dir)
(file-writable-p dir)))
-; (with-parsed-tramp-file-name filename nil
- (let (user host localname)
- (with-parsed-tramp-file-name filename l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name filename nil
(save-excursion
(let* ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname nil))
＠＠ -490,17 +459,14 ＠＠ WILDCARD and FULL-DIRECTORY-P are not ha
;; This check is a little bit strange, but in `dired-add-entry'
;; this function is called with a non-directory ...
(setq filename (file-name-as-directory filename)))
-; (with-parsed-tramp-file-name filename nil
- (let (user host localname)
- (with-parsed-tramp-file-name filename l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name filename nil
(save-match-data
(let* ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname nil))
(entries (tramp-smb-get-file-entries user host share file)))
;; Delete dummy "" entry, useless entries
- (setq entries
+ (setq entries
(if (file-directory-p filename)
(delq (assoc "" entries) entries)
;; We just need the only and only entry FILENAME.
＠＠ -543,10 +509,7 ＠＠ WILDCARD and FULL-DIRECTORY-P are not ha
(setq dir (directory-file-name (expand-file-name dir)))
(unless (file-name-absolute-p dir)
(setq dir (concat default-directory dir)))
-; (with-parsed-tramp-file-name dir nil
- (let (user host localname)
- (with-parsed-tramp-file-name dir l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name dir nil
(save-match-data
(let* ((share (tramp-smb-get-share localname))
(ldir (file-name-directory dir)))
＠＠ -564,10 +527,7 ＠＠ WILDCARD and FULL-DIRECTORY-P are not ha
(setq directory (directory-file-name (expand-file-name directory)))
(unless (file-name-absolute-p directory)
(setq directory (concat default-directory directory)))
-; (with-parsed-tramp-file-name directory nil
- (let (user host localname)
- (with-parsed-tramp-file-name directory l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name directory nil
(save-match-data
(let* ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname nil)))
＠＠ -597,10 +557,7 ＠＠ WILDCARD and FULL-DIRECTORY-P are not ha
(file-exists-p newname))
(error "rename-file: file %s already exists" newname))
-; (with-parsed-tramp-file-name newname nil
- (let (user host localname)
- (with-parsed-tramp-file-name newname l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name newname nil
(save-excursion
(let ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname t)))
＠＠ -636,10 +593,7 ＠＠ Catches errors for shares like \"C$/\",
(unless (y-or-n-p (format "File %s exists; overwrite anyway? "
filename))
(error "File not overwritten")))
-; (with-parsed-tramp-file-name filename nil
- (let (user host localname)
- (with-parsed-tramp-file-name filename l
- (setq user l-user host l-host localname l-localname))
+ (with-parsed-tramp-file-name filename nil
(save-excursion
(let ((share (tramp-smb-get-share localname))
(file (tramp-smb-get-localname localname t))
＠＠ -968,6 +922,10 ＠＠ for a remote password prompt. It querie
then sends the password to the remote host.
Domain names in USER and port numbers in HOST are acknowledged."
+
+ (when (and (fboundp 'executable-find)
+ (not (funcall 'executable-find tramp-smb-program)))
+ (error "Cannot find command %s in %s" tramp-smb-program exec-path))
(save-match-data
(let* ((buffer (tramp-get-buffer nil tramp-smb-method user host))
1.7 +3 -3 XEmacs/packages/xemacs-packages/tramp/lisp/tramp-util.el
Index: tramp-util.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/lisp/tramp-util.el,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -p -r1.6 -r1.7
--- tramp-util.el 2005/01/16 13:46:55 1.6
+++ tramp-util.el 2005/03/20 20:14:42 1.7
＠＠ -34,7 +34,7 ＠＠
;; Define a Tramp minor mode. It's intention is to redefine some keys for Tramp
;; specific functions, like compilation.
-;; The key remapping works since Emacs 21.4 only. Unknown for XEmacs.
+;; The key remapping works since Emacs 22 only. Unknown for XEmacs.
(when (fboundp 'define-minor-mode)
＠＠ -59,10 +59,10 ＠＠ If remapping functionality for keymaps i
bindings. Otherwise, only bindings active during invocation are taken
into account. XEmacs menubar bindings are not changed by this."
(if (functionp 'command-remapping)
- ;; Emacs 21.4
+ ;; Emacs 22
(eval
`(define-key tramp-minor-mode-map [remap ,old-command] new-command))
- ;; previous Emacs 21 versions.
+ ;; previous Emacs versions.
(mapcar
'(lambda (x)
(define-key tramp-minor-mode-map x new-command))
1.14 +14 -14 XEmacs/packages/xemacs-packages/tramp/lisp/tramp-vc.el
Index: tramp-vc.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/lisp/tramp-vc.el,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -p -r1.13 -r1.14
--- tramp-vc.el 2004/12/24 00:24:06 1.13
+++ tramp-vc.el 2005/03/20 20:14:42 1.14
＠＠ -1,6 +1,6 ＠＠
;;; tramp-vc.el --- Version control integration for TRAMP.el
-;; Copyright (C) 2000, 2001, 2002, 2003, 2004 by Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005 by Free Software Foundation, Inc.
;; Author: Daniel Pittman <daniel(a)danann.net>
;; Keywords: comm, processes
＠＠ -51,7 +51,7 ＠＠
;; This used to blow away the file-name-handler-alist and reinstall
;; TRAMP into it. This was intended to let VC work remotely. It didn't,
;; at least not in my XEmacs 21.2 install.
-;;
+;;
;; In any case, tramp-run-real-handler now deals correctly with disabling
;; the things that should be, making this a no-op.
;;
＠＠ -96,7 +96,7 ＠＠ See `vc-do-command' for more information
(set (make-local-variable 'vc-parent-buffer-name)
(concat " from " (buffer-name camefrom)))
(setq default-directory olddir)
-
+
(erase-buffer)
(mapcar
＠＠ -230,7 +230,7 ＠＠ Since TRAMP doesn't do async commands ye
(if (or (and (stringp file) (tramp-tramp-file-p file))
(and (buffer-file-name) (tramp-tramp-file-p (buffer-file-name))))
(setq ad-return-value
- (apply 'tramp-vc-do-command-new buffer okstatus command
+ (apply 'tramp-vc-do-command-new buffer okstatus command
file ;(or file (buffer-file-name))
flags))
ad-do-it)))
＠＠ -243,7 +243,7 ＠＠ Since TRAMP doesn't do async commands ye
(if (or (and (stringp file) (tramp-tramp-file-p file))
(and (buffer-file-name) (tramp-tramp-file-p (buffer-file-name))))
(setq ad-return-value
- (apply 'tramp-vc-do-command buffer okstatus command
+ (apply 'tramp-vc-do-command buffer okstatus command
(or file (buffer-file-name)) last flags))
ad-do-it)))))
;;-)
＠＠ -298,7 +298,7 ＠＠ Since TRAMP doesn't do async commands ye
(tramp-wait-for-output)
(setq exec-status (read (current-buffer)))
(message "Command %s returned status %d." command exec-status)))
-
+
;; Maybe okstatus can be `async' here. But then, maybe the
;; async thing is new in Emacs 21, but this function is only
;; used in Emacs 20.
＠＠ -319,7 +319,7 ＠＠ Since TRAMP doesn't do async commands ye
(if (or (and (stringp file) (tramp-tramp-file-p file))
(and (buffer-file-name) (tramp-tramp-file-p (buffer-file-name))))
(setq ad-return-value
- (apply 'tramp-vc-simple-command okstatus command
+ (apply 'tramp-vc-simple-command okstatus command
(or file (buffer-file-name)) args))
ad-do-it)))
＠＠ -381,17 +381,17 ＠＠ Since TRAMP doesn't do async commands ye
;; Do we need to advise the vc-user-login-name function anyway?
-;; This will return the correct login name for the owner of a
+;; This will return the correct login name for the owner of a
;; file. It does not deal with the default remote user name...
;;
-;; That is, when vc calls (vc-user-login-name), we return the
+;; That is, when vc calls (vc-user-login-name), we return the
;; local login name, something that may be different to the remote
-;; default.
+;; default.
;;
;; The remote VC operations will occur as the user that we logged
;; in with however - not always the same as the local user.
;;
-;; In the end, I did advise the function. This is because, well,
+;; In the end, I did advise the function. This is because, well,
;; the thing didn't work right otherwise ;)
;;
;; Daniel Pittman <daniel(a)danann.net>
＠＠ -409,7 +409,7 ＠＠ filename we are thinking about..."
;; boundness-checking into this function?
(let* ((file (symbol-value 'file))
(remote-uid
- ;; With Emacs 21.4, `file-attributes' has got an optional parameter
+ ;; With Emacs 22, `file-attributes' has got an optional parameter
;; ID-FORMAT. Handle this case backwards compatible.
(if (and (functionp 'subr-arity)
(= 2 (cdr (funcall (symbol-function 'subr-arity)
＠＠ -443,12 +443,12 ＠＠ filename we are thinking about..."
(save-match-data
(tramp-handle-vc-user-login-name uid)))) ; get the owner name
ad-do-it))) ; else call the original
+
-
;; Determine the name of the user owning a file.
(defun tramp-file-owner (filename)
"Return who owns FILE (user name, as a string)."
- (let ((v (tramp-dissect-file-name
+ (let ((v (tramp-dissect-file-name
(expand-file-name filename))))
(if (not (file-exists-p filename))
nil ; file cannot be opened
1.24 +197 -136 XEmacs/packages/xemacs-packages/tramp/lisp/tramp.el
Index: tramp.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/lisp/tramp.el,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -p -r1.23 -r1.24
--- tramp.el 2005/01/16 13:46:55 1.23
+++ tramp.el 2005/03/20 20:14:42 1.24
＠＠ -34,7 +34,7 ＠＠
;;
;; Notes:
;; -----
-;;
+;;
;; This package only works for Emacs 20 and higher, and for XEmacs 21
;; and higher. (XEmacs 20 is missing the `with-timeout' macro. Emacs
;; 19 is reported to have other problems. For XEmacs 21, you need the
＠＠ -47,16 +47,12 ＠＠
;; Also see the todo list at the bottom of this file.
;;
;; The current version of Tramp can be retrieved from the following URL:
-;; http://savannah.nongnu.org/download/tramp/
+;; http://ftp.gnu.org/gnu/tramp/
;;
;; There's a mailing list for this, as well. Its name is:
-;; tramp-devel(a)mail.freesoftware.fsf.org
-;; Send a mail with `help' in the subject (!) to the administration
-;; address for instructions on joining the list. The administration
-;; address is:
-;; tramp-devel-request(a)mail.freesoftware.fsf.org
-;; You can also use the Web to subscribe, under the following URL:
-;; http://mail.freesoftware.fsf.org/mailman/listinfo/tramp-devel
+;; tramp-devel(a)gnu.org
+;; You can use the Web to subscribe, under the following URL:
+;; http://lists.gnu.org/mailman/listinfo/tramp-devel
;;
;; For the adventurous, the current development sources are available
;; via CVS. You can find instructions about this at the following URL:
＠＠ -160,7 +156,7 ＠＠ Nil means to use a separate filename syn
(defgroup tramp nil
"Edit remote files with a combination of rsh and rcp or similar programs."
:group 'files
- :version "21.4")
+ :version "22.1")
(defcustom tramp-verbose 9
"*Verbosity level for tramp.el. 0 means be silent, 10 is most verbose."
＠＠ -205,7 +201,7 ＠＠ file name, the backup directory is prepe
gives the same backup policy for Tramp files on their hosts like the
policy for local files."
- :type '(repeat
+ :type '(repeat
(list (regexp :tag "File regexp")
(string :tag "Backup Dir")
(set :inline t
＠＠ -506,7 +502,7 ＠＠ This variable defaults to the value of `
(tramp-copy-args nil)
(tramp-copy-keep-date-arg "-p")
(tramp-password-end-of-line "xy")) ;see docstring for "xy"
- ("fcp"
+ ("fcp"
(tramp-connection-function tramp-open-connection-rsh)
(tramp-login-program "fsh")
(tramp-copy-program "fcp")
＠＠ -633,7 +629,7 ＠＠ variable `tramp-methods'."
("rsh" tramp-multi-connect-rlogin "rsh %h -l %u%n")
("remsh" tramp-multi-connect-rlogin "remsh %h -l %u%n")
("ssh" tramp-multi-connect-rlogin "ssh %h -l %u%n")
- ("ssht" tramp-multi-connect-rlogin "ssh %h -e none -t -t -l %u%n")
+ ("ssht" tramp-multi-connect-rlogin "ssh %h -e none -t -t -l %u%n")
("su" tramp-multi-connect-su "su - %u%n")
("sudo" tramp-multi-connect-su "sudo -u %u -s -p Password:%n"))
"*List of connection functions for multi-hop methods.
＠＠ -777,7 +773,7 ＠＠ the info pages.")
"sudo" tramp-completion-function-alist-su)
(tramp-set-completion-function
"multi" nil)
- (tramp-set-completion-function
+ (tramp-set-completion-function
"scpx" tramp-completion-function-alist-ssh)
(tramp-set-completion-function
"sshx" tramp-completion-function-alist-ssh)
＠＠ -2064,7 +2060,7 ＠＠ target of the symlink differ."
(setq filename (tramp-file-name-localname
(tramp-dissect-file-name
(expand-file-name filename)))))
-
+
;; Right, they are on the same host, regardless of user, method, etc.
;; We now make the link on the remote machine. This will occur as the user
;; that FILENAME belongs to.
＠＠ -2073,7 +2069,7 ＠＠ target of the symlink differ."
l-multi-method l-method l-user l-host
(format "cd %s && %s -sf %s %s"
cwd ln
- filename
+ filename
l-localname)
t)))))
＠＠ -2419,7 +2415,7 ＠＠ of."
(let* ((attr (file-attributes f))
(modtime (nth 5 attr))
(mt (visited-file-modtime)))
-
+
(cond
;; file exists, and has a known modtime.
((and attr (not (equal modtime '(0 0))))
＠＠ -2766,7 +2762,7 ＠＠ if the remote host can't provide the mod
(push (buffer-substring (point)
(tramp-line-end-position))
result))
-
+
(tramp-send-command multi-method method user host "cd")
(tramp-wait-for-output)
＠＠ -3211,7 +3207,7 ＠＠ This is like `dired-recursive-delete-dir
'file-error
(list "Removing old file name" "no such directory" filename)))
;; Which is better, -r or -R? (-r works for me <daniel(a)danann.net>)
- (tramp-send-command multi-method method user host
+ (tramp-send-command multi-method method user host
(format "rm -r %s" (tramp-shell-quote-argument localname)))
;; Wait for the remote system to return to us...
;; This might take a while, allow it plenty of time.
＠＠ -3219,7 +3215,7 ＠＠ This is like `dired-recursive-delete-dir
;; Make sure that it worked...
(and (file-exists-p filename)
(error "Failed to recursively delete %s" filename))))
-
+
(defun tramp-handle-dired-call-process (program discard &rest arguments)
"Like `dired-call-process' for tramp files."
(with-parsed-tramp-file-name default-directory nil
＠＠ -3241,7 +3237,7 ＠＠ This is like `dired-recursive-delete-dir
(tramp-send-command-and-check multi-method method user host nil)
(tramp-send-command multi-method method user host "cd")
(tramp-wait-for-output)))))
-
+
(defun tramp-handle-dired-compress-file (file &rest ok-flag)
"Like `dired-compress-file' for tramp files."
;; OK-FLAG is valid for XEmacs only, but not implemented.
＠＠ -3501,7 +3497,7 ＠＠ Used in `tramp-handle-shell-command'")
This will break if COMMAND prints a newline, followed by the value of
`tramp-end-of-output', followed by another newline."
;; Asynchronous processes are far from being perfect. But it works at least
- ;; for `find-grep-dired' and `find-name-dired' in Emacs 21.4.
+ ;; for `find-grep-dired' and `find-name-dired' in Emacs 22.
(if (tramp-tramp-file-p default-directory)
(with-parsed-tramp-file-name default-directory nil
(let ((asynchronous (string-match "[ \t]*&[ \t]*\\'" command))
＠＠ -3609,7 +3605,7 ＠＠ This will break if COMMAND prints a newl
(when (and (numberp buffer) (zerop buffer))
(error "Implementation does not handle immediate return"))
(when (consp buffer) (error "Implementation does not handle error files"))
- (shell-command
+ (shell-command
(mapconcat 'tramp-shell-quote-argument
(cons program args)
" ")
＠＠ -4105,10 +4101,10 ＠＠ ARGS are the arguments OPERATION has bee
(if (bufferp (nth 0 args)) (nth 0 args) (current-buffer))))
; COMMAND
((member operation
- (list 'dired-call-process-command
+ (list 'dired-call-process
; Emacs only
- 'shell
- ; Post Emacs 21.3 only
+ 'shell-command
+ ; Emacs 22 only
'process-file
; XEmacs only
'dired-print-file 'dired-shell-call-process))
＠＠ -4213,7 +4209,7 ＠＠ Falls back to normal file name handler i
(defun tramp-repair-jka-compr ()
"If jka-compr is already loaded, move it to the front of
-`file-name-handler-alist'. On Emacs 21.4 or so this will not be
+`file-name-handler-alist'. On Emacs 22 or so this will not be
necessary anymore."
(let ((jka (rassoc 'jka-compr-handler file-name-handler-alist)))
(when jka
＠＠ -4293,7 +4289,7 ＠＠ necessary anymore."
;; `tramp-completion-file-name-regexp-unified' aren't different.
;; If nil, `tramp-completion-run-real-handler' is called (i.e. forwarding to
;; `tramp-file-name-handler'). Otherwise, it takes `tramp-run-real-handler'.
-;; Using `last-input-event' is a little bit risky, because completing a file
+;; Using `last-input-event' is a little bit risky, because completing a file
;; might require loading other files, like "~/.netrc", and for them it
;; shouldn't be decided based on that variable. On the other hand, those files
;; shouldn't have partial tramp file name syntax. Maybe another variable should
＠＠ -4397,7 +4393,7 ＠＠ necessary anymore."
(funcall (nth 0 x) (nth 1 x)))))
(tramp-get-completion-function m))
- (setq result (append result
+ (setq result (append result
(mapcar
(lambda (x)
(tramp-get-completion-user-host
＠＠ -4438,7 +4434,7 ＠＠ necessary anymore."
;; [nil nil "x" nil nil]
;; [nil "x" nil nil nil]
-;; "/x:" "/x:y" "/x:y:"
+;; "/x:" "/x:y" "/x:y:"
;; [nil nil nil "x" ""] [nil nil nil "x" "y"] [nil "x" nil "y" ""]
;; "/[x/" "/[x/y"
;; [nil "x" nil "" nil] [nil "x" nil "y" nil]
＠＠ -4907,7 +4903,7 ＠＠ TIME is an Emacs internal time value as
"touch" nil (current-buffer) nil "-t" touch-time file))
(pop-to-buffer (current-buffer))
(error "tramp-touch: touch failed"))))))
-
+
(defun tramp-buffer-name (multi-method method user host)
"A name for the connection buffer for USER at HOST using METHOD."
(if multi-method
＠＠ -5072,8 +5068,8 ＠＠ file exists and nonzero exit status othe
(file-exists-p existing)
(not (file-exists-p nonexisting))))
(error "Couldn't find command to check if file exists."))))
-
+
;; CCC test ksh or bash found for tilde expansion?
(defun tramp-find-shell (multi-method method user host)
"Find a shell on the remote host which groks tilde expansion."
＠＠ -5171,9 +5167,9 ＠＠ Returns nil if none was found, else the
(tramp-check-ls-commands multi-method method user host "gnuls" tramp-remote-path)
(tramp-check-ls-commands multi-method method user host "gls" tramp-remote-path)))
-;; ------------------------------------------------------------
-;; -- Functions for establishing connection --
-;; ------------------------------------------------------------
+;; ------------------------------------------------------------
+;; -- Functions for establishing connection --
+;; ------------------------------------------------------------
;; The following functions are actions to be taken when seeing certain
;; prompts from the remote host. See the variable
＠＠ -5422,7 +5418,7 ＠＠ Maybe the different regular expressions
(when multi-method
(error "Cannot multi-connect using telnet connection method"))
(tramp-pre-connection multi-method method user host)
- (tramp-message 7 "Opening connection for %s＠%s using %s..."
+ (tramp-message 7 "Opening connection for %s＠%s using %s..."
(or user (user-login-name)) host method)
(let ((process-environment (copy-sequence process-environment)))
(setenv "TERM" tramp-terminal-type)
＠＠ -5455,8 +5451,8 ＠＠ Maybe the different regular expressions
(tramp-open-connection-setup-interactive-shell
p multi-method method user host)
(tramp-post-connection multi-method method user host)))))
+
-
(defun tramp-open-connection-rsh (multi-method method user host)
"Open a connection using an rsh METHOD.
This starts the command `rsh HOST -l USER'[*], then waits for a remote
＠＠ -5481,7 +5477,7 ＠＠ arguments, and xx will be used as the ho
(error "Cannot multi-connect using rsh connection method"))
(tramp-pre-connection multi-method method user host)
(if (and user (not (string= user "")))
- (tramp-message 7 "Opening connection for %s＠%s using %s..."
+ (tramp-message 7 "Opening connection for %s＠%s using %s..."
user host method)
(tramp-message 7 "Opening connection at %s using %s..." host method))
(let ((process-environment (copy-sequence process-environment))
＠＠ -5510,9 +5506,9 ＠＠ arguments, and xx will be used as the ho
(> emacs-major-version 20))
tramp-dos-coding-system))
(p (if (and user (not (string= user "")))
- (apply #'start-process bufnam buf login-program
+ (apply #'start-process bufnam buf login-program
real-host "-l" user login-args)
- (apply #'start-process bufnam buf login-program
+ (apply #'start-process bufnam buf login-program
real-host login-args)))
(found nil))
(tramp-set-process-query-on-exit-flag p nil)
＠＠ -5582,10 +5578,10 ＠＠ prompt than you do, so it is not at all
tramp-actions-before-shell)
(tramp-open-connection-setup-interactive-shell
p multi-method method user host)
- (tramp-post-connection multi-method method
+ (tramp-post-connection multi-method method
user host)))))
-;; HHH: Not Changed. Multi method. It is not clear to me how this can
+;; HHH: Not Changed. Multi method. It is not clear to me how this can
;; handle not giving a user name in the "file name".
;;
;; This is more difficult than for the single-hop method. In the
＠＠ -5655,7 +5651,7 ＠＠ log in as u2 to h2."
(tramp-post-connection multi-method method user host)))))
;; HHH: Changed. Multi method. Don't know how to handle this in the case
-;; of no user name provided. Hack to make it work as it did before:
+;; of no user name provided. Hack to make it work as it did before:
;; changed `user' to `(or user (user-login-name))' in the places where
;; the value is actually used.
(defun tramp-multi-connect-telnet (p method user host command)
＠＠ -5677,8 +5673,8 ＠＠ If USER is nil, uses the return value of
(tramp-process-multi-actions p method user host
tramp-multi-actions)))
-;; HHH: Changed. Multi method. Don't know how to handle this in the case
-;; of no user name provided. Hack to make it work as it did before:
+;; HHH: Changed. Multi method. Don't know how to handle this in the case
+;; of no user name provided. Hack to make it work as it did before:
;; changed `user' to `(or user (user-login-name))' in the places where
;; the value is actually used.
(defun tramp-multi-connect-rlogin (p method user host command)
＠＠ -5703,8 +5699,8 ＠＠ If USER is nil, uses the return value of
(tramp-process-multi-actions p method user host
tramp-multi-actions)))
-;; HHH: Changed. Multi method. Don't know how to handle this in the case
-;; of no user name provided. Hack to make it work as it did before:
+;; HHH: Changed. Multi method. Don't know how to handle this in the case
+;; of no user name provided. Hack to make it work as it did before:
;; changed `user' to `(or user (user-login-name))' in the places where
;; the value is actually used.
(defun tramp-multi-connect-su (p method user host command)
＠＠ -6334,7 +6330,7 ＠＠ Sends COMMAND, then waits 30 seconds for
(tramp-barf-if-no-shell-prompt
nil 30
"Couldn't `%s', see buffer `%s'" command (buffer-name)))
-
+
(defun tramp-wait-for-output (&optional timeout)
"Wait for output from remote rsh command."
(let ((proc (get-buffer-process (current-buffer)))
＠＠ -6667,9 +6663,9 ＠＠ Not actually used. Use `(format \"%o\"
""))
-;; ------------------------------------------------------------
-;; -- TRAMP file names --
-;; ------------------------------------------------------------
+;; ------------------------------------------------------------
+;; -- TRAMP file names --
+;; ------------------------------------------------------------
;; Conversion functions between external representation and
;; internal data structure. Convenience functions for internal
;; data structure.
＠＠ -6680,7 +6676,7 ＠＠ Not actually used. Use `(format \"%o\"
"Return t iff NAME is a tramp file."
(save-match-data
(string-match tramp-file-name-regexp name)))
-
+
;; HHH: Changed. Used to assign the return value of (user-login-name)
;; to the `user' part of the structure if a user name was not
;; provided, now it assigns nil.
＠＠ -6733,7 +6729,7 ＠＠ This is MULTI-METHOD, if non-nil. Other
If both MULTI-METHOD and METHOD are nil, do a lookup in
`tramp-default-method-alist'."
(or multi-method method (tramp-find-default-method user host)))
-
+
;; HHH: Not Changed. Multi method. Will probably not handle the case where
;; a user name is not provided in the "file name" very well.
(defun tramp-dissect-multi-file-name (name)
＠＠ -6905,7 +6901,7 ＠＠ as default."
(if entry
(second entry)
(symbol-value param))))
-
+
;; Auto saving to a special directory.
＠＠ -6937,8 +6933,8 ＠＠ as default."
(tramp-make-auto-save-file-name (buffer-file-name)))
ad-do-it))
-;; In Emacs < 21.4 and XEmacs < 21.5 autosaved remote files have
-;; permission 666 minus umask. This is a security threat.
+;; In Emacs < 22 and XEmacs < 21.5 autosaved remote files have
+;; permission 0666 minus umask. This is a security threat.
(defun tramp-set-auto-save-file-modes ()
"Set permissions of autosaved remote files to the original permissions."
＠＠ -6946,20 +6942,18 ＠＠ as default."
(when (and (stringp bfn)
(tramp-tramp-file-p bfn)
(stringp buffer-auto-save-file-name)
- (not (equal bfn buffer-auto-save-file-name))
- (not (file-exists-p buffer-auto-save-file-name)))
- (write-region "" nil buffer-auto-save-file-name)
+ (not (equal bfn buffer-auto-save-file-name)))
+ (unless (file-exists-p buffer-auto-save-file-name)
+ (write-region "" nil buffer-auto-save-file-name))
+ ;; Permissions should be set always, because there might be an old
+ ;; auto-saved file belonging to another original file. This could
+ ;; be a security threat.
(set-file-modes buffer-auto-save-file-name (file-modes bfn)))))
(unless (or (> emacs-major-version 21)
(and (featurep 'xemacs)
(= emacs-major-version 21)
- (> emacs-minor-version 4))
- (and (not (featurep 'xemacs))
- (= emacs-major-version 21)
- (or (> emacs-minor-version 3)
- (and (string-match "^21\\.3\\.\\([0-9]+\\)" emacs-version)
- (>= (string-to-int (match-string 1 emacs-version)) 50)))))
+ (> emacs-minor-version 4)))
(add-hook 'auto-save-hook 'tramp-set-auto-save-file-modes))
(defun tramp-subst-strs-in-string (alist string)
＠＠ -7097,9 +7091,9 ＠＠ exiting if process is running."
process flag)))
-;; ------------------------------------------------------------
-;; -- Kludges section --
-;; ------------------------------------------------------------
+;; ------------------------------------------------------------
+;; -- Kludges section --
+;; ------------------------------------------------------------
;; Currently (as of Emacs 20.5), the function `shell-quote-argument'
;; does not deal well with newline characters. Newline is replaced by
＠＠ -7206,72 +7200,73 ＠＠ Only works for Bourne-like shells."
"Submit a bug report to the TRAMP developers."
(interactive)
(require 'reporter)
- (let ((reporter-prompt-for-summary-p t))
- (reporter-submit-bug-report
- tramp-bug-report-address ; to-address
- (format "tramp (%s)" tramp-version) ; package name and version
- `(;; Current state
- tramp-ls-command
- tramp-test-groks-nt
- tramp-file-exists-command
- tramp-current-multi-method
- tramp-current-method
- tramp-current-user
- tramp-current-host
-
- ;; System defaults
- tramp-auto-save-directory ; vars to dump
- tramp-default-method
- tramp-rsh-end-of-line
- tramp-default-password-end-of-line
- tramp-remote-path
- tramp-login-prompt-regexp
- tramp-password-prompt-regexp
- tramp-wrong-passwd-regexp
- tramp-yesno-prompt-regexp
- tramp-yn-prompt-regexp
- tramp-terminal-prompt-regexp
- tramp-out-of-band-prompt-regexp
- tramp-temp-name-prefix
- tramp-file-name-structure
- tramp-file-name-regexp
- tramp-multi-file-name-structure
- tramp-multi-file-name-hop-structure
- tramp-multi-methods
- tramp-multi-connection-function-alist
- tramp-methods
- tramp-end-of-output
- tramp-coding-commands
- tramp-actions-before-shell
- tramp-actions-copy-out-of-band
- tramp-multi-actions
- tramp-terminal-type
- tramp-shell-prompt-pattern
- tramp-chunksize
- ,(when (boundp 'tramp-backup-directory-alist)
- 'tramp-backup-directory-alist)
- ,(when (boundp 'tramp-bkup-backup-directory-info)
- 'tramp-bkup-backup-directory-info)
-
- ;; Non-tramp variables of interest
- shell-prompt-pattern
- backup-by-copying
- backup-by-copying-when-linked
- backup-by-copying-when-mismatch
- ,(when (boundp 'backup-by-copying-when-privileged-mismatch)
- 'backup-by-copying-when-privileged-mismatch)
- ,(when (boundp 'password-cache)
- 'password-cache)
- ,(when (boundp 'password-cache-expiry)
- 'password-cache-expiry)
- ,(when (boundp 'backup-directory-alist)
- 'backup-directory-alist)
- ,(when (boundp 'bkup-backup-directory-info)
- 'bkup-backup-directory-info)
- file-name-handler-alist)
- nil ; pre-hook
- nil ; post-hook
- "\
+ (catch 'dont-send
+ (let ((reporter-prompt-for-summary-p t))
+ (reporter-submit-bug-report
+ tramp-bug-report-address ; to-address
+ (format "tramp (%s)" tramp-version) ; package name and version
+ `(;; Current state
+ tramp-ls-command
+ tramp-test-groks-nt
+ tramp-file-exists-command
+ tramp-current-multi-method
+ tramp-current-method
+ tramp-current-user
+ tramp-current-host
+
+ ;; System defaults
+ tramp-auto-save-directory ; vars to dump
+ tramp-default-method
+ tramp-rsh-end-of-line
+ tramp-default-password-end-of-line
+ tramp-remote-path
+ tramp-login-prompt-regexp
+ tramp-password-prompt-regexp
+ tramp-wrong-passwd-regexp
+ tramp-yesno-prompt-regexp
+ tramp-yn-prompt-regexp
+ tramp-terminal-prompt-regexp
+ tramp-out-of-band-prompt-regexp
+ tramp-temp-name-prefix
+ tramp-file-name-structure
+ tramp-file-name-regexp
+ tramp-multi-file-name-structure
+ tramp-multi-file-name-hop-structure
+ tramp-multi-methods
+ tramp-multi-connection-function-alist
+ tramp-methods
+ tramp-end-of-output
+ tramp-coding-commands
+ tramp-actions-before-shell
+ tramp-actions-copy-out-of-band
+ tramp-multi-actions
+ tramp-terminal-type
+ tramp-shell-prompt-pattern
+ tramp-chunksize
+ ,(when (boundp 'tramp-backup-directory-alist)
+ 'tramp-backup-directory-alist)
+ ,(when (boundp 'tramp-bkup-backup-directory-info)
+ 'tramp-bkup-backup-directory-info)
+
+ ;; Non-tramp variables of interest
+ shell-prompt-pattern
+ backup-by-copying
+ backup-by-copying-when-linked
+ backup-by-copying-when-mismatch
+ ,(when (boundp 'backup-by-copying-when-privileged-mismatch)
+ 'backup-by-copying-when-privileged-mismatch)
+ ,(when (boundp 'password-cache)
+ 'password-cache)
+ ,(when (boundp 'password-cache-expiry)
+ 'password-cache-expiry)
+ ,(when (boundp 'backup-directory-alist)
+ 'backup-directory-alist)
+ ,(when (boundp 'bkup-backup-directory-info)
+ 'bkup-backup-directory-info)
+ file-name-handler-alist)
+ nil ; pre-hook
+ 'tramp-append-tramp-buffers ; post-hook
+ "\
Enter your bug report in this message, including as much detail as you
possibly can about the problem, what you did to cause it and what the
local and remote machines are.
＠＠ -7286,7 +7281,73 ＠＠ of the *tramp/foo* buffer and the *debug
report.
--bug report follows this line--
-")))
+"))))
+
+(defun tramp-append-tramp-buffers ()
+ "Append Tramp buffers into the bug report."
+
+ ;; We load mml.el from Gnus.
+ (if (featurep 'xemacs)
+ (load "mml" 'noerror)
+ (require 'mml nil 'noerror))
+
+ (when (and
+ ;; We don't want to add another dependency.
+ (functionp 'mml-insert-empty-tag)
+ ;; 2nd parameter since Emacs 22.
+ (condition-case nil
+ (list-buffers-noselect nil nil)
+ (t nil)))
+ (let ((buffer-list
+ (delq nil
+ (mapcar '(lambda (b)
+ (when (string-match "^\\*\\(debug \\)?tramp/" (buffer-name b)) b))
+ (buffer-list))))
+ (curbuf (current-buffer)))
+
+ ;; There is at least one Tramp buffer.
+ (when buffer-list
+ (switch-to-buffer (list-buffers-noselect nil buffer-list))
+ (delete-other-windows)
+ (setq buffer-read-only nil)
+ (goto-char (point-max))
+ (insert "
+The buffer(s) above will be appended to this message. If you don't want
+to append a buffer because it contains sensible data, or because the buffer
+is too large, you should delete the respective buffer. The buffer(s) will
+contain user and host names. Passwords will never be included there.")
+
+ (when (and tramp-debug-buffer (> tramp-verbose 9))
+ (insert "\n\n")
+ (let ((start (point)))
+ (insert "\
+Please note that you have set `tramp-verbose' to a value greater than 9.
+Therefore, the contents of files might be included in the debug buffer(s).")
+ (add-text-properties start (point) (list 'face 'italic))))
+
+ (set-buffer-modified-p nil)
+ (setq buffer-read-only t)
+ (goto-char (point-min))
+
+ (if (y-or-n-p "Do you want to append the buffer(s)? ")
+ ;; OK, let's send. First we delete the buffer list.
+ (progn
+ (kill-buffer nil)
+ (switch-to-buffer curbuf)
+ (goto-char (point-max))
+ (insert "\n\n")
+ (dolist (buffer buffer-list)
+ (mml-insert-empty-tag
+ 'part 'type "text/plain" 'encoding "base64"
+ 'disposition "attachment" 'buffer (buffer-name buffer)
+ 'description (buffer-name buffer)))
+ (set-buffer-modified-p nil))
+
+ ;; Don't send. Delete the message buffer.
+ (set-buffer curbuf)
+ (set-buffer-modified-p nil)
+ (kill-buffer nil)
+ (throw 'dont-send nil))))))
(defalias 'tramp-submit-bug 'tramp-bug)
＠＠ -7362,7 +7423,7 ＠＠ report.
;; strange when doing zerop, we should kill the process and start
;; again. (Greg Stark)
;; * Add caching for filename completion. (Greg Stark)
-;; Of course, this has issues with usability (stale cache bites)
+;; Of course, this has issues with usability (stale cache bites)
;; -- <daniel(a)danann.net>
;; * Provide a local cache of old versions of remote files for the rsync
;; transfer method to use. (Greg Stark)
1.8 +2 -2 XEmacs/packages/xemacs-packages/tramp/lisp/trampver.el
Index: trampver.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/lisp/trampver.el,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -p -r1.7 -r1.8
--- trampver.el 2005/01/16 13:46:55 1.7
+++ trampver.el 2005/03/20 20:14:43 1.8
＠＠ -30,10 +30,10 ＠＠
;; are auto-frobbed from configure.ac, so you should edit that file and run
;; "autoconf && ./configure" to change them.
-(defconst tramp-version "2.0.47"
+(defconst tramp-version "2.0.48"
"This version of Tramp.")
-(defconst tramp-bug-report-address "tramp-devel(a)mail.freesoftware.fsf.org"
+(defconst tramp-bug-report-address "tramp-devel(a)gnu.org"
"Email address to send bug reports to.")
(provide 'trampver)
1.25 +41 -16 XEmacs/packages/xemacs-packages/tramp/texi/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/texi/ChangeLog,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -p -r1.24 -r1.25
--- ChangeLog 2005/01/16 13:46:58 1.24
+++ ChangeLog 2005/03/20 20:14:50 1.25
＠＠ -1,10 +1,35 ＠＠
+2005-03-20 Michael Albinus <michael.albinus(a)gmx.de>
+
+ Version 2.0.48 released.
+
+2005-02-20 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * trampver.texi.in: Replace "Emacs" by "GNU Emacs".
+
+ * tramp.texi: Replace "Emacs" by "GNU Emacs".
+ (Default Method): Offer shortened syntax for "su" and "sudo"
+ methods.
+
+2005-02-13 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp.texi: Replace "Linux" by "GNU/Linux". Suggested by
+ Richard M. Stallman <rms(a)gnu.org>
+
+2005-02-09 Kim F. Storm <storm(a)cua.dk>
+
+ Change release version from 21.4 to 22.1 throughout.
+
+2005-02-02 Michael Albinus <michael.albinus(a)gmx.de>
+
+ * tramp.texi (all): Change all addresses to .gnu.org.
+
2005-01-16 Michael Albinus <michael.albinus(a)gmx.de>
Version 2.0.47 released.
2005-01-09 Michael Albinus <michael.albinus(a)gmx.de>
- * tramp.texi: (Compilation): Make reference to (X)Emacs manual
+ * tramp.texi (Compilation): Make reference to (X)Emacs manual
flavor specific. Remove mentioned restrictions for Emacs < 21.4
and for XEmacs.
＠＠ -47,7 +72,7 ＠＠
* tramp.texi (Frequently Asked Questions): Comment paragraph about
plink link. The URL is outdated. Originator contacted for
clarification.
-
+
2004-08-10 Michael Albinus <michael.albinus(a)gmx.de>
Version 2.0.44 released.
＠＠ -104,7 +129,7 ＠＠
moved to that file. "tramp-" and "-" removed from flag names.
Flags `tramp' and `trampver' used properly. Flag `tramp-inst'
replaced by `installchapter'.
-
+
2004-03-29 Michael Albinus <Michael.Albinus(a)alcatel.de>
* Makefile.in (INSTALL_INFO): Use option `--quiet'.
＠＠ -141,7 +166,7 ＠＠
2004-03-14 Michael Albinus <Michael.Albinus(a)alcatel.de>
* Makefile.in (savannah): Simplify copy command.
-
+
* trampinst.texi (Installation, Installation parameters)
(Load paths): Explain new option `--with-contrib'. Remove
description for explicit use of "contrib" directory. Remove
＠＠ -194,7 +219,7 ＠＠
* tramp.texi (Customizing Completion): Explain new functions
`tramp-parse-shostkeys' and `tramp-parse-sknownhosts'.
-
+
2004-01-05 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.texi (Issues): Explain disabling "auto-autoloads.el*" for
＠＠ -265,7 +290,7 ＠＠
(Japanese manual): New node.
* trampver.texi.in (all): New flag `japanese-manual'. Typo fix.
-
+
2003-11-02 Michael Albinus <Michael.Albinus(a)alcatel.de>
* tramp.texi (Inline methods): Small grammar fix.
＠＠ -335,7 +360,7 ＠＠
2003-06-17 Adrian Aichner <adrian(a)xemacs.org>
Small patch.
-
+
* tramp.texi: Fix minor typos.
* tramp.texi (Concept Index): Added to make manual searchable via
`Info-index'.
＠＠ -556,8 +581,8 ＠＠
2002-10-08 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
- * tramp.texi (Installation, Inline methods)
- (Customizing Completion, Remote shell setup)
+ * tramp.texi (Installation, Inline methods)
+ (Customizing Completion, Remote shell setup)
(Frequently Asked Questions): Fix typos. From Francis Litterio
<franl(a)world.std.com>.
＠＠ -655,7 +680,7 ＠＠
2002-08-22 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
- * tramp.texi (Usage): Mention type-ahead problem.
+ * tramp.texi (Usage): Mention type-ahead problem.
2002-08-22 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -676,7 +701,7 ＠＠
2002-08-05 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
Version 2.0.11 released.
-
+
2002-08-04 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.texi (Inline methods, Remote shell setup): Typos. From
＠＠ -697,8 +722,8 ＠＠
2002-07-26 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
* tramp.texi (Top): Add copying.
- (Overview, Obtaining ＠tramp{}, Installation, Multi-hop Methods)
- (Remote Programs, Multi-hop filename syntax)
+ (Overview, Obtaining ＠tramp{}, Installation, Multi-hop Methods)
+ (Remote Programs, Multi-hop filename syntax)
(Frequently Asked Questions): Reformat.
* Makefile (clean): Delete more.
＠＠ -706,7 +731,7 ＠＠
2002-07-24 Steve Youngs <youngs(a)xemacs.org>
* Makefile (prepversion): New target. Creates
- tramp-version.texi.
+ tramp-version.texi.
(all): Use it.
(clean): Add tramp-version.texi.
＠＠ -719,7 +744,7 ＠＠
* Makefile (tramp.html, tramp_ja.html): Specify output file.
* tramp.texi (Inline methods): Document new-style "ssh -1"
- methods and the renaming of "ssh1" methods.
+ methods and the renaming of "ssh1" methods.
2002-07-14 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
＠＠ -799,7 +824,7 ＠＠
2002-04-19 Kai Großjohann <Kai.Grossjohann(a)CS.Uni-Dortmund.DE>
From Harry Putnam <reader(a)newsguy.com>. Awaiting copyright
assignment.
-
+
* tramp.texi (Installation): Give more details on byte-compiling
the Lisp files and creating and installing the info file.
1.20 +37 -34 XEmacs/packages/xemacs-packages/tramp/texi/tramp.texi
Index: tramp.texi
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/texi/tramp.texi,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -p -r1.19 -r1.20
--- tramp.texi 2005/01/16 13:46:58 1.19
+++ tramp.texi 2005/03/20 20:14:50 1.20
＠＠ -88,7 +88,7 ＠＠ combination of ＠command{rsh} and ＠comman
programs, such as ＠command{ssh}/＠command{scp}.
You can find the latest version of this document on the web at
-＠uref{http://www.freesoftware.fsf.org/tramp/}.
+＠uref{http://www.gnu.org/software/tramp/}.
＠c Pointer to the other Emacs flavor is necessary only in case of
＠c standalone installation.
＠＠ -111,18 +111,18 ＠＠ Japanese translation}.
＠end ifset
The latest release of ＠value{tramp} is available for
-＠uref{http://savannah.nongnu.org/download/tramp/, download}, or you
-may see ＠ref{Obtaining Tramp} for more details, including the CVS
-server details.
+＠uref{http://ftp.gnu.org/gnu/tramp/, download}, or you may see
+＠ref{Obtaining Tramp} for more details, including the CVS server
+details.
-＠value{tramp} also has a ＠uref{http://savannah.nongnu.org/projects/tramp/,
+＠value{tramp} also has a ＠uref{http://savannah.gnu.org/projects/tramp/,
Savannah Project Page}.
＠end ifhtml
There is a mailing list for ＠value{tramp}, available at
-＠email{tramp-devel＠(a)mail.freesoftware.fsf.org}, and archived at
-＠uref{http://savannah.nongnu.org/mail/?group=tramp, Savannah Mail
-Archive}.
+＠email{tramp-devel＠(a)gnu.org}, and archived at
+＠uref{http://lists.gnu.org/archive/html/tramp-devel/, the
+＠value{tramp} Mail Archive}.
＠ifhtml
Older archives are located at
＠uref{http://sourceforge.net/mailarchive/forum.php?forum=tramp-devel,
＠＠ -377,14 +377,14 ＠＠ behind the scenes when you open a file w
＠chapter Obtaining Tramp.
＠cindex obtaining Tramp
-＠value{tramp} is freely available on the Internet and the latest release
-may be downloaded from
-＠uref{http://savannah.nongnu.org/download/tramp/}. This
-release includes the full documentation and code for ＠value{tramp},
-suitable for installation. But Emacs (21.4 or later) includes
-＠value{tramp} already, and there is a ＠value{tramp} package for XEmacs, as well.
-So maybe it is easier to just use those. But if you want the bleeding
-edge, read on＠dots{...}
+＠value{tramp} is freely available on the Internet and the latest
+release may be downloaded from
+＠uref{http://ftp.gnu.org/gnu/tramp/}. This release includes the full
+documentation and code for ＠value{tramp}, suitable for installation.
+But GNU Emacs (22 or later) includes ＠value{tramp} already, and there
+is a ＠value{tramp} package for XEmacs, as well. So maybe it is easier
+to just use those. But if you want the bleeding edge, read
+on＠dots{...}
For the especially brave, ＠value{tramp} is available from CVS. The CVS
version is the latest version of the code and may contain incomplete
＠＠ -396,7 +396,7 ＠＠ following URL and then clicking on the C
at the top.
＠noindent
-＠uref{http://savannah.nongnu.org/projects/tramp/}
+＠uref{http://savannah.gnu.org/projects/tramp/}
＠noindent
Or follow the example session below:
＠＠ -404,7 +404,7 ＠＠ Or follow the example session below:
＠example
] ＠strong{cd ~/＠value{emacsdir}}
] ＠strong{export CVS_RSH="ssh"}
-] ＠strong{cvs -z3 -d:ext:anoncvs＠＠savannah.nongnu.org:/cvsroot/tramp co tramp}
+] ＠strong{cvs -z3 -d:ext:anoncvs＠＠savannah.gnu.org:/cvsroot/tramp co tramp}
＠end example
＠noindent
＠＠ -1112,7 +1112,9 ＠＠ might like the ＠code{plink} method which
of ＠code{ssh}. Or you use Kerberos and thus like ＠code{krlogin}.
For the special case of editing files on the local host as another
-user, see the ＠code{su} or ＠code{sudo} method.
+user, see the ＠code{su} or ＠code{sudo} method. It offers shortened
+syntax for the ＠samp{root} account, like
+＠file{＠value{prefix}su＠value{postfixsinglehop}＠value{postfix}/etc/motd}.
People who edit large files may want to consider ＠code{scp} instead of
＠code{ssh}, or ＠code{pscp} instead of ＠code{plink}. These out-of-band
＠＠ -1603,7 +1605,7 ＠＠ directory an auto-saved file should go.
for ＠value{tramp} files to the local temporary directory.
On some versions of ＠value{emacsname}, namely the version built for
-Debian Linux, the variable ＠code{auto-save-file-name-transforms}
+Debian GNU/Linux, the variable ＠code{auto-save-file-name-transforms}
contains the directory where ＠value{emacsname} was built. A
workaround is to manually set the variable to a sane value.
＠＠ -1924,13 +1926,13 ＠＠ The ＠value{tramp} mailing list is a grea
with ＠value{tramp}, solving problems and general discussion and advice on topics
relating to the package.
-The mailing list is at ＠email{tramp-devel＠(a)mail.freesoftware.fsf.org}.
-Messages sent to this address go to all the subscribers. This is
-＠emph{not} the address to send subscription requests to.
-
-For help on subscribing to the list, send mail to the administrative
-address, ＠email{tramp-devel-request＠(a)mail.freesoftware.fsf.org}, with the
-subject ＠samp{help}.
+The mailing list is at ＠email{tramp-devel＠(a)gnu.org}. Messages sent to
+this address go to all the subscribers. This is ＠emph{not} the address
+to send subscription requests to.
+
+Subscribing to the list is performed via
+＠uref{http://lists.gnu.org/mailman/listinfo/tramp-devel/,
+the ＠value{tramp} Mail Subscription Page}.
To report a bug in ＠value{tramp}, you should execute ＠kbd{M-x tramp-bug}. This
will automatically generate a buffer with the details of your system and
＠＠ -1956,20 +1958,21 ＠＠ Where can I get the latest ＠value{tramp}
＠value{tramp} is available under the URL below.
＠noindent
-＠uref{http://savannah.nongnu.org/download/tramp/}
+＠uref{http://ftp.gnu.org/gnu/tramp/}
＠noindent
There is also a Savannah project page.
＠noindent
-＠uref{http://savannah.nongnu.org/projects/tramp/}
+＠uref{http://savannah.gnu.org/projects/tramp/}
＠item
Which systems does it work on?
-The package has been used successfully on Emacs 20 and Emacs 21, as well
-as XEmacs 21. XEmacs 20 is more problematic, see the notes in
-(a)file{tramp.el}. I don't think anybody has really tried it on Emacs 19.
+The package has been used successfully on GNU Emacs 20, GNU Emacs 21
+and GNU Emacs 22, as well as XEmacs 21. XEmacs 20 is more
+problematic, see the notes in ＠file{tramp.el}. I don't think anybody
+has really tried it on GNU Emacs 19.
The package was intended to work on Unix, and it really expects a
Unix-like system on the remote end (except the ＠option{smb} method),
＠＠ -2336,9 +2339,9 ＠＠ emulation macro to ＠value{tramp}, but if
forward and wishes to implement and test it, please contact me or the
mailing list.
-＠item The ＠value{tramp} filename syntax differs between Emacs and XEmacs.
+＠item The ＠value{tramp} filename syntax differs between GNU Emacs and XEmacs.
-The Emacs maintainers wish to use a unified filename syntax for
+The GNU Emacs maintainers wish to use a unified filename syntax for
Ange-FTP and ＠value{tramp} so that users don't have to learn a new
syntax. It is sufficient to learn some extensions to the old syntax.
1.8 +3 -3 XEmacs/packages/xemacs-packages/tramp/texi/trampver.texi
Index: trampver.texi
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/tramp/texi/trampver.texi,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -p -r1.7 -r1.8
--- trampver.texi 2005/01/16 13:46:58 1.7
+++ trampver.texi 2005/03/20 20:14:50 1.8
＠＠ -4,7 +4,7 ＠＠
＠c In the Tramp CVS, the version number is auto-frobbed from
＠c configure.ac, so you should edit that file and run
＠c "autoconf && ./configure" to change the version number.
-＠set trampver 2.0.47
+＠set trampver 2.0.48
＠c Other flags from configuration
＠set prefix /usr/local
＠＠ -25,7 +25,7 ＠＠
＠c Emacs values.
＠ifset emacs
-＠set emacsname Emacs
+＠set emacsname GNU Emacs
＠set emacsdir emacs
＠set ftppackagename Ange-FTP
＠set prefix /
＠＠ -49,7 +49,7 ＠＠
＠set postfix ]
＠set postfixsinglehop /
＠set postfixmultihop :
-＠set emacsothername Emacs
+＠set emacsothername GNU Emacs
＠set emacsotherdir emacs
＠set emacsotherfilename tramp-emacs.html
＠set japanesemanual tramp_ja-xemacs.html
- 1 participants
- 0 comments
Notice of CVSROOT-commit by michaels in CVSROOT
19 years, 9 months
CVS Monitor
CVS Monitor
Commit done by michaels
Sun Mar 20 18:51:45 CET 2005
Update of /pack/xemacscvs/CVSROOT
In directory sunsite.dk:/tmp/cvs-serv14078
Modified Files:
ChangeLog log_accum
Log Message:
2005-03-20 Michael Sperber <mike(a)xemacs.org>
* log_accum (process_argv): Hopefully improve the detection of
branch tags.
- 1 participants
- 0 comments
Notice of CVSROOT-commit by michaels in CVSROOT
19 years, 9 months
CVS Monitor
CVS Monitor
Commit done by michaels
Sun Mar 20 18:01:52 CET 2005
Update of /pack/xemacscvs/CVSROOT
In directory sunsite.dk:/tmp/cvs-serv22903
Modified Files:
ChangeLog log_accum
Log Message:
2005-03-20 Michael Sperber <mike(a)xemacs.org>
* log_accum (derive_subject_from_changes_file): Drop NEW, ADDED,
etc. subject prefixes at Stephen T.'s request.
- 1 participants
- 0 comments
Notice of CVSROOT-commit by michaels in CVSROOT
19 years, 9 months
CVS Monitor
CVS Monitor
Commit done by michaels
Sun Mar 20 17:24:28 CET 2005
Update of /pack/xemacscvs/CVSROOT
In directory sunsite.dk:/tmp/cvs-serv5464
Modified Files:
ChangeLog log_accum
Log Message:
2005-01-29 Steve Youngs <steve(a)sxemacs.org>
* log_accum: Add `-p' to $difftype to show the C function a hunk
is from.
- 1 participants
- 0 comments
CVS update by viteno MODIFIED: xemacs-builds/viteno ...
19 years, 9 months
CVS Monitor
CVS Monitor
User: viteno
Date: 05/03/20 13:55:44
Modified: xemacs-builds/viteno package-index setup-packages.ini
Log:
Package database backup:
- gnus-1.84
- riece-1.18
Revision Changes Path
1.202 +14 -14 XEmacs/xemacs-builds/viteno/package-index
Index: package-index
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs-builds/viteno/package-index,v
retrieving revision 1.201
retrieving revision 1.202
diff -u -r1.201 -r1.202
--- package-index 2005/03/14 09:58:02 1.201
+++ package-index 2005/03/20 12:55:42 1.202
＠＠ -171,20 +171,20 ＠＠
(package-get-update-base-entry (quote
(riece
(standards-version 1.1
- version "1.17"
- author-version "1.0.6"
- date "2004-12-07"
- build-date "2004-12-07"
+ version "1.18"
+ author-version "1.0.8"
+ date "2005-03-20"
+ build-date "2005-03-20"
maintainer "Daiki Ueno <ueno(a)unixuser.org>"
distribution xemacs
priority high
category "standard"
dump nil
description "IRC (Internet Relay Chat) client for Emacs."
- filename "riece-1.17-pkg.tar.gz"
- md5sum "027d6a6fef1f27df13700e379699a4cf"
- size 161627
- provides (riece-compat riece-xemacs riece-globals riece-options riece-version riece-coding riece-complete riece-addon riece-mode riece-identity riece-channel riece-user riece-misc riece-signal riece-layout riece-display riece-server riece-naming riece-message riece-filter riece-handle riece-000 riece-200 riece-300 riece-400 riece-500 riece-commands riece-irc riece riece-ctcp riece-highlight riece-log riece-mini riece-rdcc riece-url riece-unread riece-doctor riece-alias riece-foolproof riece-guess riece-history riece-button riece-keyword riece-menu riece-icon riece-async riece-lsdb riece-xface riece-ctlseq riece-ignore riece-hangman riece-biff riece-kakasi riece-yank)
+ filename "riece-1.18-pkg.tar.gz"
+ md5sum "d4422d2f91b2011d2d43d6037fd572c6"
+ size 175076
+ provides (riece-compat riece-xemacs riece-globals riece-options riece-debug riece-version riece-coding riece-complete riece-addon riece-mode riece-identity riece-channel riece-user riece-misc riece-signal riece-layout riece-display riece-server riece-naming riece-message riece-filter riece-handle riece-000 riece-200 riece-300 riece-400 riece-500 riece-commands riece-irc riece riece-ctcp riece-highlight riece-log riece-mini riece-rdcc riece-url riece-unread riece-doctor riece-alias riece-skk-kakutei riece-foolproof riece-guess riece-history riece-button riece-keyword riece-menu riece-icon riece-async riece-lsdb riece-xface riece-ctlseq riece-ignore riece-hangman riece-biff riece-kakasi riece-yank riece-toolbar riece-eval riece-google riece-keepalive)
requires (xemacs-base mail-lib)
type regular
))
＠＠ -2340,19 +2340,19 ＠＠
(package-get-update-base-entry (quote
(gnus
(standards-version 1.1
- version "1.83"
+ version "1.84"
author-version "5.10.7"
- date "2005-03-14"
- build-date "2005-03-14"
+ date "2005-03-20"
+ build-date "2005-03-20"
maintainer "Steve Youngs <steve(a)youngs.au.com>"
distribution xemacs
priority medium
category "standard"
dump nil
description "The Gnus Newsreader and Mailreader."
- filename "gnus-1.83-pkg.tar.gz"
- md5sum "100d51701d7c595a8e783df8a91db4ec"
- size 3391772
+ filename "gnus-1.84-pkg.tar.gz"
+ md5sum "af763127d170570ee790d28421ec3eb5"
+ size 3391981
provides (binhex canlock compface deuglify earcon flow-fill format-spec gnus-agent gnus-art gnus-async gnus-audio gnus-bcklg gnus-cache gnus-cite gnus-cus gnus-delay gnus-demon gnus-diary gnus-dired gnus-draft gnus-dup gnus-eform gnus-ems gnus-fun gnus-gl gnus-group gnus-int gnus-kill gnus-logic gnus-mh gnus-ml gnus-mlspl gnus-move gnus-msg gnus-nocem gnus-picon gnus-range gnus-registry gnus-salt gnus-score gnus-setup gnus-sieve gnus-soup gnus-spec gnus-srvr gnus-start gnus-sum gnus-topic gnus-undo gnus-util gnus-uu gnus-vm gnus-win gnus-xmas gnus ietf-drums imap mail-parse mail-prsvr mail-source mailcap message messagexmas messcompat mm-bodies mm-decode mm-encode mm-extern mm-partial mm-url mm-util mm-uu mm-view mml-sec mml-smime mml mml1991 mml2015 nnagent nnbabyl nndb nndiary nndir nndoc nndraft nneething nnfolder nngateway nnheader nnheaderxm nnimap nnkiboze nnlistserv nnmail nnmaildir nnmbox nnmh nnml nnnil nnoo nnrss nnslashdot nnsoup nnspool nntp nnultimate nnvi!
rtual nnwarchive nnweb nnwfm parse-time qp rfc1843 rfc2045 rfc2047 rfc2231 score-mode smiley smime spam-report spam-stat spam time-date utf7 uudecode webmail yenc gnus-idna gpg-ring gpg hashcash vcard)
requires (gnus mail-lib xemacs-base eterm sh-script net-utils os-utils dired mh-e sieve ps-print w3 pgg mailcrypt ecrypto sasl)
type regular
1.194 +4 -4 XEmacs/xemacs-builds/viteno/setup-packages.ini
Index: setup-packages.ini
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs-builds/viteno/setup-packages.ini,v
retrieving revision 1.193
retrieving revision 1.194
diff -u -r1.193 -r1.194
--- setup-packages.ini 2005/03/14 09:58:02 1.193
+++ setup-packages.ini 2005/03/20 12:55:42 1.194
＠＠ -84,8 +84,8 ＠＠
install: packages/rmail-1.14-pkg.tar.gz 96995
＠ gnus
-version: 1.83
-install: packages/gnus-1.83-pkg.tar.gz 3391772
+version: 1.84
+install: packages/gnus-1.84-pkg.tar.gz 3391981
＠ tm
version: 1.37
＠＠ -432,8 +432,8 ＠＠
install: packages/oo-browser-1.04-pkg.tar.gz 515713
＠ riece
-version: 1.17
-install: packages/riece-1.17-pkg.tar.gz 161627
+version: 1.18
+install: packages/riece-1.18-pkg.tar.gz 175076
＠ general-docs
version: 1.03
- 1 participants
- 0 comments
CVS update by viteno MODIFIED: packages/xemacs-packages/riece ...
19 years, 9 months
CVS Monitor
CVS Monitor
User: viteno
Date: 05/03/20 12:33:16
Modified: packages/xemacs-packages/riece ChangeLog Makefile
Log:
Increment VERSION in Makefile
Revision Changes Path
1.16 +4 -0 XEmacs/packages/xemacs-packages/riece/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/riece/ChangeLog,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -r1.15 -r1.16
--- ChangeLog 2005/03/20 09:11:09 1.15
+++ ChangeLog 2005/03/20 11:33:14 1.16
＠＠ -1,3 +1,7 ＠＠
+2005-03-20 Norbert Koch <viteno(a)xemacs.org>
+
+ * Makefile (VERSION): XEmacs package 1.18 released.
+
2005-03-06 Daiki Ueno <ueno(a)unixuser.org>
* Riece: Version 1.0.8 released.
1.17 +1 -1 XEmacs/packages/xemacs-packages/riece/Makefile
Index: Makefile
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/riece/Makefile,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -r1.16 -r1.17
--- Makefile 2005/03/20 09:31:53 1.16
+++ Makefile 2005/03/20 11:33:14 1.17
＠＠ -19,7 +19,7 ＠＠
# This XEmacs package contains the riece IRC client package
-VERSION = 1.17
+VERSION = 1.18
AUTHOR_VERSION = 1.0.8
MAINTAINER = Daiki Ueno <ueno(a)unixuser.org>
PACKAGE = riece
- 1 participants
- 0 comments
CVS update by viteno MODIFIED: packages/xemacs-packages/gnus ...
19 years, 9 months
CVS Monitor
CVS Monitor
User: viteno
Date: 05/03/20 12:32:01
Modified: packages/xemacs-packages/gnus ChangeLog Makefile
Log:
Increment VERSION in Makefile
Revision Changes Path
1.90 +4 -0 XEmacs/packages/xemacs-packages/gnus/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/gnus/ChangeLog,v
retrieving revision 1.89
retrieving revision 1.90
diff -u -r1.89 -r1.90
--- ChangeLog 2005/03/20 03:20:14 1.89
+++ ChangeLog 2005/03/20 11:32:00 1.90
＠＠ -1,3 +1,7 ＠＠
+2005-03-20 Norbert Koch <viteno(a)xemacs.org>
+
+ * Makefile (VERSION): XEmacs package 1.84 released.
+
2005-03-19 Aidan Kehoe <kehoea(a)parhasard.net>
* lisp/mm-util.el (mm-xemacs-find-mime-charset): Only call
1.106 +1 -1 XEmacs/packages/xemacs-packages/gnus/Makefile
Index: Makefile
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/gnus/Makefile,v
retrieving revision 1.105
retrieving revision 1.106
diff -u -r1.105 -r1.106
--- Makefile 2005/03/14 08:12:24 1.105
+++ Makefile 2005/03/20 11:32:00 1.106
＠＠ -17,7 +17,7 ＠＠
# the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
# Boston, MA 02111-1307, USA.
-VERSION = 1.83
+VERSION = 1.84
AUTHOR_VERSION = 5.10.7
MAINTAINER = Steve Youngs <steve(a)youngs.au.com>
PACKAGE = gnus
- 1 participants
- 0 comments
CVS update by viteno MODIFIED: packages ...
19 years, 9 months
CVS Monitor
CVS Monitor
User: viteno
Date: 05/03/20 12:29:08
Modified: packages ChangeLog
Log:
Package release
Revision Changes Path
1.511 +4 -0 XEmacs/packages/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/ChangeLog,v
retrieving revision 1.510
retrieving revision 1.511
diff -u -r1.510 -r1.511
--- ChangeLog 2005/03/09 20:19:22 1.510
+++ ChangeLog 2005/03/20 11:29:07 1.511
＠＠ -1,3 +1,7 ＠＠
+2005-03-20 Norbert Koch <viteno(a)xemacs.org>
+
+ * Packages released: gnus riece.
+
2005-03-09 Norbert Koch <viteno(a)xemacs.org>
* package-compile.el:
- 1 participants
- 0 comments