.emacs-my
changeset 598 9399292dae57
parent 597 989e4416528a
child 599 61a2d23358eb
equal deleted inserted replaced
597:989e4416528a 598:9399292dae57
   503     (modify-coding-system-alist 'process ".*" 'utf-8-unix)
   503     (modify-coding-system-alist 'process ".*" 'utf-8-unix)
   504     ))
   504     ))
   505   )
   505   )
   506 
   506 
   507 ;;; ----------------------------------------------------------------
   507 ;;; ----------------------------------------------------------------
   508 (message "open file, ffap")
   508 (message "open file, ffap, dired")
       
   509 
   509 (setq-default save-place t)
   510 (setq-default save-place t)
   510 (require 'saveplace)
   511 (require 'saveplace)
   511 
   512 
   512 ;;; ----------------------------------------------------------------
       
   513 (message "dired")
       
   514 
       
   515 (require 'dired)
   513 (require 'dired)
       
   514 
       
   515 (require 'ffap)
       
   516 (ffap-bindings)
   516 
   517 
   517 ;; I usually mistype "C-x C-f" to "C-x d" or "C-x C-d", so always use find-file,
   518 ;; I usually mistype "C-x C-f" to "C-x d" or "C-x C-d", so always use find-file,
   518 ;; because when file if directory find-file load dired, if regular file open it.
   519 ;; because when file if directory find-file load dired, if regular file open it.
   519 (global-set-key (kbd "C-x C-f") 'find-file)
   520 (global-set-key (kbd "C-x C-f") 'find-file-at-point)
   520 (global-set-key (kbd "C-x C-d") 'find-file)
   521 (global-set-key (kbd "C-x C-d") 'find-file-at-point)
   521 (global-set-key (kbd "C-x d") 'find-file)
   522 (global-set-key (kbd "C-x d") 'find-file-at-point)
   522 
   523 
   523 (setq dired-dwim-target t)
   524 (setq dired-dwim-target t)
   524 ;; dangerous
   525 ;; dangerous
   525 ;; (setq
   526 ;; (setq
   526 ;;  dired-recursive-copies 'top
   527 ;;  dired-recursive-copies 'top