diff options
author | Jens Arnold <amiconn@rockbox.org> | 2008-07-21 10:51:34 +0000 |
---|---|---|
committer | Jens Arnold <amiconn@rockbox.org> | 2008-07-21 10:51:34 +0000 |
commit | c4d55fdffd85bbb383f1bd035a9d8e3f9d0109da (patch) | |
tree | 209df36276d35ae26e88faa2ebdbe97e0c9876b7 /tools/buildzip.pl | |
parent | eaa65482dafc82a3a22d265f3593cff67ea80c8a (diff) | |
download | rockbox-c4d55fdffd85bbb383f1bd035a9d8e3f9d0109da.tar.gz rockbox-c4d55fdffd85bbb383f1bd035a9d8e3f9d0109da.zip |
Add a glob_move() function and use it for moving the .cp files.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@18113 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools/buildzip.pl')
-rwxr-xr-x | tools/buildzip.pl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/tools/buildzip.pl b/tools/buildzip.pl index afa851cd88..380a3e407f 100755 --- a/tools/buildzip.pl +++ b/tools/buildzip.pl | |||
@@ -20,6 +20,13 @@ sub glob_copy { | |||
20 | } | 20 | } |
21 | } | 21 | } |
22 | 22 | ||
23 | sub glob_move { | ||
24 | my ($pattern, $destination) = @_; | ||
25 | foreach my $path (glob($pattern)) { | ||
26 | move($path, $destination); | ||
27 | } | ||
28 | } | ||
29 | |||
23 | sub glob_unlink { | 30 | sub glob_unlink { |
24 | my ($pattern) = @_; | 31 | my ($pattern) = @_; |
25 | foreach my $path (glob($pattern)) { | 32 | foreach my $path (glob($pattern)) { |
@@ -264,8 +271,7 @@ STOP | |||
264 | system("$ROOT/tools/codepages -m"); | 271 | system("$ROOT/tools/codepages -m"); |
265 | } | 272 | } |
266 | 273 | ||
267 | glob_copy('*.cp', '.rockbox/codepages/'); | 274 | glob_move('*.cp', '.rockbox/codepages/'); |
268 | glob_unlink('*.cp'); | ||
269 | 275 | ||
270 | if($bitmap) { | 276 | if($bitmap) { |
271 | mkdir ".rockbox/codecs", 0777; | 277 | mkdir ".rockbox/codecs", 0777; |