krb5 commit: Add test case for directory in profile path

[Greg Hudson]

https://github.com/krb5/krb5/commit/b249d2199711ced887de9ff6bc999b4a91143e5d
commit b249d2199711ced887de9ff6bc999b4a91143e5d
Author: Greg Hudson <ghudson at mit.edu>
Date:   Thu Oct 23 12:30:42 2014 -0400

    Add test case for directory in profile path
    
    ticket: 8030

 src/util/profile/prof_test1 |   10 ++++++++++
 1 files changed, 10 insertions(+), 0 deletions(-)

diff --git a/src/util/profile/prof_test1 b/src/util/profile/prof_test1
index d7117a6..87368d8 100644
--- a/src/util/profile/prof_test1
+++ b/src/util/profile/prof_test1
@@ -200,6 +200,16 @@ proc test4 {} {
     }
     profile_release $p
 
+    # Directly list the directory in the profile path and try again.
+    set p [profile_init_path $wd/test_include_dir]
+    set x [profile_get_values $p {{test section 1} bar}]
+    if $verbose { puts "Read $x from directory" }
+    if ![string equal $x "foo foo"] {
+	puts stderr, "Error: test4: Did not get expected result from directory."
+	exit 1
+    }
+    profile_release $p
+
     puts "OK: test4: include and includedir directives"
 }