Index: t/codingstd/line_endings.t
===================================================================
--- t/codingstd/line_endings.t	(revision 16967)
+++ t/codingstd/line_endings.t	(working copy)
@@ -31,7 +31,7 @@
 }
 
 # set up how many tests to run
-plan tests => 1;
+plan tests => 2;
 
 =head1 NAME
 
@@ -58,7 +58,9 @@
 
 my @files = @ARGV ? @ARGV : source_files();
 my @dos_files;
+my @no_eol_style_files;
 
+my $client = SVN::Client->new();
 foreach my $file (@files) {
     my $buf;
 
@@ -73,11 +75,46 @@
     # append to the dos_files array if the code matches
     push @dos_files => "$file\n"
         if $buf =~ m{\r$}m;
+
+    # try to read the svn:eol-style property of the file
+    my $prop;
+
+    # TODO: determination of svn property variables should be refactored out
+    # using svk if available
+    if ($use_svk) {
+        my @svk_cmd_args = ( 'svn:eol-style', $file );
+        my $ret_val = $svk->propget(@svk_cmd_args);
+        if ( $ret_val != 0 ) {
+            die "Unable to run 'svk propget' command\n";
+        }
+        chomp $output;
+        $prop = $output;
+    }
+    # or using svn
+    else {
+        my $prop_ref = $client->propget( "svn:eol-style", $file, "WORKING", 0 );
+        $prop = $prop_ref->{$file};
+    }
+
+    # if the eol-style property is undefined or empty, append to file list
+    if ( !defined $prop || $prop eq '' ) {
+        push @no_eol_style_files, $file, "\n";
+    }
+    else {
+        # append only if the eol-style property isn't LF
+        push @no_eol_style_files, $file, "\n"
+            if ( $prop !~ m{LF} );
+    }
+
 }
 
 ok( !scalar(@dos_files), 'Line endings correct' )
     or diag( "DOS line ending found in " . scalar @dos_files . " files:\n@dos_files" );
 
+ok( !scalar(@no_eol_style_files), 'svn:eol-style correct' )
+    or diag( "Incorrect or nonexistent svn:eol-style property found in " . 
+        scalar @no_eol_style_files . " files:\n@no_eol_style_files" );
+
 exit;
 
 sub source_files {