diff options
| -rw-r--r-- | emacs/custom/fcuny-defuns.el | 4 | ||||
| -rw-r--r-- | emacs/init.el | 3 | ||||
| -rw-r--r-- | emacs/lisp/my-work.el | 10 |
3 files changed, 12 insertions, 5 deletions
diff --git a/emacs/custom/fcuny-defuns.el b/emacs/custom/fcuny-defuns.el index 974d8c8..0c358ce 100644 --- a/emacs/custom/fcuny-defuns.el +++ b/emacs/custom/fcuny-defuns.el @@ -11,10 +11,6 @@ (mark-whole-buffer) (copy-region-as-kill 1 (buffer-size)))) -(defun fcuny/check-work-machine-p () - "Returns t if this is a work machine" - (string-match "HQ\\.*" (system-name))) - ;; from https://karl-voit.at/2014/08/10/bookmarks-with-orgmode/ (defun fcuny/string-replace (this withthat in) "replace THIS with WITHTHAT' in the string IN" diff --git a/emacs/init.el b/emacs/init.el index d22d942..f15ed96 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -40,7 +40,6 @@ (require 'fcuny-settings) (require 'fcuny-ui) -(require 'fcuny-defuns) (require 'fcuny-navigation) (require 'fcuny-edit) (require 'fcuny-text) @@ -52,7 +51,9 @@ (require 'fcuny-tramp) (require 'fcuny-notmuch) +(require 'fcuny-defuns) (require 'fcuny-commands) +(require 'my-work) ;; once we're done initializing the configuration, we start a shell ;; session with eshell. diff --git a/emacs/lisp/my-work.el b/emacs/lisp/my-work.el new file mode 100644 index 0000000..a9a4e39 --- /dev/null +++ b/emacs/lisp/my-work.el @@ -0,0 +1,10 @@ +;;; my-work.el --- Functions related to work +;;; Commentary: +;;; Code: + +(defun fcuny/check-work-machine-p () + "Return t if this is a work machine." + (string-match "HQ\\.*" (system-name))) + +(provide 'my-work) +;;; my-work.el ends here |