Skip to content

Instantly share code, notes, and snippets.

@andibachmann
Created May 29, 2018 07:23
Show Gist options
  • Save andibachmann/62066fa730c80e4c38888efea830d55e to your computer and use it in GitHub Desktop.
Save andibachmann/62066fa730c80e4c38888efea830d55e to your computer and use it in GitHub Desktop.
failing minizinc-mode (.emacs)
;;; .emacs --- Summary
;;; Commentary:
;;; Code:
;; Emacs (>24) Package Repositories
;; Package Repos
;;(setq package-archives '(("gnu" . "http://elpa.gnu.org/packages/")
;; ("marmalade" . "http://marmalade-repo.org/packages/")
;; ("melpa" . "https://melpa.org/packages/")))
(setq package-archives '(("gnu" . "http://elpa.gnu.org/packages/")
("melpa" . "https://melpa.org/packages/")))
;;
(package-initialize)
;;
(add-hook 'after-init-hook #'global-flycheck-mode)
;; just for convenience
(add-to-list 'auto-mode-alist '("emacs" . emacs-lisp-mode))
;; coffee-mode
;;
;; Details found here: http://ozmm.org/posts/coffee_mode.html
;; (add-to-list 'load-path "~/.elisp/coffee-mode")
;; (require 'coffee-mode)
(add-to-list 'auto-mode-alist '("\\.coffee$" . coffee-mode))
(add-to-list 'auto-mode-alist '("Cakefile" . coffee-mode))
;;
;; fvwm-mode
;; downloaded from https://github.com/theBlackDragon/fvwm-mode/blob/master/fvwm-mode.el
;;
(add-to-list 'load-path "~/.emacs.d/fvwm-mode/")
(require 'fvwm-mode)
(add-to-list 'auto-mode-alist '("\\.fvwm2rc" . fvwm-mode))
(add-to-list 'auto-mode-alist '("ConfigFvwm\\." . fvwm-mode))
;;; file associations for python
(setq auto-mode-alist
(cons '("\\.py$" . python-mode) auto-mode-alist))
(setq interpreter-mode-alist
(cons '("python" . python-mode)
interpreter-mode-alist))
;; magit mode
;; GIT mode for emacs
;;(require 'magit)
(autoload 'magit-status "magit" nil t)
;; (setq magit-last-seen-setup-instructions "1.4.0")
;; SASS mode
(autoload 'sass-mode "sass-mode" "Major mode for editing sass files")
(add-to-list 'auto-mode-alist '("\\.sass" . sass-mode))
;;; autoload python mode
(autoload 'python-mode "python-mode" "Python editing mode." t)
(add-to-list 'auto-mode-alist '("\\.py$" . python-mode))
;;; autolad for yaml-mode
(autoload 'yaml-mode "yaml-mode" "Major mode for editing yaml files")
(add-to-list 'auto-mode-alist '("\\.yaml$" . yaml-mode))
(add-to-list 'auto-mode-alist '("\\.yml$" . yaml-mode))
;;; autoload for markdown-mode
;;(autoload 'markdown-mode "markdown-mode"
;; "Major mode for editing Markdown Files" t)
(autoload 'gfm-mode "markdown-mode"
"Major mode for editing Markdown Files" t)
(add-to-list 'auto-mode-alist '("\\.markdown\\'" . gfm-mode))
(add-to-list 'auto-mode-alist '("\\.md\\'" . gfm-mode))
;;; autoload for rdoc-mode
(autoload 'rdoc-mode "rdoc-mode"
"Major mode for editing RDOC files" t)
(setq auto-mode-alist
(cons '("\\.rdoc" . rdoc-mode) auto-mode-alist))
;;; autoload for json-mode
(autoload 'json-mode "json-mode"
"Major mode for editing JSON files" t)
(setq auto-mode-alist
(cons '("\\.json" . json-mode) auto-mode-alist))
;;; php-mode
(autoload 'php-mode "php-mode" "Major mode for editing php code." t)
(add-to-list 'auto-mode-alist '("\\.php$" . php-mode))
(add-to-list 'auto-mode-alist '("\\.inc$" . php-mode))
;;;;;
;;; graphviz dot mode
(autoload 'graphviz-dot-mode "graphviz-dot-mode" "Major mode for editing dot files")
(add-to-list 'auto-mode-alist '("\\.dot$" . graphviz-dot-mode))
;;;;;;;
;; Setup puppet-mode for autoloading
;;
(autoload 'puppet-mode "puppet-mode" "Major mode for editing puppet manifests")
(add-to-list 'auto-mode-alist '("\\.pp$" . puppet-mode))
;;;;;;;;;;;;;;;;;;;
; ruby mode
(autoload 'ruby-mode "ruby-mode" "Load ruby-mode" t)
(setq auto-mode-alist
(append (list '("\\.rb$" . ruby-mode)
'("Rakefile" . ruby-mode)
'("Gemfile" . ruby-mode)
'("Guardfile" . ruby-mode)
'("\\.rake$" . ruby-mode)
'("\\.gemspec" . ruby-mode))
auto-mode-alist))
;;; enables outlining for ruby
;;; You may also want to bind hide-body, hide-subtree, show-substree,
;;; show-all, show-children, ... to some keys easy folding and unfolding
(add-hook 'ruby-mode-hook
'(lambda ()
(outline-minor-mode)
(setq outline-regexp " *\\(def \\|class\\|module\\)")))
;;; list of outline functions:
;;; hide-sublevels, show-all, outline-previous-visible-heading,
;;; outline-next-visible-heading, hide-subtree, show-onelevel,
;;; outline-backward-same-level, outline-forward-same-level, hide-subtree
;;; show-subtree
;;;
;;; outline-mode configurations
;;(set-display-table-slot
;; standard-display-table
;; 'selective-display
;; (let ((face-offset (* (face-id font-lock-keyword-face) (expt 2 19))))
;; (vconcat (mapcar (lambda (c) (+ face-offset c)) "More..."))))
;;;
(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.
'(c-basic-offset 2)
'(case-fold-search nil)
'(coffee-tab-width 2)
'(column-number-mode t)
'(css-indent-offset 2)
'(current-language-environment "UTF-8")
'(default-input-method "latin-1-postfix")
'(fringe-mode (quote (nil . 0)) nil (fringe))
'(global-auto-revert-mode t)
'(graphviz-dot-indent-width 2)
'(graphviz-dot-view-command "dotty %s")
'(icicle-command-abbrev-alist nil)
'(icicle-reminder-prompt-flag 6)
'(indent-tabs-mode nil)
'(indicate-buffer-boundaries (quote left))
'(indicate-empty-lines t)
'(inhibit-startup-screen t)
'(js-indent-level 2)
'(magit-status-buffer-switch-function (quote switch-to-buffer))
'(markdown-command
"pandoc -c file:///home/bachmann/.emacs.d/pandoc-styles/github-pandoc.css --from markdown_github+grid_tables -t html5 --mathjax --highlight-style pygments --standalone")
'(neo-autorefresh t)
'(neo-show-hidden-files t)
'(neo-window-width 30)
'(ruby-deep-arglist nil)
'(ruby-deep-indent-paren nil)
'(safe-local-variable-values (quote ((encoding . utf-8))))
'(scroll-bar-mode (quote right))
'(sh-basic-offset 2)
'(sh-indentation 2)
'(show-paren-mode t)
'(speedbar-directory-button-trim-method (quote trim))
'(speedbar-use-images nil)
'(sql-product (quote postgres))
'(standard-indent 2)
'(tab-width 2)
'(tcl-indent-level 2)
'(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify)))
'(tool-bar-mode nil)
'(transient-mark-mode (quote (only . t)))
'(typescript-flat-functions nil)
'(typescript-indent-level 2)
'(uniquify-buffer-name-style (quote forward) nil (uniquify)))
(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.
'(default ((t (:inherit nil :stipple nil :background "black" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 90 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))
'(cursor ((t (:background "dim gray"))))
'(font-lock-builtin-face ((t (:foreground "#F8F8F8"))))
'(font-lock-comment-face ((t (:italic t :foreground "#AEAEAE"))))
'(font-lock-constant-face ((t (:foreground "#D8FA3C"))))
'(font-lock-doc-string-face ((t (:foreground "DarkOrange"))))
'(font-lock-function-name-face ((t (:foreground "#00FFFF"))))
'(font-lock-keyword-face ((t (:foreground "#22DE22"))))
'(font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
'(font-lock-reference-face ((t (:foreground "SlateBlue"))))
'(font-lock-regexp-grouping-backslash ((t (:foreground "#E9C062"))))
'(font-lock-regexp-grouping-construct ((t (:foreground "red"))))
'(font-lock-string-face ((t (:foreground "#EEaa33"))))
'(font-lock-type-face ((t (:foreground "#00bbee" :weight bold))))
'(font-lock-variable-name-face ((t (:foreground "#FF6400"))))
'(font-lock-warning-face ((t (:bold t :foreground "Pink"))))
'(fringe ((t (:background "gray")))))
;; font-lock-builtin-face
;; font-lock-comment-face
;; font-lock-comment-delimiter-face
;; font-lock-constant-face
;; font-lock-doc-face
;; font-lock-doc-string-face
;; font-lock-function-name-face
;; font-lock-keyword-face
;; font-lock-negation-char-face
;; font-lock-preprocessor-face
;; font-lock-string-face
;; font-lock-type-face
;; font-lock-variable-name-face
;; font-lock-warning-face
;; adjust BACKSPACE and DELETE behaviour
(normal-erase-is-backspace-mode 1)
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; key settings
;;
;; Find out everything about setting and defining keys
;; http://www.nongnu.org/emacs-tiny-tools/keybindings/index-body.html
; set magit-status key
(global-set-key "\C-ci" 'magit-status)
; set C-c]
;(global-set-key "\C-c]" 'comment-region) ;; 2014-05-16 syntax-changes!
(global-set-key "]" (quote comment-region))
; set C-c[
(global-set-key "[" (quote uncomment-region))
;; set f8
(global-set-key [f8] 'neotree-toggle)
;; set f10
(global-set-key [f10] 'goto-line)
;; set f11
(global-set-key [f11] 'what-line)
;; set f12
(global-set-key [f12] 'compile)
;;
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; fixing Alt/Meta problem!
;; http://www.emacswiki.org/emacs/MetaKeyProblems
(setq x-super-keysym 'meta)
;; default modes
;Make Text mode the default mode for new buffers.
(setq default-major-mode 'text-mode)
; no nasty ~-files
(setq make-backup-files nil)
; set font-lock-mode on in C mode
;(setq c-mode-hook 'font-lock-mode)
; set font-lock-mode on in TCL mode
(setq tcl-mode-hook 'font-lock-mode)
;; region replacing by typing
(delete-selection-mode t)
;; nasty ruby encoding hints
(setq ruby-insert-encoding-magic-comment nil)
;; minizinc mode
;;(require 'minizinc-mode)
;;(autoload 'minizinc-mode "minizinc-mode" "Major mode for editing minizinc files")
(add-to-list 'auto-mode-alist '("\\.mzn\\'" . minizinc-mode))
(add-to-list 'auto-mode-alist '("\\.dzn\\'" . minizinc-mode))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment