Mercurial > hg > cc > cirrus_work

comparison .xemacs/custom.el @ 114:5818d79c4ec9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
a few more from ecclerig, comment out some duplicates
author Henry S. Thompson <ht@inf.ed.ac.uk>
date Tue, 26 Sep 2023 14:18:40 +0100
parents 4e1ecfa46bee
children 9c63ff510cc9
comparison
equal deleted inserted replaced
113:4a52585a1aac 114:5818d79c4ec9
1 (custom-set-variables 1 (custom-set-variables
2 '(py-indent-offset 2) 2 '(py-indent-offset 2)
3 '(adaptive-fill-mode t) 3 '(adaptive-fill-mode t)
4 '(browse-url-firefox-new-window-is-tab t) 4 '(browse-url-firefox-new-window-is-tab t)
5 '(browse-url-new-window-flag nil t) 5 ; '(browse-url-new-window-flag nil t)
6 '(ediff-coding-system-for-write (quote escape-quoted)) 6 '(ediff-coding-system-for-write (quote escape-quoted))
7 '(frame-title-format "hst" t) 7 '(frame-title-format "hst" t)
8 '(gutter-buffers-tab-visible-p nil) 8 '(gutter-buffers-tab-visible-p nil)
9 '(message-use-toolbar nil t) 9 '(message-use-toolbar nil t)
10 '(modeline-3d-p t) 10 '(modeline-3d-p t)
11 '(line-number-mode t)
12 '(column-number-mode t)
11 '(progress-feedback-use-echo-area t) 13 '(progress-feedback-use-echo-area t)
12 '(toolbar-visible-p nil)) 14 '(toolbar-visible-p nil))
13 (message "custom 0 . . .") 15 (message "custom 0 . . .")
14 (custom-set-variables 16 (custom-set-variables
15 '(adaptive-fill-mode t) 17 ; '(adaptive-fill-mode t)
16 ; '(bbdb-offer-save 'always) 18 ; '(bbdb-offer-save 'always)
17 ; '(bbdb-quiet-about-name-mismatches 0) 19 ; '(bbdb-quiet-about-name-mismatches 0)
18 '(browse-url-firefox-new-window-is-tab t) 20 ; '(browse-url-firefox-new-window-is-tab t)
19 '(browse-url-new-window-flag nil) 21 '(browse-url-new-window-flag nil)
20 ; '(canlock-password "1b392767672e36dae4a8c9fbd67210839c8932aa") 22 ; '(canlock-password "1b392767672e36dae4a8c9fbd67210839c8932aa")
21 '(frame-title-format "hst" t) 23 ; '(frame-title-format "hst" t)
22 ; '(gnus-install-group-spam-parameters nil) 24 ; '(gnus-install-group-spam-parameters nil)
23 ; '(gnus-use-toolbar nil) 25 ; '(gnus-use-toolbar nil)
24 '(gutter-buffers-tab-visible-p nil) 26 ; '(gutter-buffers-tab-visible-p nil)
25 '(message-use-toolbar nil t) 27 ; '(message-use-toolbar nil t)
26 '(modeline-3d-p t) 28 ; '(modeline-3d-p t)
27 '(progress-feedback-use-echo-area t) 29 ; '(progress-feedback-use-echo-area t)
28 ; '(toolbar-mail-reader 'gnus) 30 ; '(toolbar-mail-reader 'gnus)
29 ; '(toolbar-news-reader 'gnus) 31 ; '(toolbar-news-reader 'gnus)
30 '(toolbar-visible-p nil)) 32 ; '(toolbar-visible-p nil))
31 (message "custom 1 . . .") 33 (message "custom 1 . . .")
32 (custom-set-faces 34 (custom-set-faces
33 '(default ((t (:size "12pt" :family "Lucidatypewriter"))) t)) 35 '(default ((t (:size "12pt" :family "Lucidatypewriter"))) t))
36 (message "custom 2...")
37 (global-set-key "\C-xl" (function goto-line))