;.xyzzyの例 xyzzy.exeの所かc:\に置いてください (load-library "php-mode") (require "php-misc") (push '("\\.php$" . php-mode) *auto-mode-alist*) (push '("\\.inc$" . php-mode) *auto-mode-alist*) (load-library "ftpupdate") ;キーを割り当てる (global-set-key #\F7 'ftpupdate-bblook3) (global-set-key #\F8 'ftpupdate-lolipo) ;第1サーバ (defun ftpupdate-bblook3 () (interactive) (setq *ftpupdate-server* "look3.info") (setq *ftpupdate-user* "11221122") (setq *ftpupdate-pass* "ps988998") (setq *ftpupdate-remote-path* "/public_html") (setq *ftpupdate-local-path* (concat "D:/php/bbs/look2/bb.look3/new")) (ftpupdate-this-file) ) ;第2サーバー (defun ftpupdate-lolipo () (interactive) (setq *ftpupdate-server* "xxx.lolipop.jp") (setq *ftpupdate-user* "334434") (setq *ftpupdate-pass* "pspsps") (setq *ftpupdate-remote-path* "/") (setq *ftpupdate-local-path* (concat "D:/php/bbs/yapusu")) (ftpupdate-this-file) )