Macro assistance part 1 - macro directive

[subdirmk.git] / tests / filter / extract-doctest

diff --git a/tests/filter/extract-doctest b/tests/filter/extract-doctest
index 35870cea50ed6987a1cb388eb372be3cb38711df..57f5313a1fda1e96800430703f3ebd6459b7abc7 100755 (executable)
--- a/tests/filter/extract-doctest
+++ b/tests/filter/extract-doctest
@@ -138,6 +138,8 @@ sub writeout ($) {
                  'dollar doubling',
                  sub {
                      my ($e) = @_;
+                     # adhoc: skip &:macro in already-doubling part
+                     return 0 if $e->{In} =~ m{^\&\:macro};
                      return 0 if $e->{CQ};
                      return $e->{DD} || !grep {
                          # If there are two entries with the same In,