summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPhilip Sequeira <phsequei@gmail.com>2014-06-29 17:24:27 -0400
committerAlessandro Ghedini <alessandro@ghedini.me>2014-07-03 11:03:56 +0200
commite940afec158c262b05ad9b9f15292e3a61826c33 (patch)
treeaf6086cb24f98136b834abb4ada90f008f420aa3
parent7450a7f5318612272871cdefd2b3571c3be3a37f (diff)
downloadmpv-e940afec158c262b05ad9b9f15292e3a61826c33.tar.bz2
mpv-e940afec158c262b05ad9b9f15292e3a61826c33.tar.xz
TOOLS/zsh.pl: untabify
-rwxr-xr-xTOOLS/zsh.pl52
1 files changed, 26 insertions, 26 deletions
diff --git a/TOOLS/zsh.pl b/TOOLS/zsh.pl
index 7edd782c00..03d8bda6bd 100755
--- a/TOOLS/zsh.pl
+++ b/TOOLS/zsh.pl
@@ -98,40 +98,40 @@ EOS
print $tmpl;
sub parse_opts {
- my ($cmd, $regex, $parsing_main_options) = @_;
+ my ($cmd, $regex, $parsing_main_options) = @_;
- my @list;
- my @lines = split /\n/, `$cmd`;
+ my @list;
+ my @lines = split /\n/, `$cmd`;
- foreach my $line (@lines) {
- if ($line !~ /^$regex/) {
- next;
- }
+ foreach my $line (@lines) {
+ if ($line !~ /^$regex/) {
+ next;
+ }
- my $entry = $1;
+ my $entry = $1;
- if ($parsing_main_options) {
- $entry .= '=-';
- }
+ if ($parsing_main_options) {
+ $entry .= '=-';
+ }
- if (defined $2) {
- my $desc = $2;
- $desc =~ s/\:/\\:/g;
+ if (defined $2) {
+ my $desc = $2;
+ $desc =~ s/\:/\\:/g;
- $entry .= ':' . $desc;
- }
+ $entry .= ':' . $desc;
+ }
- if ($parsing_main_options) {
- $entry .= ':';
+ if ($parsing_main_options) {
+ $entry .= ':';
- $entry .= '->ao' if ($1 eq '--ao');
- $entry .= '->vo' if ($1 eq '--vo');
- $entry .= '->af' if ($1 eq '--af');
- $entry .= '->vf' if ($1 eq '--vf');
- }
+ $entry .= '->ao' if ($1 eq '--ao');
+ $entry .= '->vo' if ($1 eq '--vo');
+ $entry .= '->af' if ($1 eq '--af');
+ $entry .= '->vf' if ($1 eq '--vf');
+ }
- push @list, $entry
- }
+ push @list, $entry
+ }
- return @list;
+ return @list;
}