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
|
$NetBSD: patch-aa,v 1.1.1.1 2005/05/05 20:03:55 xtraeme Exp $
--- x11rec.orig 2001-06-08 04:13:02.000000000 +0900
+++ x11rec
@@ -40,7 +40,7 @@ class Xrecorder
def target
$stderr.puts "** Select an X window with a mouse. **"
- IO.popen("xwininfo").each do |line|
+ IO.popen("@xwininfo@").each do |line|
if /id: (\S+)/ =~ line then
@id = $1
end
@@ -54,7 +54,7 @@ class Xrecorder
while true
tmp1 = sprintf "%s.1.%06d", @tmpprefix, @frames # may be broken.
tmp2 = sprintf "%s.2.%06d", @tmpprefix, @frames # safe to use.
- system "xwd -silent -id #{@id} > #{tmp1}"
+ system "@xwd@ -silent -id #{@id} > #{tmp1}"
File.rename tmp1, tmp2
@frames += 1
printf "frames: %d\r", @frames
@@ -73,16 +73,16 @@ class Xrecorder
files.each_with_index do |file, i|
$stderr.printf "converting each xwd file into a gif file: %d/%d\r",
i + 1, files.length
- system "convert #{file} #{file}.gif"
+ system "@convert@ #{file} #{file}.gif"
end
puts
$stderr.puts "creating the resulting movie file..."
- system "gifsicle --colors 256 -O2 --delay #{delay} #{@tmpprefix}.2.*.gif > #{tmpgif2}"
+ system "@gifsicle@ --colors 256 -O2 --delay #{delay} #{@tmpprefix}.2.*.gif > #{tmpgif2}"
if /^(.*)\.mng$/ =~ @filename then
# create MNG with ImageMagick if needed.
- system "convert #{tmpgif2} #{@filename}"
+ system "@convert@ #{tmpgif2} #{@filename}"
else
# just rename the temporary file.
File.rename tmpgif2, @filename
|
