dot/emacs: Bind a key to `magit-toggle-buffer-lock'.

[profile] / dot / mykermrc.in

diff --git a/dot/mykermrc.in b/dot/mykermrc.in
index d750a668f54bfe6131297befa4ae20c12d0132a7..029dd3a9db0ad6891eed550e2e10f2aefeebb8da 100644 (file)
--- a/dot/mykermrc.in
+++ b/dot/mykermrc.in
@@ -103,6 +103,37 @@ def GUVNOR {
        set key 127 \8
        telnet guvnor.distorted.org.uk
 }
+def JUMPTS {
+       local pass
+       set host /network-type:pty ssh -enone -t \%1
+       while true {
+               input 15 \fpattern({{{password:,exit}}})
+               if fail end 1 failed to connect
+               if equal \v(inmatch) exit break
+               if equal \v(inmatch) password: {
+                       if ! def pass askq pass {password: }
+                       output \m(pass)\13
+               }
+       }
+}
+def FENDERCON {
+       set input echo off
+       jumpts mdw@ts-tfm8.jump.net.uk
+       output 1\13
+       set control prefixed 30
+       connect
+}
+def ARDUINO {
+       set terminal lf-display crlf
+       set line \%1
+       set speed 9600
+       set serial 8n1
+       set modem type none
+       set carrier-watch off
+       set clear-channel on
+       connect
+       set line
+}
 
 ;; Local configuration.
 if exist \m(_dot)config take \m(_dot)config