From 0571b240759700a2036605691e1ac31dc59820aa Mon Sep 17 00:00:00 2001
From: Amin Bandali <bandali@gnu.org>
Date: Sat, 22 Dec 2018 14:09:56 -0500
Subject: [emacs] remove unnecessary overrides & silence some compile warnings
---
init.org | 9 ++++-----
1 file changed, 4 insertions(+), 5 deletions(-)
diff --git a/init.org b/init.org
index 5006e56..7f66c99 100644
--- a/init.org
+++ b/init.org
@@ -667,9 +667,7 @@ Based on https://stackoverflow.com/a/17788551, with changes to use
(around inhibit-display
(command &optional mode name-function highlight-regexp))
(if (not (string-match "^\\(find\\|grep\\)" command))
- (cl-letf (((symbol-function 'display-buffer) #'ignore)
- ((symbol-function 'set-window-point) #'ignore)
- ((symbol-function 'goto-char) #'ignore))
+ (cl-letf (((symbol-function 'display-buffer) #'ignore))
(save-window-excursion ad-do-it))
ad-do-it))
(ad-activate 'compilation-start))
@@ -825,7 +823,8 @@ file.
(let* ((file-tangle-start-time (current-time))
(file (buffer-file-name))
(file-nodir (file-name-nondirectory file))
- (async-quiet-switch "-q"))
+ ;; (async-quiet-switch "-q")
+ )
(async-start
`(lambda ()
(require 'org)
@@ -955,7 +954,7 @@ There's no way I could top that, so I won't attempt to.
(defun amin|eshell-setup ()
(make-local-variable 'company-idle-delay)
- (setq company-idle-delay nil)
+ (defvar company-idle-delay nil)
(bind-keys :map eshell-mode-map
("C-d" . amin/eshell-quit-or-delete-char)
("C-S-l" . amin/eshell-clear)
--
cgit v1.2.3-60-g2f50