 ;; s̗L
 (setq create-lockfiles nil)
 
+
+
+
+(defvar my-inhibit-auto-file-directory-list
+  (list
+   "~/DropBox"
+   (concat (getenv "USERPROFILE") "/Google hCu")
+   )
+  "쐬(obNAbvAۑAbN)֎~fBNg[̃Xg")
+  
+(add-hook 'find-file-hook
+	  '(lambda ()
+	     (when (listp my-inhibit-auto-file-directory-list)
+	       (let ((inhibit-ptn (concat "^\\(" (mapconcat '(lambda(str) (regexp-quote (expand-file-name str)))
+							    my-inhibit-auto-file-directory-list "\\|") "\\)")))
+		 (when (string-match inhibit-ptn buffer-file-name)
+		   (setq backup-inhibited t) ;; obNAbv֎~
+		   (auto-save-mode nil)	     ;; ۑȂ
+		   (make-local-variable 'create-lockfiles) ;; bNt@C쐬Ȃ
+		   (setq create-lockfiles nil)
+		   )))))
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(setq initial-frame-alist
      '((top . 80)			; ʒu()
	(left . 200)			; ʒu()
	(width . 150)			; TCY()
	(height . 50)			; TCY()
	))


;; i[fBNg[̕ύX
;;   (Ώۃt@C̃p^[ . ۑt@CpX) ̃Xg
;; (setq auto-save-file-name-transforms
;;       (append auto-save-file-name-transforms
;; 	      '((".*" "~/tmp/" t))))


;; ۑ̊Ԋu
