Ticket #1482: open.osx.terminal.app.patch
| File open.osx.terminal.app.patch, 726 bytes (added by akoya, 4 months ago) |
|---|
-
.pm
old new 2099 2099 system qq(xterm -sb -e "$cmd; sleep 1000" &); 2100 2100 } 2101 2101 } 2102 } elsif (Padre::Constant::UNIX) { 2103 2102 } elsif (Padre::Constant::MAC) { 2104 2103 # tome 2104 2105 my $pwd = $self->current->document->project_dir(); 2106 my $tmp = File::Temp->new(TEMPLATE => 'PF_XXXXXXXX', SUFFIX => '.command', DIR => '/tmp', UNLINK => 0); 2107 binmode( $tmp, ":utf8" ); 2108 print $tmp "#!/bin/sh\ncd \"". $pwd ."\"; clear; $cmd;\n"; 2109 close $tmp; 2110 system qq(/bin/chmod 755 $tmp); 2111 system qq(/usr/bin/open $tmp); 2112 ( -f $tmp ) && unlink $tmp; 2113 2105 2114 } else { 2106 2115 system qq(xterm -sb -e "$cmd; sleep 1000" &); 2107 2116 }
