.emacs-my
changeset 361 9dbe92b8b329
parent 360 88e4e74c0b6c
child 362 f4bd431ad549
equal deleted inserted replaced
360:88e4e74c0b6c 361:9dbe92b8b329
    82 ;; ----------------------------------------------------------------------
    82 ;; ----------------------------------------------------------------------
    83 ;; silent runing.
    83 ;; silent runing.
    84 
    84 
    85 ;; (setq inhibit-splash-screen t) ; nonexist on 21.4.1
    85 ;; (setq inhibit-splash-screen t) ; nonexist on 21.4.1
    86 (setq inhibit-startup-message t)
    86 (setq inhibit-startup-message t)
       
    87 
       
    88 ;; ----------------------------------------------------------------------
       
    89 ;; whitespaces.
       
    90 
       
    91 (setq default-indicate-empty-lines t)
       
    92 (setq default-indicate-buffer-boundaries t)
       
    93 
       
    94 (setq-default show-trailing-whitespace t)
       
    95 
       
    96 (setq next-line-add-newlines nil)
       
    97 
       
    98 ;; See also 'mode-require-final-newline'.
       
    99 (add-hook 'text-mode-hook (lambda () (setq require-final-newline nil)))
    87 
   100 
    88 ;; ======================================================================
   101 ;; ======================================================================
    89 ;; gnu serv, server.
   102 ;; gnu serv, server.
    90 
   103 
    91 ;; (load "~/emacs/bin/gnuserv/gnuserv.el")
   104 ;; (load "~/emacs/bin/gnuserv/gnuserv.el")
   656               ;; (?j "* %^{topic}\n  %T\n" "~/.gtd/journal.org")
   669               ;; (?j "* %^{topic}\n  %T\n" "~/.gtd/journal.org")
   657               ))
   670               ))
   658       (setq
   671       (setq
   659        org-remember-store-without-prompt t
   672        org-remember-store-without-prompt t
   660        ) ))
   673        ) ))
   661 
       
   662 ;; ======================================================================
       
   663 ;; whitespaces.
       
   664 
       
   665 (setq-default show-trailing-whitespace t)
       
   666 (setq-default indicate-empty-lines t)
       
   667 (setq next-line-add-newlines nil)
       
   668 
       
   669 ;; See also 'mode-require-final-newline'.
       
   670 (add-hook 'text-mode-hook (lambda () (setq require-final-newline nil)))
       
   671 
   674 
   672 ;; ----------------------------------------------------------------------
   675 ;; ----------------------------------------------------------------------
   673 ;; TODO, XXX, FIXME highlight.
   676 ;; TODO, XXX, FIXME highlight.
   674 ;; Show blanks and FIXME
   677 ;; Show blanks and FIXME
   675 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule
   678 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule