[Emacs-diffs] /srv/bzr/emacs/trunk r106037: * net/tramp.el (tramp-file-name-handler): Add 'debug to the error

[Michael Albinus]

------------------------------------------------------------
revno: 106037
committer: Michael Albinus <address@hidden>
branch nick: trunk
timestamp: Sun 2011-10-09 11:38:25 +0200
message:
  * net/tramp.el (tramp-file-name-handler): Add 'debug to the error
  condition.
modified:
  lisp/ChangeLog
  lisp/net/tramp.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-10-09 01:44:43 +0000
+++ b/lisp/ChangeLog    2011-10-09 09:38:25 +0000
@@ -1,3 +1,8 @@
+2011-10-09  Michael Albinus  <address@hidden>
+
+       * net/tramp.el (tramp-file-name-handler): Add 'debug to the error
+       condition.
+
 2011-10-09  Leo Liu  <address@hidden>
 
        * mail/smtpmail.el (smtpmail-send-data): Add a missing space.

=== modified file 'lisp/net/tramp.el'
--- a/lisp/net/tramp.el 2011-09-21 10:42:55 +0000
+++ b/lisp/net/tramp.el 2011-10-09 09:38:25 +0000
@@ -1886,7 +1886,7 @@
                      (apply foreign operation args))
 
                  ;; Trace that somebody has interrupted the operation.
-                 (quit
+                 ((debug quit)
                   (let (tramp-message-show-message)
                     (tramp-message
                      v 1 "Interrupt received in operation %s"
@@ -1898,6 +1898,9 @@
                  ;; operations shall return at least a default value
                  ;; in order to give the user a chance to correct the
                  ;; file name in the minibuffer.
+                 ;; We cannot use 'debug as error handler.  In order
+                 ;; to get a full backtrace, one could apply
+                 ;;   (setq debug-on-error t debug-on-signal t)
                  (error
                   (cond
                    ((and completion (zerop (length localname))
@@ -3850,9 +3853,9 @@
 ;; * Run emerge on two remote files.  Bug is described here:
 ;;   <http://www.mail-archive.com/address@hidden/msg01041.html>.
 ;;   (Bug#6850)
-
-;; Functions for file-name-handler-alist:
-;; diff-latest-backup-file -- in diff.el
+;; * It would be very useful if it were possible to load or save a
+;;   buffer using Tramp in a non-blocking way so that use of Emacs on
+;;   other buffers could continue.  (Bug#9617)
 
 ;;; tramp.el ends here