[augeas-devel] [PATCH] aliases.aug: Do not require whitespace after commas

[David Lutterkort]

2 files changed, 10 insertions(+), 1 deletion(-)
lenses/aliases.aug            |    2 +-
lenses/tests/test_aliases.aug |    9 +++++++++


# HG changeset patch
# User David Lutterkort <dlutter at redhat.com>
# Date 1216318090 25200
# Node ID 0db7309f65712cf9018a54cd981229206913a154
# Parent  2846f10d64be3cb642dbf1f45b087a0a46aeb065
aliases.aug: Do not require whitespace after commas

It's perfectly fine to have an alias like 'alias: target1,target2'

Bug reported by Greg Swift

diff -r 2846f10d64be -r 0db7309f6571 lenses/aliases.aug
--- a/lenses/aliases.aug	Wed Jul 16 15:52:17 2008 -0700
+++ b/lenses/aliases.aug	Thu Jul 17 11:08:10 2008 -0700
@@ -10,7 +10,7 @@
 
    let comment = [ del /^[ \t]*(#.*)?\n/ "#\n" ]
 
-   let comma = del /,[ \t]+(\n[ \t]+)?/ ", "
+   let comma = del /,[ \t]*(\n[ \t]+)?/ ", "
    let alias =  [ seq "alias" .
                     [ label "name" . store name ] . colon .
                     [ label "value" . store word ] .
diff -r 2846f10d64be -r 0db7309f6571 lenses/tests/test_aliases.aug
--- a/lenses/tests/test_aliases.aug	Wed Jul 16 15:52:17 2008 -0700
+++ b/lenses/tests/test_aliases.aug	Thu Jul 17 11:08:10 2008 -0700
@@ -50,6 +50,15 @@
       set "3/values/2" "ruth"
     = *
 
+  (* Don't have to have whitespace after a comma *)
+  let nocomma = "alias: target1,target2\n"
+
+  test Aliases.lns get nocomma = 
+    { "1"
+        { "name" = "alias" }
+        { "value" = "target1" }
+        { "value" = "target2" } }
+
 (* Local Variables: *)
 (* mode: caml       *)
 (* End:             *)