~mdw
/
profile
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
dot/zshrc: Fix path ellipsization in the prompt.
[profile]
/
el
/
dot-emacs.el
diff --git
a/el/dot-emacs.el
b/el/dot-emacs.el
index
24d076d
..
001fa29
100644
(file)
--- a/
el/dot-emacs.el
+++ b/
el/dot-emacs.el
@@
-1012,6
+1012,9
@@
If NEW-SESSION-P, start a new session."
(w3m-browse-url url new-session-p))
(select-window window)))))
(w3m-browse-url url new-session-p))
(select-window window)))))
+(eval-after-load 'w3m
+ '(define-key w3m-mode-map [?\e ?\r] 'w3m-view-this-url-new-session))
+
(defvar mdw-good-url-browsers
'(browse-url-chromium
browse-url-mozilla
(defvar mdw-good-url-browsers
'(browse-url-chromium
browse-url-mozilla
@@
-4006,7
+4009,7
@@
This allows you to pass a list of arguments through `ansi-term'."
(ansi-term (list "ssh" host) (format "ssh@%s" host)))
(defvar git-grep-command
(ansi-term (list "ssh" host) (format "ssh@%s" host)))
(defvar git-grep-command
- "env PAGER=cat git grep --no-color -nH -e "
+ "env
GIT_
PAGER=cat git grep --no-color -nH -e "
"*The default command for \\[git-grep].")
(defvar git-grep-history nil)
"*The default command for \\[git-grep].")
(defvar git-grep-history nil)
@@
-4016,7
+4019,8
@@
This allows you to pass a list of arguments through `ansi-term'."
(interactive
(list (read-shell-command "Run git grep (like this): "
git-grep-command 'git-grep-history)))
(interactive
(list (read-shell-command "Run git grep (like this): "
git-grep-command 'git-grep-history)))
- (grep command-args))
+ (let ((grep-use-null-device nil))
+ (grep command-args)))
;;;--------------------------------------------------------------------------
;;; Magit configuration.
;;;--------------------------------------------------------------------------
;;; Magit configuration.