forked from rocky/rb-trepanning
-
Notifications
You must be signed in to change notification settings - Fork 0
/
unalias.rb
43 lines (36 loc) · 917 Bytes
/
unalias.rb
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
require_relative '../command'
class Trepan::Command::UnaliasCommand < Trepan::Command
unless defined?(HELP)
HELP = <<-HELP
unalias ALIAS
Remove alias ALIAS
See also 'alias'.
HELP
CATEGORY = 'support'
MIN_ARGS = 1
# MAX_ARGS = 1 # Need at most this many
NAME = File.basename(__FILE__, '.rb')
NEED_STACK = true
SHORT_HELP = 'Remove an alias'
end
# Run command.
def run(args)
args[1..-1].each do |arg|
if @proc.aliases.member?(arg)
@proc.aliases.delete(arg)
msg "Alias for #{arg} removed."
else
msg "No alias found for #{arg}."
end
end
end
end
if __FILE__ == $0
# Demo it.
require_relative '../mock'
dbgr, cmd = MockDebugger::setup
cmd.run %W(cmd.name s)
cmd.run %W(cmd.name s)
cmd.run %W(cmd.name foo bar n)
end