(custom-set-variables '(column-number-mode 1) '(indent-tabs-mode nil) '(inhibit-splash-screen t) '(load-home-init-file t t) '(standard-indent 2) '(explicit-shell-file-name "/bin/bash")) (setq c-default-style "bsd") (setq c-basic-offset 2) (if (fboundp 'iswitchb-mode) (iswitchb-mode 1)) (if (fboundp 'cua-mode) (cua-mode 1)) (add-to-list 'load-path "~/.emacs.d") (autoload 'csharp-mode "csharp-mode" "Major mode for editing C# code." t) (autoload 'verilog-mode "verilog-mode" "Major mode for editing Verilog." t) (setq auto-mode-alist (append '(("\\.h$" . c++-mode)) '(("\\.cs$" . csharp-mode)) '(("\\.v$" . verilog-mode)) auto-mode-alist)) (setq verilog-indent-level 2 verilog-indent-level-module 2 verilog-indent-level-declaration 2 verilog-indent-level-behavioral 2 verilog-indent-level-directive 1 verilog-case-indent 2 verilog-auto-newline nil verilog-auto-indent-on-newline t verilog-tab-always-indent t verilog-auto-endcomments nil verilog-minimum-comment-distance 40 verilog-indent-begin-after-if t verilog-auto-lineup nil verilog-highlight-p1800-keywords nil) (global-set-key [ (meta o) ] 'find-file-other-frame) ; http://everything2.com/index.pl?node_id=1038451 (defun create-scratch-buffer nil (interactive) (let ((n 0) (bufname "")) (while (progn (setq bufname (concat "*scratch" (if (= n 0) "" (int-to-string n)) "*")) (setq n (1+ n)) (get-buffer bufname))) (switch-to-buffer (get-buffer-create bufname)) (if (= n 1) (lisp-interaction-mode)))) ; Org-Mode (http://orgmode.org/manual/Activation.html#Activation) (add-to-list 'auto-mode-alist '("\\.org\\'" . org-mode)) (global-set-key "\C-cl" 'org-store-link) (global-set-key "\C-ca" 'org-agenda) (global-set-key "\C-cb" 'org-iswitchb) (global-set-key [f1] 'iswitchb-buffer) (global-set-key [f2] 'other-window) (global-set-key [f3] 'delete-other-windows) (global-set-key [f4] 'kill-this-buffer)