diff options
| author | Florian Ragwitz <rafl@debian.org> | 2011-02-26 08:58:16 +0100 |
|---|---|---|
| committer | Florian Ragwitz <rafl@debian.org> | 2011-02-26 08:58:16 +0100 |
| commit | b06d15458ffdc7ae82888f4a34a26930f8f1a4e4 (patch) | |
| tree | 48718d7827fc33cc24585681f89df6814f7c4856 /Porting | |
| parent | 241240e5f5eec9134729b63037803b23f7333dad (diff) | |
| download | perl-b06d15458ffdc7ae82888f4a34a26930f8f1a4e4.tar.gz | |
Hack to allow git-deltatool to spawn 'emacsclient -t'
My $EDITOR is 'emacsclient -t'. system('emacsclient -t', 'more', 'args') won't
do the right thing.
Diffstat (limited to 'Porting')
| -rw-r--r-- | Porting/git-deltatool | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Porting/git-deltatool b/Porting/git-deltatool index 3c413ffc82..2216037b9a 100644 --- a/Porting/git-deltatool +++ b/Porting/git-deltatool @@ -219,7 +219,7 @@ sub edit_text { $args //= {}; my $tempfh = File::Temp->new; $tempfh->printflush( $text ); - if ( my (@editor) = $ENV{VISUAL} || $ENV{EDITOR} ) { + if ( my @editor = split /\s+/, ($ENV{VISUAL} || $ENV{EDITOR}) ) { push @editor, "-f" if $editor[0] =~ /^gvim/; system(@editor, "$tempfh"); } |