336 |
(tramp-tramp-file-p filename) |
(tramp-tramp-file-p filename) |
337 |
(not |
(not |
338 |
(let ((v (tramp-dissect-file-name filename))) |
(let ((v (tramp-dissect-file-name filename))) |
339 |
|
;; The following check is probably to test whether |
340 |
|
;; file-attributes returns correct last modification |
341 |
|
;; times. This check needs to be changed. |
342 |
(tramp-get-remote-perl (tramp-file-name-multi-method v) |
(tramp-get-remote-perl (tramp-file-name-multi-method v) |
343 |
(tramp-file-name-method v) |
(tramp-file-name-method v) |
344 |
(tramp-file-name-user v) |
(tramp-file-name-user v) |
486 |
;; No need to load this again if anyone asks. |
;; No need to load this again if anyone asks. |
487 |
(provide 'tramp-vc) |
(provide 'tramp-vc) |
488 |
|
|
489 |
|
;;; arch-tag: 27cc42ce-da19-468d-ad5c-a2690558db60 |
490 |
;;; tramp-vc.el ends here |
;;; tramp-vc.el ends here |