From e6accc3c10746bc499a42046fd118afa86585b03 Mon Sep 17 00:00:00 2001 From: Dustin Swan Date: Mon, 21 Sep 2015 15:07:13 -0600 Subject: [PATCH] Getting spacemacs config closer to the factory one --- spacemacs | 319 +++++++++++++++++++++++++++++------------------------- 1 file changed, 171 insertions(+), 148 deletions(-) diff --git a/spacemacs b/spacemacs index 70a319d..1a5bcd3 100644 --- a/spacemacs +++ b/spacemacs @@ -2,163 +2,183 @@ ;; This file is loaded by Spacemacs at startup. ;; It must be stored in your home directory. -;; Configuration Layers -;; -------------------- - - -(setq-default - ;; List of additional paths where to look for configuration layers. - ;; Paths must have a trailing slash (ie. `~/.mycontribs/') - dotspacemacs-configuration-layer-path '() - ;; List of configuration layers to load. If it is the symbol `all' instead - ;; of a list then all discovered layers will be installed. - dotspacemacs-configuration-layers '(version-control - git - github - c-c++ - haskell - html - javascript - purescript - rust - ruby - python - markdown - extra-langs - latex - auto-completion - colors - restclient - evil-snipe - mu4e - eyebrowse - search-engine - erc - (org :variables org-enable-github-support t) - emacs-lisp - slime - (shell :variables shell-default-shell 'eshell shell-default-term-shell "/bin/bash") - emoji - syntax-checking) - - ;; A list of packages and/or extensions that will not be install and loaded. - dotspacemacs-excluded-packages '(org-bullets) - ;; If non-nil spacemacs will delete any orphan packages, i.e. packages that - ;; are declared in a layer which is not a member of - ;; the list `dotspacemacs-configuration-layers' - dotspacemacs-delete-orphan-packages t - - dotspacemacs-search-tools '("ag" "ack" "grep") - - dotspacemacs-additional-packages '() - -) - -;; Settings -;; -------- - -(setq-default - ;; Specify the startup banner. If the value is an integer then the - ;; banner with the corresponding index is used, if the value is `random' - - ;; then the banner is chosen randomly among the available banners, if - ;; the value is nil then no banner is displayed. - dotspacemacs-startup-banner 'random - ;; List of themes, the first of the list is loaded when spacemacs starts. - ;; Press T n to cycle to the next theme in the list (works great - ;; with 2 themes variants, one dark and one light) - dotspacemacs-themes '(monokai zenburn) - ;; If non nil the cursor color matches the state color. - dotspacemacs-colorize-cursor-according-to-state t - ;; Default font. `powerline-scale' allows to quickly tweak the mode-line - ;; size to make separators look not too crappy. - dotspacemacs-default-font '("Source Code Pro" - :size 11 - :weight normal - :width normal - :powerline-scale 1.0) - - ;; The leader key - dotspacemacs-leader-key "SPC" - ;; Major mode leader key is a shortcut key which is the equivalent of - ;; pressing ` m` - dotspacemacs-major-mode-leader-key "," - ;; The command key used for Evil commands (ex-commands) and - ;; Emacs commands (M-x). - ;; By default the command key is `:' so ex-commands are executed like in Vim - ;; with `:' and Emacs commands are executed with ` :'. - dotspacemacs-command-key ":" - ;; Guide-key delay in seconds. The Guide-key is the popup buffer listing - ;; the commands bound to the current keystrokes. - dotspacemacs-guide-key-delay 0.4 - ;; If non nil a progress bar is displayed when spacemacs is loading. This - ;; may increase the boot time on some systems and emacs builds, set it to nil - ;; to boost the loading time. - dotspacemacs-loading-progress-bar t - ;; Enable micro-state for helm buffer when pressing on TAB." - dotspacemacs-helm-micro-state t - ;; If non nil the frame is fullscreen when Emacs starts up (Emacs 24.4+ only). - dotspacemacs-fullscreen-at-startup nil - ;; If non nil `spacemacs/toggle-fullscreen' will not use native fullscreen. - ;; Use to disable fullscreen animations in OSX." - dotspacemacs-fullscreen-use-non-native nil - ;; If non nil the frame is maximized when Emacs starts up (Emacs 24.4+ only). - ;; Takes effect only if `dotspacemacs-fullscreen-at-startup' is nil. - dotspacemacs-maximized-at-startup nil - ;; A value from the range (0..100), in increasing opacity, which describes the - ;; transparency level of a frame when it's active or selected. Transparency can - ;; be toggled through `toggle-transparency'. - dotspacemacs-active-transparency 90 - ;; A value from the range (0..100), in increasing opacity, which describes the - ;; transparency level of a frame when it's inactive or deselected. Transparency - ;; can be toggled through `toggle-transparency'. - dotspacemacs-inactive-transparency 90 - ;; If non nil unicode symbols are displayed in the mode line (e.g. for lighters) - dotspacemacs-mode-line-unicode-symbols t - ;; If non nil smooth scrolling (native-scrolling) is enabled. Smooth scrolling - ;; overrides the default behavior of Emacs which recenters the point when - ;; it reaches the top or bottom of the screen - dotspacemacs-smooth-scrolling t - ;; If non-nil smartparens-strict-mode will be enabled in programming modes. - dotspacemacs-smartparens-strict-mode nil - ;; If non nil advises quit functions to keep server open when quitting. - dotspacemacs-persistent-server nil - ;; The default package repository used if no explicit repository has been - ;; specified with an installed package. - ;; Not used for now. - dotspacemacs-default-package-repository nil - ) - -;; Initialization Hooks -;; -------------------- +(defun dotspacemacs/layers () + "Configuration Layers declaration." + (setq-default + ;; List of additional paths where to look for configuration layers. + ;; Paths must have a trailing slash (i.e. `~/.mycontribs/') + dotspacemacs-configuration-layer-path '() + ;; List of configuration layers to load. If it is the symbol `all' instead + ;; of a list then all discovered layers will be installed. + dotspacemacs-configuration-layers + '(version-control + git + perforce + better-defaults + github + c-c++ + haskell + ocaml + html + javascript + purescript + rust + ruby + python + markdown + extra-langs + latex + auto-completion + colors + restclient + evil-snipe + eyebrowse + search-engine + erc + (org :variables org-enable-github-support t) + emacs-lisp + slime + (shell :variables shell-default-shell 'eshell shell-default-term-shell "/bin/bash") + xkcd + spotify + emoji) + + ;; List of additional packages that will be installed without being + ;; wrapped in a layer. If you need some configuration for these + ;; packages then consider to create a layer, you can also put the + ;; configuration in `dotspacemacs/config'. + dotspacemacs-additional-packages '(idris-mode) + ;; A list of packages and/or extensions that will not be install and loaded. + dotspacemacs-excluded-packages '() + ;; If non-nil spacemacs will delete any orphan packages, i.e. packages that + ;; are declared in a layer which is not a member of + ;; the list `dotspacemacs-configuration-layers' + dotspacemacs-delete-orphan-packages t)) (defun dotspacemacs/init () - "User initialization for Spacemacs. This function is called at the very - startup." - - (setq package-archives '(("gnu" . "http://elpa.gnu.org/packages/") - ("marmalade" . "https://marmalade-repo.org/packages/") - ("melpa" . "http://melpa.org/packages/"))) - + "Initialization function. +This function is called at the very startup of Spacemacs initialization +before layers configuration." + ;; This setq-default sexp is an exhaustive list of all the supported + ;; spacemacs settings. + (setq-default + ;; Either `vim' or `emacs'. Evil is always enabled but if the variable + ;; is `emacs' then the `holy-mode' is enabled at startup. + dotspacemacs-editing-style 'vim + ;; If non nil output loading progress in `*Messages*' buffer. + dotspacemacs-verbose-loading nil + ;; Specify the startup banner. Default value is `official', it displays + ;; the official spacemacs logo. An integer value is the index of text + ;; banner, `random' chooses a random text banner in `core/banners' + ;; directory. A string value must be a path to an image format supported + ;; by your Emacs build. + ;; If the value is nil then no banner is displayed. + dotspacemacs-startup-banner 'official + ;; List of items to show in the startup buffer. If nil it is disabled. + ;; Possible values are: `recents' `bookmarks' `projects'." + dotspacemacs-startup-lists '(recents projects) + ;; List of themes, the first of the list is loaded when spacemacs starts. + ;; Press T n to cycle to the next theme in the list (works great + ;; with 2 themes variants, one dark and one light) + dotspacemacs-themes '(monokai + zenburn) + ;; If non nil the cursor color matches the state color. + dotspacemacs-colorize-cursor-according-to-state t + ;; Default font. `powerline-scale' allows to quickly tweak the mode-line + ;; size to make separators look not too crappy. + dotspacemacs-default-font '("Source Code Pro" + :size 11 + :weight normal + :width normal + :powerline-scale 1.1) + ;; The leader key + dotspacemacs-leader-key "SPC" + ;; The leader key accessible in `emacs state' and `insert state' + dotspacemacs-emacs-leader-key "M-m" + ;; Major mode leader key is a shortcut key which is the equivalent of + ;; pressing ` m`. Set it to `nil` to disable it. + dotspacemacs-major-mode-leader-key "," + ;; Major mode leader key accessible in `emacs state' and `insert state' + dotspacemacs-major-mode-emacs-leader-key "C-M-m" + ;; The command key used for Evil commands (ex-commands) and + ;; Emacs commands (M-x). + ;; By default the command key is `:' so ex-commands are executed like in Vim + ;; with `:' and Emacs commands are executed with ` :'. + dotspacemacs-command-key ":" + ;; Location where to auto-save files. Possible values are `original' to + ;; auto-save the file in-place, `cache' to auto-save the file to another + ;; file stored in the cache directory and `nil' to disable auto-saving. + ;; Default value is `cache'. + dotspacemacs-auto-save-file-location 'cache + ;; If non nil then `ido' replaces `helm' for some commands. For now only + ;; `find-files' (SPC f f) is replaced. + dotspacemacs-use-ido nil + ;; If non nil the paste micro-state is enabled. When enabled pressing `p` + ;; several times cycle between the kill ring content. + dotspacemacs-enable-paste-micro-state nil + ;; Guide-key delay in seconds. The Guide-key is the popup buffer listing + ;; the commands bound to the current keystrokes. + dotspacemacs-guide-key-delay 0.4 + ;; If non nil a progress bar is displayed when spacemacs is loading. This + ;; may increase the boot time on some systems and emacs builds, set it to + ;; nil ;; to boost the loading time. + dotspacemacs-loading-progress-bar t + ;; If non nil the frame is fullscreen when Emacs starts up. + ;; (Emacs 24.4+ only) + dotspacemacs-fullscreen-at-startup nil + ;; If non nil `spacemacs/toggle-fullscreen' will not use native fullscreen. + ;; Use to disable fullscreen animations in OSX." + dotspacemacs-fullscreen-use-non-native nil + ;; If non nil the frame is maximized when Emacs starts up. + ;; Takes effect only if `dotspacemacs-fullscreen-at-startup' is nil. + ;; (Emacs 24.4+ only) + dotspacemacs-maximized-at-startup nil + ;; A value from the range (0..100), in increasing opacity, which describes + ;; the transparency level of a frame when it's active or selected. + ;; Transparency can be toggled through `toggle-transparency'. + dotspacemacs-active-transparency 90 + ;; A value from the range (0..100), in increasing opacity, which describes + ;; the transparency level of a frame when it's inactive or deselected. + ;; Transparency can be toggled through `toggle-transparency'. + dotspacemacs-inactive-transparency 90 + ;; If non nil unicode symbols are displayed in the mode line. + dotspacemacs-mode-line-unicode-symbols t + ;; If non nil smooth scrolling (native-scrolling) is enabled. Smooth + ;; scrolling overrides the default behavior of Emacs which recenters the + ;; point when it reaches the top or bottom of the screen. + dotspacemacs-smooth-scrolling t + ;; If non-nil smartparens-strict-mode will be enabled in programming modes. + dotspacemacs-smartparens-strict-mode nil + ;; Select a scope to highlight delimiters. Possible value is `all', + ;; `current' or `nil'. Default is `all' + dotspacemacs-highlight-delimiters 'all + ;; If non nil advises quit functions to keep server open when quitting. + dotspacemacs-persistent-server nil + ;; List of search tool executable names. Spacemacs uses the first installed + ;; tool of the list. Supported tools are `ag', `pt', `ack' and `grep'. + dotspacemacs-search-tools '("ag" "ack" "grep") + ;; The default package repository used if no explicit repository has been + ;; specified with an installed package. + ;; Not used for now. + dotspacemacs-default-package-repository nil + ) + ;; User initialization goes here (setq-default git-magit-status-fullscreen t) (setq-default git-enable-github-support t) + (add-to-list 'load-path "~/ghc-mod/elisp") ) (defun dotspacemacs/config () - "This is were you can ultimately override default Spacemacs configuration. -This function is called at the very end of Spacemacs initialization." + "Configuration function. + This function is called at the very end of Spacemacs initialization after +layers configuration." (eyebrowse-setup-opinionated-keys) - (add-hook 'doc-view-mode-hook 'auto-revert-mode) - (setq powerline-default-separator 'nil) - ) - -;; Custom variables -;; ---------------- + ;; (add-hook 'doc-view-mode-hook 'auto-revert-mode) + ;; (setq powerline-default-separator 'nil) +) -;; Do not write anything in this section. This is where Emacs will +;; Do not write anything past this comment. This is where Emacs will ;; auto-generate custom variable definitions. - - (custom-set-variables ;; custom-set-variables was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. @@ -170,8 +190,11 @@ This function is called at the very end of Spacemacs initialization." '(ahs-idle-interval 0.25) '(ahs-idle-timer 0 t) '(ahs-inhibit-face-list nil) - '(erc-modules (quote (scrolltobottom))) + '(erc-modules + (quote + (autoaway autojoin button completion log match menu move-to-prompt netsplit notify notifications readonly ring scrolltobottom spelling track image hl-nicks networks services))) '(js2-basic-offset 2) + '(org-agenda-files (quote ("~/Dropbox/Org/org.org"))) '(paradox-github-token t) '(ring-bell-function (quote ignore) t)) (custom-set-faces