Skip to content

Instantly share code, notes, and snippets.

@psifertex
Created April 30, 2015 21:01
Show Gist options
  • Save psifertex/899176ac1030ee4b4878 to your computer and use it in GitHub Desktop.
Save psifertex/899176ac1030ee4b4878 to your computer and use it in GitHub Desktop.
;; -*- mode: dotspacemacs -*-
;; This file is loaded by Spacemacs at startup.
;; It must be stored in your home directory.
;;(add-to-list 'package-archives '("melpa" . "http://melpa.milkbox.net/packages/"))
(defun dotspacemacs/layers ()
"Configuration Layers declaration."
(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 '((auto-completion :variables
auto-completion-enable-company-help-tooltip t)
themes-megapack
smart-tab
org-reveal
(git :variables
git-magit-status-fullscreen t
git-enable-github-support t
git-gutter-use-fringe t)
auctex
vagrant
python
javascript
ruby
php
osx
markdown
org)
;; 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 ()
"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
;; 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 a .PNG file.
;; If the value is nil then no banner is displayed.
;; dotspacemacs-startup-banner 'official
dotspacemacs-startup-banner 'official
;; List of themes, the first of the list is loaded when spacemacs starts.
;; Press <SPC> T n to cycle to the next theme in the list (works great
;; with 2 themes variants, one dark and one light)
dotspacemacs-themes '(darkburn
solarized-light
solarized-dark
leuven
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 14
:weight normal
:width normal
:powerline-scale 1.1)
;; The leader key
dotspacemacs-leader-key "SPC"
;; Major mode leader key is a shortcut key which is the equivalent of
;; pressing `<leader> m`. Set it to `nil` to disable it.
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 `<leader> :'.
dotspacemacs-command-key ":"
;; If non nil the paste micro-state is enabled. While 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
;; 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)
;; User initialization goes here
)
(defun projectile-compile-qt-project (arg &optional dir)
"Compile Qt project"
(interactive "P")
(let* ((project-root (if dir
dir
(projectile-project-root)))
(default-cmd (if (equal system-type 'windows-nt)
"make.bat"
"qmake -r && make"))
(compilation-cmd default-cmd)
(default-directory (if dir
dir
project-root)))
(puthash project-root compilation-cmd projectile-compilation-cmd-map)
(compilation-start compilation-cmd)))
(defun projectile-compile-qt-project-debug (arg &optional dir)
"Compile Qt project for debug"
(interactive "P")
(let* ((project-root (if dir
dir
(projectile-project-root)))
(default-cmd (if (equal system-type 'windows-nt)
"make.bat debug"
"qmake -r && make debug"))
(compilation-cmd default-cmd)
(default-directory (if dir
dir
project-root)))
(puthash project-root compilation-cmd projectile-compilation-cmd-map)
(compilation-start compilation-cmd)))
(defun custom-c-setup ()
(c-set-offset 'inline-open 0)
(smartparens-mode -1))
(defun custom-python-setup ()
( setq tab-width 4)
( smartparens-mode -1))
(defun custom-javascript-setup ()
(setq tab-width 4)
(smartparens-mode -1))
(defun dotspacemacs/config ()
"Configuration function.
This function is called at the very end of Spacemacs initialization after
layers configuration."
;;(smart-tabs-insinuate 'c 'javascript 'python)
(setq-default evil-escape-key-sequence "fj")
(setq mouse-wheel-scroll-amount '(1 ((shift) . 1))) ;; one line at a time
(setq scroll-step 1)
(setq scroll-conservatively 10000)
(setq auto-window-vscroll nil)
(setq org-agenda-files '("~/Dropbox/org"))
(setq org-directory "~/Dropbox/org")
(setq org-mobile-directory "~/Dropbox/Apps/MobileOrg")
(setq org-mobile-inbox-for-pull '("~/Dropbox/org/incoming.org"))
(setq-default c-default-style "linux")
(setq-default tab-width 4)
(fancy-battery-mode)
(defvaralias `c-basic-offset `tab-width)
(defvaralias `cperl-indent-level `tab-width)
(add-hook 'c-mode-hook 'custom-c-setup)
(add-hook 'c++-mode-hook 'custom-c-setup)
(add-hook 'python-mode-hook 'custom-python-setup)
(add-hook 'javascript-mode-hook 'custom-javascript-setup)
(add-to-list 'auto-mode-alist '("\\.h\\'" . c++-mode))
(evil-leader/set-key "cc" 'projectile-compile-project)
(evil-leader/set-key "cd" 'projectile-compile-qt-project-debug)
(evil-leader/set-key "cq" 'projectile-compile-qt-project)
(evil-leader/set-key "ds" 'projectile-run-shell-command-in-root)
(evil-leader/set-key "gs" 'projectile-vc)
(evil-leader/set-key "gd" 'vc-diff)
(evil-leader/set-key "gt" 'evil-next-buffer)
(evil-leader/set-key "gT" 'evil-prev-buffer)
(evil-leader/set-key "]" 'evil-next-buffer)
(evil-leader/set-key "[" 'evil-prev-buffer)
(evil-leader/set-key "bk" 'kill-this-buffer)
(evil-leader/set-key "<up>" 'evil-window-up)
(evil-leader/set-key "<down>" 'evil-window-down)
(evil-leader/set-key "<left>" 'evil-window-left)
(evil-leader/set-key "<right>" 'evil-window-right)
(if (equal system-type 'windows-nt)
(progn
(require 'smooth-scrolling)
(setq scroll-step 1)
(setq scroll-conservatively 1000)
(setq mouse-wheel-scroll-amount '(1 ((shift) . 1)))
(setq mouse-wheel-progressive-speed nil)
(setq mouse-wheel-follow-mouse t)
(setq default-directory "C:/projects")
))
)
;; Do not write anything past this comment. This is where Emacs will
;; auto-generate custom variable definitions.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment