.emacs-my
changeset 362 f4bd431ad549
parent 361 9dbe92b8b329
child 363 17df92226b5a
equal deleted inserted replaced
361:9dbe92b8b329 362:f4bd431ad549
    39   '(outline-mode-hook text-mode-hook)
    39   '(outline-mode-hook text-mode-hook)
    40   "List of text mode hooks.")
    40   "List of text mode hooks.")
    41 
    41 
    42 ;; ======================================================================
    42 ;; ======================================================================
    43 ;; appearance.
    43 ;; appearance.
       
    44 
       
    45 (setq default-directory "~/")
    44 
    46 
    45 (menu-bar-mode -1)
    47 (menu-bar-mode -1)
    46 (tool-bar-mode -1)
    48 (tool-bar-mode -1)
    47 (tooltip-mode -1)
    49 (tooltip-mode -1)
    48 (scroll-bar-mode 1)
    50 (scroll-bar-mode 1)
  1104 (setq delete-auto-save-files t)
  1106 (setq delete-auto-save-files t)
  1105 
  1107 
  1106 ;; ======================================================================
  1108 ;; ======================================================================
  1107 ;; user info.
  1109 ;; user info.
  1108 
  1110 
  1109 (cd "~/")
       
  1110 (setq user-full-name "Oleksandr Gavenko")
  1111 (setq user-full-name "Oleksandr Gavenko")
  1111 (setq user-mail-address "gavenkoa@gmail.com")
  1112 (setq user-mail-address "gavenkoa@gmail.com")
  1112 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address  ">"))
  1113 (setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address  ">"))
  1113 
  1114 
  1114 (add-hook 'emacs-startup-hook
  1115 (add-hook 'emacs-startup-hook