Fix for wrong-type-argument error in tramp-vc.el

[Francis Litterio]

I was using TRAMP in Emacs on W2K (the native Emacs build, not the
Cygwin Emacs build), and I got a wong-type-argument error when running
vc-print-log on a file under CVS that I visited using TRAMP.  I think
the below patch fixes it.

In the patched function (tramp-vc-do-command-new), the value of okstatus
was the symbol 'async, and the expression (< okstatus status) was
raising the wrong-type-argument error.  I think this means that TRAMP
fails to see a certain class of VC command failures as true failures.

There are other places in the same file where variable okstatus is
assumed to be an integer.  Are they also candidates for such a fix?

Hope this helps.
--
Francis Litterio
address@hidden
http://world.std.com/~franl/
GPG and PGP public keys available on keyservers.


--- tramp-vc.el 17 Jun 2002 10:57:20 -0000      2.2
+++ tramp-vc.el 27 Nov 2002 16:09:46 -0000
@@ -181,7 +181,9 @@
         (setq status (tramp-handle-shell-command
                       (mapconcat 'tramp-shell-quote-argument
                                  (cons command squeezed) " ") t))
-        (when (or (not (integerp status)) (and okstatus (< okstatus status)))
+        (when (or (not (integerp status))
+                 (and (integerp okstatus)
+                      (< okstatus status)))
           (pop-to-buffer (current-buffer))
           (goto-char (point-min))
           (shrink-window-if-larger-than-buffer)