init-packages: eval-and-compile
This commit is contained in:
parent
69a19ef574
commit
156106fcb0
1 changed files with 18 additions and 17 deletions
|
@ -5,25 +5,26 @@
|
||||||
package--init-file-ensured t
|
package--init-file-ensured t
|
||||||
package-enable-at-startup nil)
|
package-enable-at-startup nil)
|
||||||
|
|
||||||
(defconst narf-emacs-dir user-emacs-directory)
|
(eval-and-compile
|
||||||
(defconst narf-core-dir (concat narf-emacs-dir "core/"))
|
(defconst narf-emacs-dir user-emacs-directory)
|
||||||
(defconst narf-modules-dir (concat narf-emacs-dir "modules/"))
|
(defconst narf-core-dir (concat narf-emacs-dir "core/"))
|
||||||
(defconst narf-contrib-dir (concat narf-emacs-dir "contrib/"))
|
(defconst narf-modules-dir (concat narf-emacs-dir "modules/"))
|
||||||
(defconst narf-private-dir (concat narf-emacs-dir "private/"))
|
(defconst narf-contrib-dir (concat narf-emacs-dir "contrib/"))
|
||||||
(defconst narf-packages-dir (concat narf-emacs-dir ".cask/" emacs-version "/elpa/"))
|
(defconst narf-private-dir (concat narf-emacs-dir "private/"))
|
||||||
|
(defconst narf-packages-dir (concat narf-emacs-dir ".cask/" emacs-version "/elpa/"))
|
||||||
|
|
||||||
(defconst narf-script-dir (concat narf-emacs-dir "scripts/"))
|
(defconst narf-script-dir (concat narf-emacs-dir "scripts/"))
|
||||||
(defconst narf-dropbox-dir "~/Dropbox/")
|
(defconst narf-dropbox-dir "~/Dropbox/")
|
||||||
(defconst narf-snippet-dirs (list (concat narf-private-dir "snippets/")
|
(defconst narf-snippet-dirs (list (concat narf-private-dir "snippets/")
|
||||||
(concat narf-private-dir "templates/")))
|
(concat narf-private-dir "templates/")))
|
||||||
(defconst narf-temp-dir
|
(defconst narf-temp-dir
|
||||||
(format "%scache/%s/%s.%s/"
|
(format "%scache/%s/%s.%s/"
|
||||||
narf-private-dir (system-name)
|
narf-private-dir (system-name)
|
||||||
emacs-major-version emacs-minor-version))
|
emacs-major-version emacs-minor-version))
|
||||||
|
|
||||||
(defconst IS-MAC (eq system-type 'darwin))
|
(defconst IS-MAC (eq system-type 'darwin))
|
||||||
(defconst IS-LINUX (eq system-type 'gnu/linux))
|
(defconst IS-LINUX (eq system-type 'gnu/linux))
|
||||||
(defconst IS-WINDOWS (eq system-type 'windows-nt))
|
(defconst IS-WINDOWS (eq system-type 'windows-nt)))
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue