chiark / gitweb /
dot/inputrc: Wow, readline can do bracketd-paste.
[profile] / dot / rcrc
index af3d1fe61076fcc47e2d9f33142a1b28ed6f2d57..39d9435b215f9ba60f258b25695c61706d53573a 100644 (file)
--- a/dot/rcrc
+++ b/dot/rcrc
@@ -40,3 +40,38 @@ fn prompt {
   }
   prompt = ($bold$left$sec_l$u$host$sec_r^' '^$cwd$right$unbold '')
 }
+
+###--------------------------------------------------------------------------
+### Convenient aliases.
+
+fn rootly { ~ $#* 0 && * = $SHELL; $__MDW_ROOTLY $* }
+fn r { rootly $* }
+fn re { rootly $EDITOR $* }
+fn pstree { builtin pstree -hl }
+fn e { $EDITOR $* }
+fn @ { ssh $* }
+
+fn ls {
+  if (test -t 1) {
+    builtin ls $LS_OPTIONS '--color=auto' $*
+  } else {
+    builtin ls $*
+  }
+}
+
+fn greplike {
+  grep = $1; shift
+  if (test -t 1) {
+    builtin $grep '--color=always' $* | mdw-pager
+  } else {
+    builtin grep $*
+  }
+}
+fn grep { greplike grep $* }
+fn egrep { greplike egrep $* }
+fn fgrep { greplike fgrep $* }
+fn zgrep { greplike zgrep $* }
+
+if (~ $INSIDE_EMACS 22.*,comint) PAGER = cat
+
+###----- That's all, folks --------------------------------------------------