Automatically use ldif syntax highlighting for editors that understand

LDIF.  (rickh_shelldap@printstring.com)

FossilOrigin-Name: 8db00eefabf3ad6299552ad9aa401a21077c9e8a17647460947e484662dd0b65
This commit is contained in:
mahlon@laika.com 2013-05-15 19:17:51 +00:00
parent 7402148c97
commit 7eae67f0a3

View file

@ -617,7 +617,7 @@ sub ldif
#
if ( $use_temp ) {
my ( undef, $fname ) =
File::Temp::tempfile( 'shelldap_XXXXXXXX', DIR => '/tmp', UNLINK => 1 );
File::Temp::tempfile( 'shelldap_XXXXXXXX', SUFFIX => '.ldif', DIR => '/tmp', UNLINK => 1 );
$self->{'ldif'} = Net::LDAP::LDIF->new( $fname, 'w', sort => 1, wrap => $self->wrapsize );
$self->{'ldif_fname'} = $fname;
}
@ -1352,7 +1352,7 @@ sub run_create
my $fh;
( $fh, $self->{'create_file'} ) =
File::Temp::tempfile( 'shelldap_XXXXXXXX', DIR => '/tmp', UNLINK => 1 );
File::Temp::tempfile( 'shelldap_XXXXXXXX', SUFFIX => '.ldif', DIR => '/tmp', UNLINK => 1 );
# first print out the dn and object classes.
#