Browse Source

Cleaning stuff up a bit

Simon Watson 2 years ago
parent
commit
08c8215e46
1 changed files with 14 additions and 7 deletions
  1. 14 7
      emacs/.emacs-all

+ 14 - 7
emacs/.emacs-all

@@ -75,6 +75,11 @@
             (set (make-local-variable 'buffer-face-mode-face) 'fixed-pitch)
             (buffer-face-mode t)))
 
+(global-set-key (kbd "C-<escape>") 'vterm-send-escape)
+(global-set-key (kbd "C-c C-s") 'vterm-send-C-r)
+(global-set-key (kbd "C-c C-u") 'vterm-send-C-u)
+(global-set-key (kbd "C-c C-d") 'vterm-send-C-d)
+
 ;;; Syntax highlights for uxn-tal
 (straight-use-package
  '(tal-mode :type git :host github
@@ -215,10 +220,6 @@
 (global-set-key (kbd "<home>") 'beginning-of-line)
 (global-set-key (kbd "<end>") 'end-of-line)
 
-;; Custom functions
-(defun reload-dot-emacs ()
-  (interactive)
-  (load-file (file-truename "~/.emacs")))
 
 (defun sol-dk ()
   (interactive)
@@ -244,13 +245,20 @@
 (global-set-key (kbd "C-c S") 'sublimity-mode)
 (global-set-key (kbd "C-c s") 'flyspell-correct-word-before-point)
 (global-set-key (kbd "C-c F") 'focus-mode)
-(global-set-key (kbd "C-c r") 'reload-dot-emacs)
+(global-set-key (kbd "C-c r") '(lambda ()
+				 (interactive)
+				 (load-file (file-truename "~/.emacs"))))
+(global-set-key (kbd "C-c C-e") '(lambda ()
+				   (interactive)
+				   (find-file (file-truename "~/.emacs"))
+				   (with-current-buffer (buffer-name)
+				       (emacs-lisp-mode))))
 (global-set-key (kbd "C-c l") 'display-line-numbers-mode)
 (global-set-key (kbd "C-c w") 'window-swap-states)
 (global-set-key (kbd "C-c C-w") 'windresize)
 (global-set-key (kbd "C-c W") 'whitespace-mode)
 (global-set-key (kbd "C-c t") 'sol-dk)
-(global-set-key (kbd "C-c y") 'sol-l) ; Quick toggle evil-mode for slime err
+(global-set-key (kbd "C-c y") 'sol-l) 
 (global-set-key (kbd "C-c g") 'magit)
 (global-set-key (kbd "C-c C-.") '(lambda ()
 				   (interactive)
@@ -333,7 +341,6 @@
       ;; Graphic Display
       (if (display-graphic-p)
 	  (progn
-	    (symon-mode 1)
 	    (load-theme 'solarized-dark t)))))
 
 ;; Load for GUI Linux