equal
deleted
inserted
replaced
363 "Show region length." |
363 "Show region length." |
364 (interactive) |
364 (interactive) |
365 (message "%s" (- (region-end) (region-beginning)))) |
365 (message "%s" (- (region-end) (region-beginning)))) |
366 |
366 |
367 ;; ---------------------------------------------------------------------- |
367 ;; ---------------------------------------------------------------------- |
368 ;; Completion |
368 ;; minibuffer |
369 |
369 |
370 (require 'icomplete) ; Interactive completion in minibuffer. |
370 (require 'icomplete) ; Interactive completion in minibuffer. |
371 (icomplete-mode 1) |
371 (icomplete-mode 1) |
372 |
372 |
373 (mapc (lambda (ext) (add-to-list 'completion-ignored-extensions ext)) |
373 (mapc (lambda (ext) (add-to-list 'completion-ignored-extensions ext)) |
633 ;; (?j "* %^{topic}\n %T\n" "~/.gtd/journal.org") |
633 ;; (?j "* %^{topic}\n %T\n" "~/.gtd/journal.org") |
634 )) |
634 )) |
635 (setq |
635 (setq |
636 org-remember-store-without-prompt t |
636 org-remember-store-without-prompt t |
637 ) )) |
637 ) )) |
|
638 |
|
639 ;; ====================================================================== |
|
640 ;; whitespace |
|
641 |
|
642 (setq-default show-trailing-whitespace t) |
|
643 (setq-default indicate-empty-lines t) |
638 |
644 |
639 ;; ---------------------------------------------------------------------- |
645 ;; ---------------------------------------------------------------------- |
640 ;; TODO, XXX, FIXME highlight. |
646 ;; TODO, XXX, FIXME highlight. |
641 ;; Show blanks and FIXME |
647 ;; Show blanks and FIXME |
642 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule |
648 ;; http://www.emacswiki.org/cgi-bin/wiki/EightyColumnRule |
782 (add-hook mode |
788 (add-hook mode |
783 (lambda () |
789 (lambda () |
784 (setq fill-column 110) ) |
790 (setq fill-column 110) ) |
785 )) |
791 )) |
786 '(c-mode-hook lisp-mode-hook)) |
792 '(c-mode-hook lisp-mode-hook)) |
787 |
|
788 (setq-default show-trailing-whitespace t) |
|
789 |
793 |
790 ;; ---------------------------------------------------------------------- |
794 ;; ---------------------------------------------------------------------- |
791 ;; Diff, patch |
795 ;; Diff, patch |
792 (setq diff-switches "-u") |
796 (setq diff-switches "-u") |
793 |
797 |