emacs/erlware-mode @@ -43,9 +43,13 @@ (global-set-key (kbd "M-w") 'toggle-colors-white) (global-set-key (kbd "M-b") 'toggle-colors-black) (global-set-key (kbd "C-x 4 t") 'transpose-buffers) -(define-key osx-key-mode-map [home] 'beginning-of-line) -(define-key osx-key-mode-map [end] 'end-of-line) -(define-key osx-key-mode-map [f3] 'nuke-all-buffers) -(define-key osx-key-mode-map [f5] 'rgrep) +(global-set-key (kbd "M-e") 'anything) +(global-set-key (kbd "M-s") 'save-buffer) +(global-set-key [home] 'beginning-of-line) +(global-set-key [end] 'end-of-line) +(global-set-key [f3] 'nuke-all-buffers) +(global-set-key [f5] 'rgrep) +(setq ring-bell-function 'ignore) +(tool-bar-mode 0) (toggle-colors-black) \ No newline at end of file emacs/custom_keys/custom_keys_config.el @@ -1,11 +1,11 @@ (provide 'erlang_mode_config) -(add-to-list 'load-path "/opt/lib/erlang/lib/tools-2.6.2/emacs") +(add-to-list 'load-path "../erlware-mode") (require 'erlang-start) (add-hook 'erlang-mode-hook (lambda() (setq indent-tabs-mode nil) (setq erlang-indent-level 2) - (setq erlang-tab-always-indent nil) + (setq erlang-tab-always-indent t) (add-to-list 'exec-path "/opt/bin") - (setq erlang-root-dir "/opt"))) \ No newline at end of file + (setq erlang-root-dir "/opt"))) emacs/erlang/erlang_mode_config.el @@ -1 +1,11 @@ -(provide 'erlang_mode_config) \ No newline at end of file +(provide 'erlang_mode_config) + +(add-to-list 'load-path "/opt/lib/erlang/lib/tools-2.6.2/emacs") +(require 'erlang-start) +(add-hook 'erlang-mode-hook + (lambda() + (setq indent-tabs-mode nil) + (setq erlang-indent-level 2) + (setq erlang-tab-always-indent #t) + (add-to-list 'exec-path "/opt/bin") + (setq erlang-root-dir "/opt"))) \ No newline at end of file emacs/erlang/erlang_mode_config.el~ @@ -116,6 +116,13 @@ Zero-length substrings at the beginning and end of the list are omitted." 'line-end-position (lambda (&optional arg) (save-excursion (end-of-line arg) (point))))) +(defun locate-dominating-file (file regexp) + "Look up the directory hierarchy from FILE for a file matching REGEXP." + ;; If FILE does not exist, find its parent directory that does. + (or (file-exists-p file) + (while (and file (not (file-directory-p file))) + (setq file (file-name-directory (directory-file-name file)))))) + (defun flymake-posn-at-point-as-event (&optional position window dx dy) "Return pixel position of top left corner of glyph at POSITION, relative to top left corner of WINDOW, as a mouse-1 click emacs/flymake/flymake.el @@ -1,21 +1,24 @@ (provide 'my_config) ;; Tweaking editing environment +;; This assumes hypotheticalabs/emacs is symlinked to ~/emacs (setq-default show-trailing-whitespace t) -;;(add-to-list 'default-frame-alist '(alpha . (100 70))) (add-to-list 'default-frame-alist '(alpha . (100 100))) (add-to-list 'load-path "~/emacs/erlang") ;; Configuration for Erlang mode (add-to-list 'load-path "~/emacs/flymake") ;; Flymake syntax checker (add-to-list 'load-path "~/emacs/git") ;; Git mode +(add-to-list 'load-path "~/emacs/anything") ;; Quicksilver-like switcher ;;(add-to-list 'load-path "~/emacs/distel") ;; Distel package (add-to-list 'load-path "~/emacs/whitespace") ;; Whitespace package (add-to-list 'load-path "~/emacs/autosave") ;; Autosave config (add-to-list 'load-path "~/emacs/custom_keys") ;; Custom keys config + (require 'erlang_mode_config) ;; Loading Erlang mode (require 'flymake_config) ;; Loading flymake +(require 'anything-config) ;;(require 'distel_config) ;; Loading distel (require 'whitespace_config) ;; Loading whitespace (require 'git) ;; Loading Git mode (require 'autosave_config) ;; Configures autosaving -(require 'custom_keys_config) ;; custom key bindings \ No newline at end of file +(require 'custom_keys_config) ;; custom key bindings emacs/my_config.el emacs/autosave/autosave_config.elc emacs/flymake/flymake.elc emacs/flymake/flymake_config.elc emacs/whitespace/whitespace.elc emacs/whitespace/whitespace_config.elc 4733ec5b6957b51fc612a8edf9b9fc88a89c4049 kevsmith kevin@hypotheticalabs.com http://github.com/kevsmith/hypotheticalabs/commit/9e6af21aa6fd44724ee3b43b5b5968fa27e22372 9e6af21aa6fd44724ee3b43b5b5968fa27e22372 2009-05-16T14:23:33-07:00 2009-05-16T14:23:33-07:00 * Catching up with the current state of my configs 45f9d9f5403ebdb9a6ec8f3df36575af1f9614dc kevsmith kevin@hypotheticalabs.com