Emacs: remove customisation of byte-compile-dest-file for init.el

Instead, rely on installer creating a symlink to ~/projects/dotfiles/init.elc

1 files changed, 0 insertions, 11 deletions

diff --git a/emacs/elisp/ap-functions.el b/emacs/elisp/ap-functions.el
index 4c30001..19f6332 100644
--- a/emacs/elisp/ap-functions.el
+++ b/emacs/elisp/ap-functions.el
@@ -26,17 +26,6 @@
            (insert (current-kill 0)))))

 

 ;;;###autoload

-(defun ap/byte-compile-get-dest (filename)

-  (let ((basename (file-name-nondirectory filename))

-        (dirname  (file-name-directory    filename)))

-    (cond

-     ((string-equal basename "init.el")

-      (if (file-exists-p (concat user-emacs-directory "init.el"))

-          (concat user-emacs-directory "init.elc")))

-     (t (let (byte-compile-dest-file-function)

-          (byte-compile-dest-file filename))))))

-

-;;;###autoload

 (defun shell-execute (to-current-buffer)

   (interactive "P")

   (let ((file-buffer (if (buffer-file-name)