bug#33183: perl-mode: indent-region injects spaces after newlines causing data loss

bug#33183: perl-mode: indent-region injects spaces after newlines causing data loss

[積丹尼 Dan Jacobson]

In perl-mode

%fields = (
    u =>
    'test
ing' . q{test
2} .
    qq/last
test/ );

becomes

%fields = (
    u =>
    'test
    ing' . q{test
    2} .
    qq/last
    test/ );

after running indent-region, on the region. However

my $x= 'new
    line';
my $y= q{new
    line};

is unaffected, thankfully.
emacs-version "25.2.2"

Also wrecks
     u =>
    <<EOF
nnnn
xxxx
EOF

P.S., takes a lot of work to repair wrecked areas. One form of data loss!

In fact it even wrecks top level here-docs:
my $x = <<EOF;
nnnn
xxxx
EOF

will get wrecked.

Also wrecks
sub mq{
    return "a
b";}

bug#33183: perl-mode: indent-region injects spaces after newlines causing data loss

[Lars Ingebrigtsen]

積丹尼 Dan Jacobson <jidanni@jidanni.org> writes:

> In perl-mode
>
> %fields = (
>     u =>
>     'test
> ing' . q{test
> 2} .
>     qq/last
> test/ );
>
> becomes
>
> %fields = (
>     u =>
>     'test
>     ing' . q{test
>     2} .
>     qq/last
>     test/ );
>
> after running indent-region, on the region. However

I can reproduce this in Emacs 26, but not in Emacs 28, so I guess this
has been fixed in the years since this was reported, and I'm closing
this bug report.  

-- 
(domestic pets only, the antidote for overdose, milk.)
   bloggy blog: http://lars.ingebrigtsen.no