(setq tramp-default-method "ssh")
(setq tramp-default-method-alist
`(("\\`\\(localhost\\|\\)\\'" ""
- ,(cond ((executable-find "become") "become")
- ((executable-find "really") "really")
+ ,(cond ((executable-find "really") "really")
+ ((executable-find "become") "become")
+ ((executable-find "sudo") "sudo")
(t "su")))))))
;;;--------------------------------------------------------------------------