;;; -*- lexical-binding: t -*-
;;;
;;; this file:
;;;   http://user.it.uu.se/~embe8573/emacs-init/tramp-my.el
;;;   https://dataswamp.org/~incal/emacs-init/tramp-my.el

(require 'tramp)

(setq tramp-histfile-override nil)

(add-to-list 'tramp-methods
  '("sunos-ssh"
    (tramp-login-program "ssh")
    (tramp-login-args (("-l" "%u")
                       ("-p" "%p")
                       ("%c")
                       ("-e" "none")
                       ("-t" "-t")
                       ("%h")
                       ("\"/bin/sh -i\"") ))
    (tramp-async-args (("-q")))
    (tramp-remote-shell "/bin/sh")
    (tramp-remote-shell-login ("-l"))
    (tramp-remote-shell-args  ("-c"))
    ))

;; SunOS system:
;; (find-file "/sunos-ssh:embe8573@polhem.it.uu.se:public_html/darn.txt")
;;
;; OpenBSD system:
;; (find-file "/-:incal@srv.dataswamp.org:public_html/bot/sth.py")