From f300c8bd5d57aed5b2e453d912be48e0d41a8267 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 20 Jan 2015 14:01:41 -0500 Subject: [PATCH] Clean up --- core/core-evil.el | 2 +- core/core-ui.el | 7 +------ core/defuns-ui.el | 1 + 3 files changed, 3 insertions(+), 7 deletions(-) diff --git a/core/core-evil.el b/core/core-evil.el index b68c5750e..befea94bf 100644 --- a/core/core-evil.el +++ b/core/core-evil.el @@ -208,7 +208,7 @@ (progn ; ex-commands (evil-ex-define-cmd "echo" 'my:echo) - (evil-ex-define-cmd "pres[ent]" 'toggle-presentation-mode) + (evil-ex-define-cmd "cycle" 'cycle-font) (evil-ex-define-cmd "togglet[heme]" 'toggle-theme) (evil-ex-define-cmd "full[scr]" 'toggle-frame-fullscreen) (evil-ex-define-cmd "k[ill]" 'kill-this-buffer) ; Kill current buffer diff --git a/core/core-ui.el b/core/core-ui.el index 900a776d2..8da7801eb 100644 --- a/core/core-ui.el +++ b/core/core-ui.el @@ -4,7 +4,6 @@ (when window-system ;; No transparency! (set-frame-parameter nil 'alpha '(94 70)) - (let* ((font (nth 0 *fonts)) (font-name (nth 0 font)) (font-size (nth 1 font)) @@ -23,7 +22,7 @@ ;;;; GUI Settings ;;;;;;;;;;;;;;;;;;;;;; (tooltip-mode -1) (blink-cursor-mode 1) ; blink cursor -;; (global-hl-line-mode 1) ; highlight line +(global-hl-line-mode 1) ; highlight line (setq linum-format " %3d") @@ -52,10 +51,6 @@ (tooltip-mode -1) (blink-cursor-mode 1)) -;; Show full path in window title -;; (setq frame-title-format -;; '(:eval (if (buffer-file-name) (abbreviate-file-name (buffer-file-name)) "%b"))) - ;;;; Modeline ;;;;;;;;;;;;;;;;;;;;;;;;;; (use-package uniquify diff --git a/core/defuns-ui.el b/core/defuns-ui.el index ec58093b3..f3bec4509 100644 --- a/core/defuns-ui.el +++ b/core/defuns-ui.el @@ -40,6 +40,7 @@ ;;;###autoload (defun cycle-font () + "Cycle between fonts specified in *fonts in init.el" (interactive) (if (>= my/cycle-font-i (1- (length *fonts))) (setq my/cycle-font-i 0)