gatuno
/
gatuno-terminal
1
0
Fork 0
Code Issues Pull Requests Releases 1 Wiki Activity

Correct indentation.

master-1.22
Martin Wimpress 2015-04-21 13:17:19 +01:00 committed by Stefano Karapetsas
parent 37ff9fcae6
commit 48510cd90c
1 changed files with 29 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

58
mate-terminal.wrapper
View File

@ -6,72 +6,72 @@ while ($opt = shift(@ARGV))
{ {
if ($opt eq '-display') if ($opt eq '-display')
{ {
$ENV{'DISPLAY'} = shift(@ARGV); $ENV{'DISPLAY'} = shift(@ARGV);
} }
elsif ($opt eq '-name') elsif ($opt eq '-name')
{ {
$arg = shift(@ARGV); $arg = shift(@ARGV);
push(@args, "--window-with-profile=$arg"); push(@args, "--window-with-profile=$arg");
} }
elsif ($opt eq '-n') elsif ($opt eq '-n')
{ {
# Accept but ignore # Accept but ignore
print STDERR "$0: to set an icon, please use -name <profile> and set a profile icon\n" print STDERR "$0: to set an icon, please use -name <profile> and set a profile icon\n"
} }
elsif ($opt eq '-T' || $opt eq '-title') elsif ($opt eq '-T' || $opt eq '-title')
{ {
push(@args, '-t', shift(@ARGV)); push(@args, '-t', shift(@ARGV));
} }
elsif ($opt eq '-ls') elsif ($opt eq '-ls')
{ {
$login = 1; $login = 1;
} }
elsif ($opt eq '+ls') elsif ($opt eq '+ls')
{ {
$login = 0; $login = 0;
} }
elsif ($opt eq '-geometry') elsif ($opt eq '-geometry')
{ {
$arg = shift(@ARGV); $arg = shift(@ARGV);
push(@args, "--geometry=$arg"); push(@args, "--geometry=$arg");
} }
elsif ($opt eq '-fn') elsif ($opt eq '-fn')
{ {
$arg = shift(@ARGV); $arg = shift(@ARGV);
push(@args, "--font=$arg"); push(@args, "--font=$arg");
} }
elsif ($opt eq '-fg') elsif ($opt eq '-fg')
{ {
$arg = shift(@ARGV); $arg = shift(@ARGV);
push(@args, "--foreground=$arg"); push(@args, "--foreground=$arg");
} }
elsif ($opt eq '-bg') elsif ($opt eq '-bg')
{ {
$arg = shift(@ARGV); $arg = shift(@ARGV);
push(@args, "--background=$arg"); push(@args, "--background=$arg");
} }
elsif ($opt eq '-tn') elsif ($opt eq '-tn')
{ {
$arg = shift(@ARGV); $arg = shift(@ARGV);
push(@args, "--termname=$arg"); push(@args, "--termname=$arg");
} }
elsif ($opt eq '-e') elsif ($opt eq '-e')
{ {
$arg = shift(@ARGV); $arg = shift(@ARGV);
if (@ARGV) if (@ARGV)
{ {
push(@args, '-x', $arg, @ARGV); push(@args, '-x', $arg, @ARGV);
last;
}
else
{
push(@args, '-e', $arg);
}
last; last;
} }
else
{
push(@args, '-e', $arg);
}
last;
}
elsif ($opt eq '-h' || $opt eq '--help') elsif ($opt eq '-h' || $opt eq '--help')
{ {
push(@args, '--help'); push(@args, '--help');
} }
} }
if ($login == 1) if ($login == 1)