utility: add auto rlwrap

kljohann · Dec 22, 2012 · ef75462 · ef75462
1 parent d63b3b8
commit ef75462
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/utility/init.zsh b/utility/init.zsh
@@ -171,6 +171,19 @@ function {
 }
 # }}}
 
+# Wrap In Readline {{{
+is-callable rlwrap && function {
+  local programs
+  local program
+
+  zdefault -a ':zoppo:plugin:utility' readline programs \
+    'nc' 'telnet' 'sbcl' 'tclsh' 'mzscheme'
+
+  for program ("$programs[@]")
+    alias "$program"="rlwrap -c -D -r $program"
+}
+# }}}
+
 # Directory Stuff {{{
 alias+ mkdir '-p'
 alias md='mkdir'