1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
# The original (hack-around) was written 4/20/93
# by Mycroft!mycroft@gnu.ai.mit.edu (Charles Hannum)
# who deserves bonus points for coming up with a clever way
# to get around stupid limitations in the client
#
# This version was written 12/3/95
# by hop!jnelson@acronet.net (Jeremy Nelson)
# who hacked the $aliasctl() function into EPIC3pre5-fixit1
# which allows you to do this cleanly.
#
alias edit
{
^local edit.name $toupper($0)
^local edit.stuff $aliasctl(ALIAS GET $edit.name)
if (edit.stuff)
{
type ^U
xtype -literal /alias $^\edit.name $^\edit.stuff
}
{
xecho -w 0 *** Unknown alias: $edit.name
}
}
|
