(if (file-exists-p "/local/skel/all.emacs")
(load "/local/skel/all.emacs" nil t t)))
-(setq tfheen-color-preference 'light) ; light or dark
+(setq tfheen-color-preference 'dark) ; light or dark
(cw/for-emacs
(set-language-environment "Latin-1")
(require 'cl)
(let '(bar (copy-list reverse-list))
(setq liste (list))
- (while (car bar)
+ (while (car bar)
(let '(elem (car bar))
(add-to-list 'liste (reverse elem)))
(setq bar (cdr bar)))
(cw/for-emacs
(if (functionp 'toggle-scroll-bar)
- (progn
+ (progn
(toggle-scroll-bar -1)
(setq scrollbars-visible-p nil))))