Skip to content

Instantly share code, notes, and snippets.

/my

Created June 9, 2014 00:46
Show Gist options
  • Save anonymous/1caea65879848fc650e8 to your computer and use it in GitHub Desktop.
Save anonymous/1caea65879848fc650e8 to your computer and use it in GitHub Desktop.
(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.
'(ansi-color-names-vector
["#2e3436" "#a40000" "#4e9a06" "#c4a000" "#204a87" "#5c3566" "#729fcf" "#eeeeec"])
'(column-number-mode t)
'(custom-enabled-themes (quote (tango-dark)))
'(fill-column 79)
'(initial-frame-alist (quote ((fullscreen . maximized))))
'(show-paren-mode t)
'(text-mode-hook (quote (turn-on-auto-fill text-mode-hook-identify)))
'(tool-bar-mode nil))
(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 (:family "Inconsolata" :foundry "unknown" :slant normal :weight normal :height 98 :width normal))))
'(cperl-array-face ((((class color) (background light)) (:background "lightyellow2" :foreground "Green" :weight normal))) t)
'(cperl-hash-face ((((class color) (background light)) (:background "lightyellow2" :foreground "Red" :slant italic :weight semi-bold))) t))
(if (fboundp 'global-font-lock-mode)
(global-font-lock-mode 1)
(setq font-lock-auto-fontify t))
(setq cperl-invalid-face nil)
(setq cperl-electric-keywords t) ;; expands for keywords such as
;; foreach, while, etc...
(setq cperl-hairy t) ;; Turns on most of the CPerlMode options
;;(set-default-font "-*-clean-medium-r-normal--17-*-*-*-*-*-*-*")
(setq load-path (cons "~/emacs" load-path))
(autoload 'scheme-mode "iuscheme" "Major mode for Scheme." t)
(autoload 'run-scheme "iuscheme" "Switch to interactive Scheme buffer." t)
(setq auto-mode-alist (cons '("\\.ss" . scheme-mode) auto-mode-alist))
(put 'form-id 'scheme-indent-function 1)
(autoload 'balanced-toggle "balanced" "Toggle balanced ``mode''" t)
(autoload 'balanced-on "balanced" "Turn on balanced ``mode''" t)
(add-hook 'scheme-mode-hook 'balanced-on)
(custom-set-variables
'(initial-frame-alist (quote ((fullscreen . maximized)))))
;(setq initial-frame-alist
; '(
; (top . 0) (left . 0)
; (width . 200) (height . 64)
; (background-color . "Gray92")
; (foreground-color . "Black")
; (background-color . "white smoke")
; (foreground-color . "tan4")
; (cursor-color . "red3")
; ))
;; The Line below just allows sml mode to load
(load "/media/Yojimbo/installationFiles/sml-mode-5.0/sml-mode-startup")
;; The line below allows for making tab width as 4
(setq default-tab-width 4 )
;; The line below enables line numbers always
(global-linum-mode t)
;; tool bar mode to false
(tool-bar-mode -1)
;; I am adding ruby modes from this site --http://peter.peca.dk/art_Emacs_Ruby_Mode.html
(add-hook 'ruby-mode-hook (lambda () (local-set-key "\r" 'newline-and-indent)))
(add-hook 'ruby-mode-hook (lambda () (ruby-electric-mode t)))
;; I am adding the global electric hook mode for all brackets
(add-hook 'prog-mode-hook 'electric-pair-mode)
;; Adding the thing told to me or irc for making C-j = C-j + return to get autoindent on newline.
(add-hook 'prog-mode-hook (lambda () (local-set-key (kbd "RET") 'newline-and-indent)))
;; To load last desktop session hf
(set-face-attribute 'default (selected-frame) :height 120)
;; Using the site http://marmalade-repo.org/ and adding the repo. This helps in adding extra packages to emacs
(require 'package)
(add-to-list 'package-archives
'("marmalade" .
"http://marmalade-repo.org/packages/"))
(package-initialize)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment