.emacs-my
changeset 338 ebf88f988c37
parent 337 17e3c74b7c22
child 339 4e131c57a0ef
equal deleted inserted replaced
337:17e3c74b7c22 338:ebf88f988c37
    44 
    44 
    45 (menu-bar-mode -1)
    45 (menu-bar-mode -1)
    46 (tool-bar-mode -1)
    46 (tool-bar-mode -1)
    47 (tooltip-mode -1)
    47 (tooltip-mode -1)
    48 (scroll-bar-mode 1)
    48 (scroll-bar-mode 1)
       
    49 
       
    50 (setq frame-title-format "Emacs - %b")
       
    51 
       
    52 ;; show column & line numbers in status bar
       
    53 (setq column-number-mode t)
       
    54 (setq line-number-mode t)
       
    55 
       
    56 ;; Also useful such format: (setq display-time-format " %H:%M %d-%m-%y ")
       
    57 (setq display-time-24hr-format t)
       
    58 (setq display-time-default-load-average nil)
       
    59 (display-time)                          ; display-time-mode
    49 
    60 
    50 (if window-system
    61 (if window-system
    51     ;; For graphical environment.
    62     ;; For graphical environment.
    52     (progn
    63     (progn
    53       (set-background-color "white")
    64       (set-background-color "white")
   109 (setq enable-local-variables t
   120 (setq enable-local-variables t
   110       enable-local-eval      1)
   121       enable-local-eval      1)
   111 
   122 
   112 (setq kill-whole-line t)
   123 (setq kill-whole-line t)
   113 
   124 
   114 ;; show column & line numbers in status bar
       
   115 (setq column-number-mode t)
       
   116 (setq line-number-mode t)
       
   117 
       
   118 (setq view-read-only t)
   125 (setq view-read-only t)
   119 
       
   120 (setq frame-title-format "Emacs - %b")
       
   121 
   126 
   122 (setq read-quoted-char-radix 16)
   127 (setq read-quoted-char-radix 16)
   123 
   128 
   124 ;; ----------------------------------------------------------------------
   129 ;; ----------------------------------------------------------------------
   125 ;; switching, creating, selecting buffers.
   130 ;; switching, creating, selecting buffers.
   415 (cond
   420 (cond
   416  ((equal window-system 'w32)
   421  ((equal window-system 'w32)
   417   (setq browse-url-browser-function 'browse-url-default-windows-browser))
   422   (setq browse-url-browser-function 'browse-url-default-windows-browser))
   418  (t
   423  (t
   419   (setq browse-url-browser-function 'browse-url-mozilla)))
   424   (setq browse-url-browser-function 'browse-url-mozilla)))
   420 
       
   421 ;; ----------------------------------------------------------------------
       
   422 ;; time.
       
   423 
       
   424 ;; Also useful such format:
       
   425 ;; (setq display-time-format " %H:%M %d-%m-%y ")
       
   426 (setq display-time-24hr-format t)
       
   427 (setq display-time-default-load-average nil)
       
   428 (display-time)                          ; display-time-mode
       
   429 
   425 
   430 ;; ----------------------------------------------------------------------
   426 ;; ----------------------------------------------------------------------
   431 ;; calendar.
   427 ;; calendar.
   432 
   428 
   433 ;; (setq mark-holidays-in-calendar t)
   429 ;; (setq mark-holidays-in-calendar t)