(define-key global-map [menu-bar Misc] nil)
(global-set-key (kbd "M-n") 'other-window)
(global-set-key (kbd "M-p") '(lambda () (other-window -1)))
(global-set-key (kbd "M-g") 'goto-line)

(line-number-mode 1)
(column-number-mode 1)
(transient-mark-mode 1)

;; I use sentences.  Like this.
(setq sentence-end-double-space t)

;; Backup behavior: don't clobber symlinks, and keep the backups in a dedicated
;; directory.
(setq backup-by-copying t)
(setq backup-directory-alist '(("." . "~/.saves")))

;; Use pathnames instead of <n> to uniquify buffer names
(require 'uniquify)
(setq uniquify-buffer-name-style 'post-forward-angle-brackets)

(require 'ido)
(ido-mode t)

(require 'tramp)
(setq tramp-default-method "ssh")

(require 'post)
(add-to-list 'auto-mode-alist '("sup\\.\\(compose\\|forward\\|reply\\|resume\\)-mode$" . post-mode))
(add-hook 'post-mode-hook
          (lambda ()
            ;Put the cursor just where I want it - at the beginning of the body
            ;text.
            (post-goto-body)
            (beginning-of-line)))

;(require 'jde)

;; Use w3m for web browsing.  (Mostly for SLIME Hyperspec lookups.)
(setq browse-url-browser-function 'w3m-browse-url)

;; Use ssh to tunnel the sudo: tramp method onto other hosts at work.
(add-to-list 'tramp-default-proxies-alist
             '("\\.hillmgt\\.com\\'" "\\`root\\'" "/ssh:%h:"))
(add-to-list 'tramp-default-proxies-alist
             '("\\.hsales\\.com\\'" "\\`root\\'" "/ssh:%h:"))
(add-to-list 'tramp-default-proxies-alist
             '("\\.aperiodic\\.net\\'" "\\`root\\'" "/ssh:%h:"))

;; Load scala mode
(add-to-list 'load-path "~/src/scala-tool-support/emacs/")
(require 'scala-mode-auto)


(provide 'pmg-generic)