-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Let's be zen. Remove the modeline and fringes.
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-(setq ff/zen-original-setting nil)
-
-(defun ff/zen () (interactive)
- (if ff/zen-original-setting
- (setq mode-line-format (car ff/zen-original-setting)
- fringe-mode (cdr ff/zen-original-setting)
- ff/zen-original-setting nil)
- (setq ff/zen-original-setting (cons mode-line-format fringe-mode)
- mode-line-format nil
- fringe-mode '(0 . 0))
- (delete-other-windows)
- )
- (fringe-mode fringe-mode)
- (if ff/zen-original-setting
- (message "Zen mode")
- (message "Cluttered mode"))
- )
-
-;; (define-key global-map [(control x) (x)] 'ff/zen)
-