diff options
Diffstat (limited to '')
| -rw-r--r-- | spacemacs/.emacs.d/private/aminb/layers.el | 14 | ||||
| -rw-r--r-- | spacemacs/.emacs.d/private/aminb/packages.el | 310 | ||||
| -rw-r--r-- | spacemacs/.spacemacs | 424 |
3 files changed, 0 insertions, 748 deletions
diff --git a/spacemacs/.emacs.d/private/aminb/layers.el b/spacemacs/.emacs.d/private/aminb/layers.el deleted file mode 100644 index 04bde71..0000000 --- a/spacemacs/.emacs.d/private/aminb/layers.el +++ /dev/null @@ -1,14 +0,0 @@ -;;; layers.el --- aminb layer layers file for Spacemacs. -;; -;; Copyright (c) 2016 Amin Bandali -;; -;; Author: Amin Bandali <amin@aminb.org> -;; URL: https://github.com/aminb/dotfiles -;; -;; This file is not part of GNU Emacs. -;; -;;; License: GPLv3 - -;; Prerequisites - -(configuration-layer/declare-layers '(erc mu4e)) diff --git a/spacemacs/.emacs.d/private/aminb/packages.el b/spacemacs/.emacs.d/private/aminb/packages.el deleted file mode 100644 index 0ff24e0..0000000 --- a/spacemacs/.emacs.d/private/aminb/packages.el +++ /dev/null @@ -1,310 +0,0 @@ -;;; packages.el --- aminb layer packages file for Spacemacs. -;; -;; Copyright (c) 2016 Amin Bandali -;; -;; Author: Amin Bandali <amin@aminb.org> -;; URL: https://github.com/aminb/dotfiles -;; -;; This file is not part of GNU Emacs. -;; -;;; License: GPLv3 - -;;; Commentary: - -;; This file is a collection of my settings and customizations on top of -;; spacemacs. - -;;; Code: - -(defconst aminb-packages - '(counsel - creamsody-theme - crux - ;; mu4e has to be installed manually, - ;; and make sure it's in load-path - (mu4e :location site) - smtpmail - writeroom-mode - znc) - "The list of Lisp packages required by the aminb layer.") - -(defun aminb/post-init-counsel () - (use-package counsel - :defer t - :config - (progn - (spacemacs/set-leader-keys-for-major-mode 'eshell-mode - "," 'counsel-esh-history) - (add-hook 'eshell-mode-hook - '(lambda () (define-key eshell-mode-map - (kbd "M-l") 'counsel-esh-history))) - ))) - -(defun aminb/init-creamsody-theme ()) - -(defun aminb/init-crux () - (use-package crux - :defer t - :bind (("C-c d" . crux-duplicate-current-line-or-region) - ("C-c M-d" . crux-duplicate-and-comment-current-line-or-region) - ))) - -(defun aminb/init-writeroom-mode () - (use-package writeroom-mode ; Distraction-free editing - :defer t - :config (setq writeroom-width 82) - :bind (("C-c W" . writeroom-mode) - ("s-?" . writeroom-toggle-mode-line)))) - -(defun aminb/init-znc () - (use-package znc - :defer t - :init - (spacemacs/set-leader-keys - "aiz" 'znc-erc) - :config - (progn - ;; Set the erc nick completion postfix to ", " - (setq erc-pcomplete-nick-postfix ", ") - - ;; Restore channel buffers from logs - (setq erc-log-insert-log-on-open t) - - ;;; (BEGIN) work around log restoration bug - ;; taken from https://www.emacswiki.org/emacs/ErcLogging - - ;; ;;; Original version in the Emacs sources: - ;; (defun erc-log-all-but-server-buffers (buffer) - ;; "Returns t if logging should be enabled in BUFFER. - ;; Returns nil if `erc-server-buffer-p' returns t." - ;; (save-excursion - ;; (save-window-excursion - ;; (set-buffer buffer) - ;; (not (erc-server-buffer-p))))) - - ;; My version: - (defun erc-log-all-but-server-buffers (buffer) - (with-current-buffer buffer - (not (erc-server-buffer-p)))) - ;; - ;; ;;; Anyway, a more direct modification also works fine: - ;; (defun erc-log-all-but-server-buffers (buffer) - ;; (set-buffer buffer) - ;; (not (erc-server-buffer-p))) - ;;; (END) - - (require 'notifications) - (defun erc-global-notify (match-type nick message) - "Notify when a message is recieved." - (notifications-notify - :title nick - :body message - ;; :app-icon (concat spacemacs-assets-directory "spacemacs.svg") - :urgency 'normal)) - - (defun vbe:znc-add-server (server port user networks) - "Add a server to the list of ZNC servers. -We use SSL inconditionaly. Moreover, we don't store the password -but put nil instead. At least, we tweak the username to contain -the network name later, this will be separated again." - (add-to-list 'znc-servers - (list server - port - t ; SSL enabled - (mapcar (function (lambda (slug) (list slug - (format "%s/%s" user slug) - nil))) - networks)))) - - (defun vbe:znc-erc-ssl-connector (&rest R) - "Connect to ERC using SSL and retrieve password with `auth-source-search'. -Moreover, handle multiple networks by sending the password with -the appropriate network slug that we extract from the nick." - (let* ((user (nth 0 (split-string (plist-get R :nick) "/"))) - (slug (nth 1 (split-string (plist-get R :nick) "/"))) - (found (nth 0 (auth-source-search :host (plist-get R :server) - :user user - :require '(:user :secret) - :max 1)))) - (if found - (let ((password (let ((secret (plist-get found :secret))) - (if (functionp secret) - (funcall secret) - secret)))) - (plist-put R :password (format "%s/%s:%s" user slug password)) - (plist-put R :nick user) - (apply 'erc-tls R))))) - (setq znc-erc-ssl-connector 'vbe:znc-erc-ssl-connector) - - ;; Define networks - (vbe:znc-add-server "nix.aminb.org" 6669 "amin" - '(freenode mozilla)) - - ;; https://www.emacswiki.org/emacs/ErcBar - ;; Display a bar before unread messages - (eval-after-load 'erc-track - '(progn - (defun erc-bar-move-back (n) - "Moves back n message lines. Ignores wrapping, and server messages." - (interactive "nHow many lines ? ") - (re-search-backward "^.*<.*>" nil t n)) - - (defun erc-bar-update-overlay () - "Update the overlay for current buffer, based on the content of -erc-modified-channels-alist. Should be executed on window change." - (interactive) - (let* ((info (assq (current-buffer) erc-modified-channels-alist)) - (count (cadr info))) - (if (and info (> count erc-bar-threshold)) - (save-excursion - (end-of-buffer) - (when (erc-bar-move-back count) - (let ((inhibit-field-text-motion t)) - (move-overlay erc-bar-overlay - (line-beginning-position) - (line-end-position) - (current-buffer))))) - (delete-overlay erc-bar-overlay)))) - - (defvar erc-bar-threshold 1 - "Display bar when there are more than erc-bar-threshold unread messages.") - (defvar erc-bar-overlay nil - "Overlay used to set bar") - (setq erc-bar-overlay (make-overlay 0 0)) - (overlay-put erc-bar-overlay 'face '(:underline "purple")) - ;;put the hook before erc-modified-channels-update - (defadvice erc-track-mode (after erc-bar-setup-hook - (&rest args) activate) - ;;remove and add, so we know it's in the first place - (remove-hook 'window-configuration-change-hook 'erc-bar-update-overlay) - (add-hook 'window-configuration-change-hook 'erc-bar-update-overlay)) - (add-hook 'erc-send-completed-hook (lambda (str) - (erc-bar-update-overlay))))) - - ))) - -(defun aminb/post-init-mu4e () - (setq maildir "~/mail") - (use-package mu4e - :defer t - :config - (progn - (setq mu4e-maildir maildir - mu4e-get-mail-command "true" - mu4e-update-interval 300 - mu4e-view-show-addresses t - mu4e-headers-include-related t - mu4e-enable-notifications t - mu4e-enable-mode-line t - mu4e-compose-signature-auto-include t - mu4e-compose-signature - (concat - "Amin Bandali\n" - "<aminb.org>\n") - message-kill-buffer-on-exit t ; don't keep message buffers around - mu4e-attachment-dir "~/dls" - mu4e-sent-folder "/amin/Sent" - mu4e-drafts-folder "/amin/Drafts" - mu4e-trash-folder "/amin/Trash" - user-full-name "Amin Bandali" - user-mail-address "amin@aminb.org" - mu4e-view-html-plaintext-ratio-heuristic most-positive-fixnum - mu4e-context-policy 'pick-first - mu4e-contexts - (list (make-mu4e-context - :name "Personal" - :enter-func (lambda () (mu4e-message "Switch to the Personal context")) - :match-func (lambda (msg) - (when msg - (s-prefix? "/amin/" (mu4e-message-field msg :maildir)))) - :vars '((user-mail-address . "amin@aminb.org") - (mu4e-sent-folder . "/amin/Sent") - (mu4e-drafts-folder . "/amin/Drafts") - (mu4e-trash-folder . "/amin/Trash") - (mu4e-sent-messages-behavior . sent) - (smtpmail-default-smtp-server . "nix.aminb.org") - (smtpmail-smtp-server . "nix.aminb.org") - (smtpmail-stream-type . starttls) - (smtpmail-smtp-service . 587))) - (make-mu4e-context - :name "BB" - :enter-func (lambda () (mu4e-message "Switch to the BB context")) - :match-func (lambda (msg) - (when msg - (s-prefix? "/gmail/" (mu4e-message-field msg :maildir)))) - :vars '((user-mail-address . "amin.bandali@gmail.com") - (mu4e-sent-folder . "/gmail/Sent") - (mu4e-drafts-folder . "/gmail/Drafts") - (mu4e-trash-folder . "/gmail/Trash") - (mu4e-sent-messages-behavior . delete) - (mu4e-compose-signature . nil) - (smtpmail-default-smtp-server . "smtp.gmail.com") - (smtpmail-smtp-server . "smtp.gmail.com") - (smtpmail-stream-type . starttls) - (smtpmail-smtp-service . 587))) - (make-mu4e-context - :name "GNU" - :enter-func (lambda () (mu4e-message "Switch to the GNU context")) - :match-func (lambda (msg) - (when msg - (s-prefix? "/gnu/" (mu4e-message-field msg :maildir)))) - :vars '((user-mail-address . "aminb@gnu.org") - (mu4e-sent-folder . "/gnu/Sent") - (mu4e-drafts-folder . "/gnu/Drafts") - (mu4e-trash-folder . "/gnu/Trash") - (mu4e-sent-messages-behavior . sent) - (smtpmail-default-smtp-server . "fencepost.gnu.org") - (smtpmail-smtp-server . "fencepost.gnu.org") - (smtpmail-stream-type . starttls) - (smtpmail-smtp-service . 587))))) - (with-eval-after-load 'mu4e-alert - ;; Enable Desktop notifications - (mu4e-alert-set-default-style 'notifications)))) - - (use-package gnus-dired - ;; A special version of the gnus-dired-mail-buffers function - ;; that understands mu4e buffers as well. - ;; Usage: mark the file(s) in dired and press C-c RET C-a, - ;; then will be asked whether to attach them to an existing - ;; message, or create a new one. - :defer t - :config - (progn - ;; make the `gnus-dired-mail-buffers' function also work on - ;; message-mode derived modes, such as mu4e-compose-mode - (defun gnus-dired-mail-buffers () - "Return a list of active message buffers." - (let (buffers) - (save-current-buffer - (dolist (buffer (buffer-list t)) - (set-buffer buffer) - (when (and (derived-mode-p 'message-mode) - (null message-sent-message-via)) - (push (buffer-name buffer) buffers)))) - (nreverse buffers))) - (setq gnus-dired-mail-mode 'mu4e-user-agent) - (add-hook 'dired-mode-hook 'turn-on-gnus-dired-mode)) - ) - - ;; Exclude the files in maildir from recents - (use-package recentf - :defer t - :config - (add-to-list 'recentf-exclude (expand-file-name maildir))) - - (spacemacs/set-leader-keys - "am" 'mu4e) - ) - -(defun aminb/init-smtpmail () - (use-package smtpmail - :defer t - :config - (setq smtpmail-default-smtp-server "nix.aminb.org" - smtpmail-local-domain "aminb.org" - smtpmail-smtp-server "nix.aminb.org" - smtpmail-stream-type 'starttls - smtpmail-smtp-service 587 - send-mail-function 'smtpmail-send-it))) - -;;; packages.el ends here diff --git a/spacemacs/.spacemacs b/spacemacs/.spacemacs deleted file mode 100644 index d10b4af..0000000 --- a/spacemacs/.spacemacs +++ /dev/null @@ -1,424 +0,0 @@ -;; -*- mode: emacs-lisp -*- -;; This file is loaded by Spacemacs at startup. -;; It must be stored in your home directory. - -(defun dotspacemacs/layers () - "Configuration Layers declaration. -You should not put any user code in this function besides modifying the variable -values." - (setq-default - ;; Base distribution to use. This is a layer contained in the directory - ;; `+distribution'. For now available distributions are `spacemacs-base' - ;; or `spacemacs'. (default 'spacemacs) - dotspacemacs-distribution 'spacemacs - ;; Lazy installation of layers (i.e. layers are installed only when a file - ;; with a supported type is opened). Possible values are `all', `unused' - ;; and `nil'. `unused' will lazy install only unused layers (i.e. layers - ;; not listed in variable `dotspacemacs-configuration-layers'), `all' will - ;; lazy install any layer that support lazy installation even the layers - ;; listed in `dotspacemacs-configuration-layers'. `nil' disable the lazy - ;; installation feature and you have to explicitly list a layer in the - ;; variable `dotspacemacs-configuration-layers' to install it. - ;; (default 'unused) - dotspacemacs-enable-lazy-installation 'unused - ;; If non-nil then Spacemacs will ask for confirmation before installing - ;; a layer lazily. (default t) - dotspacemacs-ask-for-lazy-installation t - ;; If non-nil layers with lazy install support are lazy installed. - ;; 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. - dotspacemacs-configuration-layers - '( - aminb - auto-completion - (better-defaults :variables - better-defaults-move-to-beginning-of-code-first t - better-defaults-move-to-end-of-code-first t) - bibtex - c-c++ - emacs-lisp - git - ;; (haskell :variables - ;; haskell-completion-backend 'intero - ;; haskell-enable-hindent-style "johan-tibell") - html - idris - ivy - ;; javascript - latex - markdown - org - python - ;; racket - rust - (shell :variables - shell-default-height 30 - shell-default-position 'bottom) - shell-scripts - spell-checking - syntax-checking - version-control - yaml - ) - ;; List of additional packages that will be installed without being - ;; wrapped in a layer. If you need some configuration for these - ;; packages, then consider creating a layer. You can also put the - ;; configuration in `dotspacemacs/user-config'. - dotspacemacs-additional-packages - '( - beacon ; Highlight cursor position in buffer - ) - ;; A list of packages that cannot be updated. - dotspacemacs-frozen-packages '() - ;; A list of packages that will not be installed and loaded. - dotspacemacs-excluded-packages '() - ;; Defines the behaviour of Spacemacs when installing packages. - ;; Possible values are `used-only', `used-but-keep-unused' and `all'. - ;; `used-only' installs only explicitly used packages and uninstall any - ;; unused packages as well as their unused dependencies. - ;; `used-but-keep-unused' installs only the used packages but won't uninstall - ;; them if they become unused. `all' installs *all* packages supported by - ;; Spacemacs and never uninstall them. (default is `used-only') - dotspacemacs-install-packages 'used-only)) - -(defun dotspacemacs/init () - "Initialization function. -This function is called at the very startup of Spacemacs initialization -before layers configuration. -You should not put any user code in there besides modifying the variable -values." - ;; This setq-default sexp is an exhaustive list of all the supported - ;; spacemacs settings. - (setq-default - ;; If non-nil ELPA repositories are contacted via HTTPS whenever it's - ;; possible. Set it to nil if you have no way to use HTTPS in your - ;; environment, otherwise it is strongly recommended to let it set to t. - ;; This variable has no effect if Emacs is launched with the parameter - ;; `--insecure' which forces the value of this variable to nil. - ;; (default t) - dotspacemacs-elpa-https t - ;; Maximum allowed time in seconds to contact an ELPA repository. - dotspacemacs-elpa-timeout 5 - ;; If non-nil then spacemacs will check for updates at startup - ;; when the current branch is not `develop'. Note that checking for - ;; new versions works via git commands, thus it calls GitHub services - ;; whenever you start Emacs. (default nil) - dotspacemacs-check-for-update nil - ;; If non-nil, a form that evaluates to a package directory. For example, to - ;; use different package directories for different Emacs versions, set this - ;; to `emacs-version'. - dotspacemacs-elpa-subdirectory nil - ;; One of `vim', `emacs' or `hybrid'. - ;; `hybrid' is like `vim' except that `insert state' is replaced by the - ;; `hybrid state' with `emacs' key bindings. The value can also be a list - ;; with `:variables' keyword (similar to layers). Check the editing styles - ;; section of the documentation for details on available variables. - ;; (default 'vim) - dotspacemacs-editing-style 'emacs - ;; If non-nil output loading progress in `*Messages*' buffer. (default nil) - 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. (default 'official) - dotspacemacs-startup-banner 'official - ;; List of items to show in startup buffer or an association list of - ;; the form `(list-type . list-size)`. If nil then it is disabled. - ;; Possible values for list-type are: - ;; `recents' `bookmarks' `projects' `agenda' `todos'." - ;; List sizes may be nil, in which case - ;; `spacemacs-buffer-startup-lists-length' takes effect. - dotspacemacs-startup-lists '((recents . 5) - (projects . 7)) - ;; True if the home buffer should respond to resize events. - dotspacemacs-startup-buffer-responsive t - ;; Default major mode of the scratch buffer (default `text-mode') - dotspacemacs-scratch-mode 'text-mode - ;; 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 '((tango-plus :location (recipe :fetcher github - :repo "aminb/tango-plus-theme")) - spacemacs-dark - spacemacs-light) - ;; If non-nil the cursor color matches the state color in GUI Emacs. - dotspacemacs-colorize-cursor-according-to-state nil - ;; Default font, or prioritized list of fonts. `powerline-scale' allows to - ;; quickly tweak the mode-line size to make separators look not too crappy. - dotspacemacs-default-font '("Ubuntu Mono" - :size 10.5 - :weight normal - :width normal - :powerline-scale 1.0) - ;; The leader key - dotspacemacs-leader-key "SPC" - ;; The key used for Emacs commands `M-x' (after pressing on the leader key). - ;; (default "SPC") - dotspacemacs-emacs-command-key "SPC" - ;; The key used for Vim Ex commands (default ":") - dotspacemacs-ex-command-key ":" - ;; The leader key accessible in `emacs state' and `insert state' - ;; (default "M-m") - dotspacemacs-emacs-leader-key "M-m" - ;; Major mode leader key is a shortcut key which is the equivalent of - ;; pressing `<leader> m`. Set it to `nil` to disable it. (default ",") - dotspacemacs-major-mode-leader-key "," - ;; Major mode leader key accessible in `emacs state' and `insert state'. - ;; (default "C-M-m") - dotspacemacs-major-mode-emacs-leader-key "M-s-m" - ;; These variables control whether separate commands are bound in the GUI to - ;; the key pairs `C-i', `TAB' and `C-m', `RET'. - ;; Setting it to a non-nil value, allows for separate commands under `C-i' - ;; and TAB or `C-m' and `RET'. - ;; In the terminal, these pairs are generally indistinguishable, so this only - ;; works in the GUI. (default nil) - dotspacemacs-distinguish-gui-tab nil - ;; If non-nil `Y' is remapped to `y$' in Evil states. (default nil) - dotspacemacs-remap-Y-to-y$ nil - ;; If non-nil, the shift mappings `<' and `>' retain visual state if used - ;; there. (default t) - dotspacemacs-retain-visual-state-on-shift t - ;; If non-nil, `J' and `K' move lines up and down when in visual mode. - ;; (default nil) - dotspacemacs-visual-line-move-text nil - ;; If non-nil, inverse the meaning of `g' in `:substitute' Evil ex-command. - ;; (default nil) - dotspacemacs-ex-substitute-global nil - ;; Name of the default layout (default "Default") - dotspacemacs-default-layout-name "Default" - ;; If non-nil the default layout name is displayed in the mode-line. - ;; (default nil) - dotspacemacs-display-default-layout nil - ;; If non-nil then the last auto saved layouts are resumed automatically upon - ;; start. (default nil) - dotspacemacs-auto-resume-layouts nil - ;; Size (in MB) above which spacemacs will prompt to open the large file - ;; literally to avoid performance issues. Opening a file literally means that - ;; no major mode or minor modes are active. (default is 1) - dotspacemacs-large-file-size 1 - ;; 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 'cache) - dotspacemacs-auto-save-file-location 'cache - ;; Maximum number of rollback slots to keep in the cache. (default 5) - dotspacemacs-max-rollback-slots 5 - ;; If non-nil, `helm' will try to minimize the space it uses. (default nil) - dotspacemacs-helm-resize nil - ;; if non-nil, the helm header is hidden when there is only one source. - ;; (default nil) - dotspacemacs-helm-no-header nil - ;; define the position to display `helm', options are `bottom', `top', - ;; `left', or `right'. (default 'bottom) - dotspacemacs-helm-position 'bottom - ;; Controls fuzzy matching in helm. If set to `always', force fuzzy matching - ;; in all non-asynchronous sources. If set to `source', preserve individual - ;; source settings. Else, disable fuzzy matching in all sources. - ;; (default 'always) - dotspacemacs-helm-use-fuzzy 'always - ;; If non-nil the paste micro-state is enabled. When enabled pressing `p' - ;; several times cycle between the kill ring content. (default nil) - dotspacemacs-enable-paste-transient-state nil - ;; Which-key delay in seconds. The which-key buffer is the popup listing - ;; the commands bound to the current keystroke sequence. (default 0.4) - dotspacemacs-which-key-delay 0.4 - ;; Which-key frame position. Possible values are `right', `bottom' and - ;; `right-then-bottom'. right-then-bottom tries to display the frame to the - ;; right; if there is insufficient space it displays it at the bottom. - ;; (default 'bottom) - dotspacemacs-which-key-position 'bottom - ;; Control where `switch-to-buffer' displays the buffer. If nil, - ;; `switch-to-buffer' displays the buffer in the current window even if - ;; another same-purpose window is available. If non-nil, `switch-to-buffer' - ;; displays the buffer in a same-purpose window even if the buffer can be - ;; displayed in the current window. (default nil) - dotspacemacs-switch-to-buffer-prefers-purpose nil - ;; 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. (default t) - dotspacemacs-loading-progress-bar t - ;; If non-nil the frame is fullscreen when Emacs starts up. (default nil) - ;; (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. (default nil) - 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. - ;; (default 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'. (default 90) - 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'. (default 90) - dotspacemacs-inactive-transparency 90 - ;; If non-nil show the titles of transient states. (default t) - dotspacemacs-show-transient-state-title t - ;; If non-nil show the color guide hint for transient state keys. (default t) - dotspacemacs-show-transient-state-color-guide t - ;; If non-nil unicode symbols are displayed in the mode line. (default t) - 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 point - ;; when it reaches the top or bottom of the screen. (default t) - dotspacemacs-smooth-scrolling t - ;; Control line numbers activation. - ;; If set to `t' or `relative' line numbers are turned on in all `prog-mode' and - ;; `text-mode' derivatives. If set to `relative', line numbers are relative. - ;; This variable can also be set to a property list for finer control: - ;; '(:relative nil - ;; :disabled-for-modes dired-mode - ;; doc-view-mode - ;; markdown-mode - ;; org-mode - ;; pdf-view-mode - ;; text-mode - ;; :size-limit-kb 1000) - ;; (default nil) - dotspacemacs-line-numbers nil - ;; Code folding method. Possible values are `evil' and `origami'. - ;; (default 'evil) - dotspacemacs-folding-method 'evil - ;; If non-nil `smartparens-strict-mode' will be enabled in programming modes. - ;; (default nil) - dotspacemacs-smartparens-strict-mode nil - ;; If non-nil pressing the closing parenthesis `)' key in insert mode passes - ;; over any automatically added closing parenthesis, bracket, quote, etc… - ;; This can be temporary disabled by pressing `C-q' before `)'. (default nil) - dotspacemacs-smart-closing-parenthesis nil - ;; Select a scope to highlight delimiters. Possible values are `any', - ;; `current', `all' or `nil'. Default is `all' (highlight any scope and - ;; emphasis the current one). (default 'all) - dotspacemacs-highlight-delimiters 'all - ;; If non-nil, advise quit functions to keep server open when quitting. - ;; (default nil) - dotspacemacs-persistent-server nil - ;; List of search tool executable names. Spacemacs uses the first installed - ;; tool of the list. Supported tools are `rg', `ag', `pt', `ack' and `grep'. - ;; (default '("rg" "ag" "pt" "ack" "grep")) - dotspacemacs-search-tools '("rg" "ag" "pt" "ack" "grep") - ;; The default package repository used if no explicit repository has been - ;; specified with an installed package. - ;; Not used for now. (default nil) - dotspacemacs-default-package-repository nil - ;; Delete whitespace while saving buffer. Possible values are `all' - ;; to aggressively delete empty line and long sequences of whitespace, - ;; `trailing' to delete only the whitespace at end of lines, `changed' to - ;; delete only whitespace for changed lines or `nil' to disable cleanup. - ;; (default nil) - dotspacemacs-whitespace-cleanup nil - ;; Either nil or a number of seconds. If non-nil zone out after the specified - ;; number of seconds. (default nil) - dotspacemacs-zone-out-when-idle nil - )) - -(defun dotspacemacs/user-init () - "Initialization function for user code. -It is called immediately after `dotspacemacs/init', before layer configuration -executes. - This function is mostly useful for variables that need to be set -before packages are loaded. If you are unsure, you should try in setting them in -`dotspacemacs/user-config' first." - ) - -(defun dotspacemacs/user-config () - "Configuration function for user code. -This function is called at the very end of Spacemacs initialization after -layers configuration. -This is the place where most of your configurations should be done. Unless it is -explicitly specified that a variable should be set before a package is loaded, -you should place your code here." - - ;; (setq powerline-default-separator 'slant) - (setq powerline-default-separator 'arrow) - - ;; (setq magit-commit-arguments '("--signoff" - ;; "--gpg-sign=4E05246AB0BF7FFB")) - - ;; Persistent undo across restarts - (setq undo-tree-auto-save-history t - undo-tree-history-directory-alist - `(("." . ,(concat spacemacs-cache-directory "undo")))) - (unless (file-exists-p (concat spacemacs-cache-directory "undo")) - (make-directory (concat spacemacs-cache-directory "undo"))) - - ;; Use pdflatex instead of latex - (setq TeX-PDF-mode t - TeX-engine 'xetex) - - ;; Support zathura in TeX mode - (setq TeX-view-program-selection - '(((output-dvi style-pstricks) - "dvips and gv") - (output-dvi "xdvi") - (output-pdf "Zathura") - (output-html "xdg-open"))) - ;; (setq TeX-view-program-list - ;; '(("zathura" - ;; ("zathura" (mode-io-correlate "-sync.sh") - ;; " " - ;; (mode-io-correlate "%n:1:%t ") - ;; "%o")))) - - ;; Recompile with latexmk -xelatex on save - (add-hook 'after-save-hook - (lambda () - (when (string= major-mode 'latex-mode) - (TeX-run-latexmk "LaTeX" - (format "latexmk -xelatex %s" (buffer-file-name)) - (file-name-base (buffer-file-name)))))) - - ;; Move to beg/end of buffer before signaling an error - (setq scroll-error-top-bottom t) - - (use-package beacon - :ensure nil - :init (beacon-mode 1) - :diminish beacon-mode) - - (use-package delsel ; Replace selected text upon typing - :ensure nil - :defer t - :init (delete-selection-mode)) - - (setq magit-repository-directories '(("~/src/" . 2) - ("~/usr/uni/eecs/3311/" . 0) - ("~/dotfiles/" . 0))) - - ;; Swap : and ; - ;; (define-key evil-motion-state-map ";" 'evil-ex) - ;; (define-key evil-motion-state-map ":" 'evil-repeat-find-char) - - ;; Use emacs mode for eshell - ;; (evil-set-initial-state 'eshell-mode 'emacs) - ) - -;; Do not write anything past this comment. This is where Emacs will -;; auto-generate custom variable definitions. -(defun dotspacemacs/emacs-custom-settings () - "Emacs custom settings. -This is an auto-generated function, do not modify its content directly, use -Emacs customize menu instead. -This function is called at the very end of Spacemacs initialization." -(custom-set-variables - ;; custom-set-variables was added by Custom. - ;; If you edit it by hand, you could mess it up, so be careful. - ;; Your init file should contain only one such instance. - ;; If there is more than one, they won't work right. - '(package-selected-packages - (quote - (idris-mode prop-menu symon string-inflection browse-at-remote yapfify pyvenv pytest pyenv-mode py-isort pip-requirements live-py-mode hy-mode cython-mode company-anaconda anaconda-mode pythonic beacon toml-mode racer git-gutter-fringe+ git-gutter-fringe fringe-helper git-gutter+ git-gutter flycheck-rust seq diff-hl cargo rust-mode visual-fill-column winum unfill powerline spinner key-chord ht alert log4e gntp markdown-mode window-purpose imenu-list hydra parent-mode helm-bibtex parsebib haml-mode fuzzy flyspell-correct pos-tip flycheck flx magit magit-popup git-commit with-editor smartparens iedit anzu evil goto-chg undo-tree highlight f s diminish autothemer pkg-info epl web-completion-data ghc bind-map bind-key biblio biblio-core packed dash auctex async avy auto-complete popup yaml-mode zenburn-theme tao-theme smeargle ivy-hydra info+ htmlize counsel-projectile counsel swiper company-statistics clues-theme ample-theme yasnippet haskell-mode company projectile ivy helm helm-core zonokai-theme znc zen-and-art-theme xterm-color ws-butler writeroom-mode window-numbering which-key wgrep web-mode volatile-highlights vi-tilde-fringe uuidgen use-package underwater-theme ujelly-theme twilight-theme twilight-bright-theme twilight-anti-bright-theme tronesque-theme toxi-theme toc-org tangotango-theme tango-plus-theme tango-2-theme tagedit sunny-day-theme sublime-themes subatomic256-theme subatomic-theme spacemacs-theme spaceline spacegray-theme sourcerer-theme soothe-theme solarized-theme soft-stone-theme soft-morning-theme soft-charcoal-theme smyx-theme smex slim-mode shell-pop seti-theme scss-mode sass-mode reverse-theme restart-emacs request rainbow-delimiters railscasts-theme quelpa purple-haze-theme pug-mode professional-theme popwin planet-theme phoenix-dark-pink-theme phoenix-dark-mono-theme persp-mode pcre2el pastels-on-dark-theme paradox orgit organic-green-theme org-ref org-projectile org-present org-pomodoro org-plus-contrib org-download org-bullets open-junk-file omtose-phellack-theme oldlace-theme occidental-theme obsidian-theme noctilux-theme niflheim-theme neotree naquadah-theme mwim mustang-theme multi-term mu4e-maildirs-extension mu4e-alert move-text monokai-theme monochrome-theme molokai-theme moe-theme mmm-mode minimal-theme material-theme markdown-toc majapahit-theme magit-gitflow macrostep lush-theme lorem-ipsum linum-relative link-hint light-soap-theme less-css-mode jbeans-theme jazz-theme ivy-purpose ir-black-theme intero insert-shebang inkpot-theme indent-guide ido-vertical-mode hungry-delete hlint-refactor hl-todo hindent highlight-parentheses highlight-numbers highlight-indentation hide-comnt heroku-theme hemisu-theme help-fns+ helm-make hc-zenburn-theme haskell-snippets gruvbox-theme gruber-darker-theme grandshell-theme gotham-theme google-translate golden-ratio gnuplot gitignore-mode gitconfig-mode gitattributes-mode git-timemachine git-messenger git-link gh-md gandalf-theme flyspell-correct-ivy flycheck-pos-tip flycheck-haskell flx-ido flatui-theme flatland-theme fish-mode firebelly-theme fill-column-indicator farmhouse-theme fancy-battery eyebrowse expand-region exec-path-from-shell evil-visualstar evil-visual-mark-mode evil-unimpaired evil-tutor evil-surround evil-search-highlight-persist evil-numbers evil-nerd-commenter evil-mc evil-matchit evil-magit evil-lisp-state evil-indent-plus evil-iedit-state evil-exchange evil-escape evil-ediff evil-args evil-anzu eval-sexp-fu espresso-theme eshell-z eshell-prompt-extras esh-help erc-yt erc-view-log erc-social-graph erc-image erc-hl-nicks emmet-mode elisp-slime-nav dumb-jump dracula-theme django-theme disaster define-word darktooth-theme darkokai-theme darkmine-theme darkburn-theme dakrone-theme cyberpunk-theme crux creamsody-theme company-web company-shell company-ghci company-ghc company-cabal company-c-headers company-auctex column-enforce-mode color-theme-sanityinc-tomorrow color-theme-sanityinc-solarized cmm-mode cmake-mode clean-aindent-mode clang-format cherry-blossom-theme busybee-theme bubbleberry-theme birds-of-paradise-plus-theme badwolf-theme auto-yasnippet auto-highlight-symbol auto-dictionary auto-compile auctex-latexmk apropospriate-theme anti-zenburn-theme ample-zen-theme alect-themes aggressive-indent afternoon-theme adaptive-wrap ace-window ace-link ac-ispell)))) -(custom-set-faces - ;; custom-set-faces was added by Custom. - ;; If you edit it by hand, you could mess it up, so be careful. - ;; Your init file should contain only one such instance. - ;; If there is more than one, they won't work right. - ) -) |