[bpt/emacs.git] / test / indent / perl.perl

#!/usr/bin/perl
# -*- eval: (bug-reference-mode 1) -*-

$fileType_filesButNot           # bug#12373?
    = join( '|', map { quotemeta($_).'$' } @{$fileType->{filesButNot}} );
Commit	Line	Data
b08b6da7 SM	1	#!/usr/bin/perl
	2	# -- eval: (bug-reference-mode 1) --
	3
	4	$fileType_filesButNot # bug#12373?
	5	= join( '\|', map { quotemeta($_).'$' } @{$fileType->{filesButNot}} );