Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1
pandoc/test/command/4284.md
John MacFarlane c266734448 Use pretty-simple to format native output. 
Previously we used our own homespun formatting.  But this
produces over-long lines that aren't ideal for diffs in tests.
Easier to use something off-the-shelf and standard.

Closes #7580.

Performance is slower by about a factor of 10, but this isn't
really a problem because native isn't suitable as a serialization
format. (For serialization you should use json, because the reader
is so much faster than native.)
2021-09-21 12:37:42 -07:00

2.4 KiB
Raw Blame History 

% pandoc -f org -t native
#+EXCLUDE_TAGS:apple       cat   bye     dog %     

* This should not appear                                              :apple:
* NOEXPORT should appear if not specified in EXCLUDE_TAGS          :noexport:
* This should not appear                                      :cat:hi:laptop:
** Children of headers with excluded tags should not appear       :xylophone:
* This should not appear                                                  :%:
^D
[ Header 1
  ( "noexport-should-appear-if-not-specified-in-excludetags", [], [] )
  [ Str "NOEXPORT"
  , Space
  , Str "should"
  , Space
  , Str "appear"
  , Space
  , Str "if"
  , Space
  , Str "not"
  , Space
  , Str "specified"
  , Space
  , Str "in"
  , Space
  , Str "EXCLUDE"
  , Subscript
    [ Str "TAGS" ]
  , Space
  , Span
    ( "", [ "tag" ], [ ( "tag-name", "noexport" ) ] )
    [ SmallCaps [ Str "noexport" ] ]
  ]
]

% pandoc -f org -t native
#+EXCLUDE_TAGS:elephant
* This should not appear                                           :elephant:
* This should appear                                                   :fawn:
^D
[ Header 1
  ( "this-should-appear", [], [] )
  [ Str "This"
  , Space
  , Str "should"
  , Space
  , Str "appear"
  , Space
  , Span
    ( "", [ "tag" ], [ ( "tag-name", "fawn" ) ] )
    [ SmallCaps [ Str "fawn" ] ]
  ]
]

% pandoc -f org -t native
#+EXCLUDE_TAGS: giraffe
#+EXCLUDE_TAGS: hippo
* This should not appear                                            :giraffe:
* This should not appear                                              :hippo:
* This should appear                                               :noexport:
^D
[ Header 1
  ( "this-should-appear", [], [] )
  [ Str "This"
  , Space
  , Str "should"
  , Space
  , Str "appear"
  , Space
  , Span
    ( "", [ "tag" ], [ ( "tag-name", "noexport" ) ] )
    [ SmallCaps [ Str "noexport" ] ]
  ]
]

% pandoc -f org -t native
#+EXCLUDE_TAGS:
* NOEXPORT should appear if not specified in EXCLUDE_TAGS          :noexport:
^D
[ Header 1
  ( "noexport-should-appear-if-not-specified-in-excludetags", [], [] )
  [ Str "NOEXPORT"
  , Space
  , Str "should"
  , Space
  , Str "appear"
  , Space
  , Str "if"
  , Space
  , Str "not"
  , Space
  , Str "specified"
  , Space
  , Str "in"
  , Space
  , Str "EXCLUDE"
  , Subscript
    [ Str "TAGS" ]
  , Space
  , Span
    ( "", [ "tag" ], [ ( "tag-name", "noexport" ) ] )
    [ SmallCaps [ Str "noexport" ] ]
  ]
]