如何避免使用Emacs cperl模式移動大括號？

Question

我使用GNU Emacs 22.2.1和cperl 5.23。

我有Perl代碼：

sub foo 
{ 
    if($x) 
    { 
     print "x"; 
    } 
    else 
    { 
     print "y"; 
    } 
} 

我想代碼縮進到2空間縮進。但是，當我在此代碼運行cperl-indent-region，我得到：

sub foo 
    { 
    if ($x) { 
     print "x"; 
    } else { 
     print "y"; 
    } 
    } 

1. 我如何才能讓外撐在左旁/ 0列？
2. 我該如何防止if和else的前括號移動到前一行？

Answer 1

我相信你要找的定製是：

(setq cperl-extra-newline-before-brace t 
     cperl-brace-offset    -2 
     cperl-merge-trailing-else  nil) 

您可以自定義cperl模式M-x customize-group <ENTER> cperl <ENTER>。縮進變量位於Cperl Indentation Details子組中。