deac/truckle
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

tretry added. less-tries.

Browse source
This commit is contained in:
Denis Knauf 2013-02-17 14:58:58 +01:00
parent 989deed03b
commit e1513810e2
2 changed files with 16 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Makefile
View file

@ -14,7 +14,7 @@ install: truckle
mkdir -p $(D)$(BIN_PREFIX)
install -m 0755 truckle $(D)$(BIN_PREFIX)/truckle
for c in `./truckle --list-commands`; do ln -fs truckle $(D)$(BIN_PREFIX)/truckle-$${c} ; done
for c in trdo tresume; do ln -fs truckle $(D)$(BIN_PREFIX)/$${c} ; done
for c in trdo tresume tretry; do ln -fs truckle $(D)$(BIN_PREFIX)/$${c} ; done
README.md: truckle README.pre.md
( cat README.pre.md ; ./truckle --help ) > README.md.tmp

22
truckle
View file

@ -277,7 +277,7 @@ class Truckle
end
def initialize argv0
ENV['LESS'] = "-FR #{ENV['LESS']}"
ENV['LESS'] = "-FLRBb-1 #{ENV['LESS']}"
@argv0 = argv0
@exename = File.basename argv0
@ -497,10 +497,21 @@ EOF
end
end
class Shortcut
class Shortcut < Hash
attr_reader :argv0
def initialize argv0
@argv0 = argv0
prepare
end
def on cmd, &exe
self[cmd.to_s.to_sym] = exe
end
def prepare
on( :trdo) { exec :truckle, :do, *ARGV }
on( :tresume) { exec :truckle, :resume, *ARGV }
on( :tretry) { exec :truckle, :retry, *ARGV }
end
def exec exe, *args
@ -510,11 +521,8 @@ class Shortcut
def run
exe = File.basename @argv0
case exe.to_sym
when :trdo then exec :truckle, :do, *ARGV
when :tresume then exec :truckle, :resume, *ARGV
when :tretry then exec :truckle, :retry, *ARGV
end
exe = self[exe.to_sym]
exe.call if exe
end
alias call run