.emacs-my
changeset 1062 c1cac6e85f9b
parent 1061 506ee5aebe22
child 1064 17fd4410d0f1
equal deleted inserted replaced
1061:506ee5aebe22 1062:c1cac6e85f9b
   407     (defun my-term-send-m-right () (interactive) (term-send-raw-string "\e[1;3C"))
   407     (defun my-term-send-m-right () (interactive) (term-send-raw-string "\e[1;3C"))
   408     (defun my-term-send-m-left () (interactive) (term-send-raw-string "\e[1;3D"))
   408     (defun my-term-send-m-left () (interactive) (term-send-raw-string "\e[1;3D"))
   409     (define-key term-raw-map [M-right] 'my-term-send-m-right)
   409     (define-key term-raw-map [M-right] 'my-term-send-m-right)
   410     (define-key term-raw-map [M-left] 'my-term-send-m-left)
   410     (define-key term-raw-map [M-left] 'my-term-send-m-left)
   411     ))
   411     ))
       
   412 
       
   413 (defun my-term-mode-hook ()
       
   414   (goto-address-mode 1))
       
   415 (add-hook 'term-mode-hook #'my-term-mode-hook)
   412 
   416 
   413 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   417 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   414 (message "whitespaces")
   418 (message "whitespaces")
   415 
   419 
   416 (setq default-indicate-empty-lines t)
   420 (setq default-indicate-empty-lines t)