diff options
| author | Linus Nielsen Feltzing <linus@haxx.se> | 2003-03-09 13:44:33 +0000 |
|---|---|---|
| committer | Linus Nielsen Feltzing <linus@haxx.se> | 2003-03-09 13:44:33 +0000 |
| commit | f28f404e6e1e587bf1d38e0d23539fd8cf59e1fb (patch) | |
| tree | a1dacd4b7be7533fe484362c74d0eab78a48db7f /tools/binlang | |
| parent | 3a5ddf566ec29c713358d7b6af07d6f608b8b8d1 (diff) | |
| download | rockbox-f28f404e6e1e587bf1d38e0d23539fd8cf59e1fb.tar.gz rockbox-f28f404e6e1e587bf1d38e0d23539fd8cf59e1fb.zip | |
Added error checking when opening the files
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@3401 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools/binlang')
| -rwxr-xr-x | tools/binlang | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/binlang b/tools/binlang index 158c755459..885f819001 100755 --- a/tools/binlang +++ b/tools/binlang | |||
| @@ -39,9 +39,9 @@ my $output = $ARGV[2]; | |||
| 39 | 39 | ||
| 40 | my $idnum=0; | 40 | my $idnum=0; |
| 41 | 41 | ||
| 42 | open(ENG, "<$english"); | 42 | open(ENG, "<$english") or die "Can't open $english"; |
| 43 | open(LANG, "<$input"); | 43 | open(LANG, "<$input") or die "Can't open $input"; |
| 44 | open(OFILE, ">$output"); | 44 | open(OFILE, ">$output" or die "Can't open $output"); |
| 45 | 45 | ||
| 46 | my $langversion = 1; | 46 | my $langversion = 1; |
| 47 | 47 | ||