Hi all
Recently I noticed an error when using Tramp, which I hadn't seen
before. I think this was introduced with the last sync (tramp.el):
(progn (defun tramp-autoload-file-name-handler (operation &rest args)
"Load Tramp file name handler, and perform OPERATION."
;; Avoid recursive loading of tramp.el. `temporary-file-directory'
;; does not exist in XEmacs, so we must use something else.
(let ((default-directory (or (symbol-value 'temporary-file-directory)
"/")))
(load "tramp" nil t))
(apply operation args)))
The variable `temporary-file-directory' doesn't exist in XEmacs and
hence #'symbol-value returns an error.
Shouldn't that rather read
(if (boundp 'temporary-file-directory)
temporary-file-directory
(temp-directory))
or perhaps
(condition-case nil
(symbol-value 'temporary-file-directory)
(error
(temp-directory)
))
Thanks
Marcus
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta