equal
deleted
inserted
replaced
1536 ;; (setq gnus-home-score-file |
1536 ;; (setq gnus-home-score-file |
1537 ;; ;; All groups that match the regexp `"\\.emacs"' |
1537 ;; ;; All groups that match the regexp `"\\.emacs"' |
1538 ;; '(("\\.emacs" "emacs.SCORE") |
1538 ;; '(("\\.emacs" "emacs.SCORE") |
1539 ;; ;; All the comp groups in one score file |
1539 ;; ;; All the comp groups in one score file |
1540 ;; ("^comp" "comp.SCORE"))) |
1540 ;; ("^comp" "comp.SCORE"))) |
|
1541 |
|
1542 ;; Make C-Up, C-Down more like across paragraph moving. |
|
1543 (eval-after-load 'gnus |
|
1544 '(progn |
|
1545 (define-key gnus-summary-mode-map [(meta up)] '(lambda() (interactive) (scroll-other-window -1))) |
|
1546 (define-key gnus-summary-mode-map [(meta down)] '(lambda() (interactive) (scroll-other-window 1))) |
|
1547 (define-key gnus-summary-mode-map [(control down)] 'gnus-summary-next-thread) |
|
1548 (define-key gnus-summary-mode-map [(control up)] 'gnus-summary-prev-thread) |
|
1549 )) |
1541 |
1550 |
1542 ;; (setq imap-log t) |
1551 ;; (setq imap-log t) |
1543 |
1552 |
1544 ;; (setq mail-user-agent 'mh-e-user-agent) |
1553 ;; (setq mail-user-agent 'mh-e-user-agent) |
1545 |
1554 |