[augeas-devel] [PATCH] Util.comment: produce #comment nodes

[David Lutterkort]

2 files changed, 2 insertions(+), 2 deletions(-)
lenses/tests/test_pam.aug |    2 +-
lenses/util.aug           |    2 +-


# HG changeset patch
# User David Lutterkort <dlutter at redhat.com>
# Date 1219694786 25200
# Node ID a4e52d418c0df04aa278c2dd11a8b6c6cc27c0d6
# Parent  0267157373352a74579ab906f2c1e917b6d267d4
Util.comment: produce #comment nodes

diff -r 026715737335 -r a4e52d418c0d lenses/tests/test_pam.aug
--- a/lenses/tests/test_pam.aug	Thu Aug 14 17:48:37 2008 +0200
+++ b/lenses/tests/test_pam.aug	Mon Aug 25 13:06:26 2008 -0700
@@ -6,7 +6,7 @@
 "
 
   test Pam.lns get example =
-    { "comment" = "%PAM-1.0" }
+    { "#comment" = "%PAM-1.0" }
     { "1" { "type" = "auth" }
           { "control" = "[user_unknown=ignore success=ok ignore=ignore default=bad]" }
           { "module" = "pam_securetty.so" } }
diff -r 026715737335 -r a4e52d418c0d lenses/util.aug
--- a/lenses/util.aug	Thu Aug 14 17:48:37 2008 +0200
+++ b/lenses/util.aug	Mon Aug 25 13:06:26 2008 -0700
@@ -18,7 +18,7 @@
      ignored together with empty lines
   *)
   let comment = 
-    [ indent . label "comment" . del /#[ \t]*/ "# " 
+    [ indent . label "#comment" . del /#[ \t]*/ "# " 
         . store /([^ \t\n].*[^ \t\n]|[^ \t\n])/ . eol ]
 
   let empty   = [ del /[ \t]*#?[ \t]*\n/ "" ]