-(global-set-key [?\C-x ?w left] 'windmove-left)
-(global-set-key [?\C-x ?w ?h] 'windmove-left)
-(global-set-key [?\C-x ?w up] 'windmove-up)
-(global-set-key [?\C-x ?w ?k] 'windmove-up)
-(global-set-key [?\C-x ?w down] 'windmove-down)
-(global-set-key [?\C-x ?w ?j] 'windmove-down)
-(global-set-key [?\C-x ?w right] 'windmove-right)
-(global-set-key [?\C-x ?w ?l] 'windmove-right)
-(global-set-key [?\C-x ?g ?l] 'org-store-link)
-(global-set-key [?\C-x ?g ?a] 'org-agenda)
-(global-set-key [?\C-x ?g ?b] 'org-iswitchb)
-(global-set-key [?\C-x ?t ?i] 'timeclock-in)
-(global-set-key [?\C-x ?t ?c] 'timeclock-change)
-(global-set-key [?\C-x ?t ?o] 'timeclock-out)
-(global-set-key [?\C-x ?t ?r] 'timeclock-reread-log)
-(global-set-key [?\C-x ?t ?w] 'timeclock-workday-remaining-string)
-(global-set-key [?\C-x ?t ?s] 'timeclock-status-string)
-(global-set-key [?\C-x ?t ?p] 'nc-timesheet-prepare)
-(global-set-key [?\C-x ?t ?\C-m] 'nc-timesheet-submit)
-(global-set-key [?\M-#] 'calc-dispatch)
-(global-set-key [?\C-x ?/] 'auto-fill-mode)
-(global-set-key [?\C-x ?w ?d] 'mdw-divvy-window)
-(global-set-key [insertchar] 'overwrite-mode)
-(global-set-key [?\C-x ?\C-n] 'skel-create-file)
-(global-set-key [?\C-x ?4 ?n] 'skel-create-file-other-window)
-(global-set-key [?\C-x ?5 ?n] 'skel-create-file-other-frame)
-(global-set-key [delete] 'delete-char)
-(global-set-key [?\M-q] 'mdw-fill-paragraph)
-(global-set-key [?\C-h ?\C-m] 'manual-entry)
-(global-set-key [C-M-backspace] 'backward-kill-sexp)
-(global-set-key [mode-line C-mouse-1] 'mouse-tear-off-window)
-(global-set-key [vertical-scroll-bar C-down-mouse-1]
- 'mouse-drag-vertical-line)
-(global-set-key [vertical-scroll-bar C-mouse-1]
- #'(lambda () (interactive)))
-(global-set-key [XF86WakeUp] "")
-(and (not mdw-fast-startup) (fboundp 'hippie-expand)
- (global-set-key [?\M-/] 'hippie-expand))
+(progn
+ (global-set-key [?\C-x ?w left] 'windmove-left)
+ (global-set-key [?\C-x ?w ?h] 'windmove-left)
+ (global-set-key [?\C-x ?w up] 'windmove-up)
+ (global-set-key [?\C-x ?w ?k] 'windmove-up)
+ (global-set-key [?\C-x ?w down] 'windmove-down)
+ (global-set-key [?\C-x ?w ?j] 'windmove-down)
+ (global-set-key [?\C-x ?w right] 'windmove-right)
+ (global-set-key [?\C-x ?w ?l] 'windmove-right)
+ (global-set-key [?\C-x ?g ?l] 'org-store-link)
+ (global-set-key [?\C-x ?g ?a] 'org-agenda)
+ (global-set-key [?\C-x ?g ?b] 'org-iswitchb)
+ (global-set-key [?\C-x ?t ?i] 'timeclock-in)
+ (global-set-key [?\C-x ?t ?c] 'timeclock-change)
+ (global-set-key [?\C-x ?t ?o] 'timeclock-out)
+ (global-set-key [?\C-x ?t ?r] 'timeclock-reread-log)
+ (global-set-key [?\C-x ?t ?w] 'timeclock-workday-remaining-string)
+ (global-set-key [?\C-x ?t ?s] 'timeclock-status-string)
+ (global-set-key [?\C-x ?t ?p] 'nc-timesheet-prepare)
+ (global-set-key [?\C-x ?t ?\C-m] 'nc-timesheet-submit)
+ (global-set-key [?\C-x ?3] 'mdw-split-window-horizontally)
+ (global-set-key [?\M-#] 'calc-dispatch)
+ (global-set-key [?\C-x ?/] 'auto-fill-mode)
+ (global-set-key [?\C-x ?w ?d] 'mdw-divvy-window)
+ (global-set-key [insertchar] 'overwrite-mode)
+ (global-set-key [?\C-x ?\C-n] 'skel-create-file)
+ (global-set-key [?\C-x ?4 ?n] 'skel-create-file-other-window)
+ (global-set-key [?\C-x ?5 ?n] 'skel-create-file-other-frame)
+ (global-set-key [delete] 'delete-char)
+ (global-set-key [?\M-q] 'mdw-fill-paragraph)
+ (global-set-key [?\C-h ?\C-m] 'manual-entry)
+ (global-set-key [C-M-backspace] 'backward-kill-sexp)
+ (global-set-key [mode-line C-mouse-1] 'mouse-tear-off-window)
+ (global-set-key [vertical-scroll-bar C-down-mouse-1]
+ 'mouse-drag-vertical-line)
+ (global-set-key [vertical-scroll-bar C-mouse-1]
+ #'(lambda () (interactive)))
+ (global-set-key [M-S-mouse-3] 'imenu)
+ (global-set-key [XF86WakeUp] "")
+ (global-set-key [?\C-c ?d ?w] 'devhelp-word-at-point)
+ (global-set-key [?\C-c ?d ?a] 'devhelp-assistant-word-at-point)
+ (global-set-key [f11] 'mdw-toggle-full-screen)
+ (and (not mdw-fast-startup) (fboundp 'hippie-expand)
+ (global-set-key [?\M-/] 'hippie-expand)))
+
+(eval-after-load "dired"
+ '(progn
+ (or (lookup-key dired-mode-map [?\C-x ?\C-q])
+ (define-key dired-mode-map [?\C-x ?\C-q]
+ 'wdired-change-to-wdired-mode))
+ (trap (require 'dired-x))
+ (and (fboundp 'dired-do-relsymlink)
+ (define-key dired-mode-map [?\C-c ?\C-s] 'dired-do-relsymlink))))