File: altchan

package info (click to toggle)
epic4 1%3A3.0-2.2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 3,756 kB
  • sloc: ansic: 56,285; makefile: 631; sh: 161; perl: 30
file content (26 lines) | stat: -rw-r--r-- 716 bytes parent folder | download | duplicates (10)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#$EPIC: altchan,v 1.3 2002/08/12 16:59:49 jnelson Exp $
#
# "altchan" -- a script to implement ALT-<number> key bindings
# BitchX I guess does this by default.  So here is a compatibility script.
#

bind ^[1 parse_command to_window 1
bind ^[2 parse_command to_window 2
bind ^[3 parse_command to_window 3
bind ^[4 parse_command to_window 4
bind ^[5 parse_command to_window 5
bind ^[6 parse_command to_window 6
bind ^[7 parse_command to_window 7
bind ^[8 parse_command to_window 8
bind ^[9 parse_command to_window 9
bind ^[0 parse_command to_window 10

alias to_window (window default 0) {
	if (winnum($window) == -1) {
		xecho -c -b SWAP: No such window: $window
	} {
		window refnum_or_swap $window
	}
}

#hop'y2k+1