Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 14 lines (12 sloc) 0.482 kb
d91cc2b Michael Snoyman validateDita
authored
1 {-# LANGUAGE OverloadedStrings #-}
2 import Util
3 import Test.Hspec
4 import Test.Hspec.HUnit
5 import Test.HUnit
6 import Model
7
8 main = hspec $ describe "validateContent"
9 [ it "adds IDs to DITA content" $
10 "<p id=\"x2\">foo</p><p id=\"x1\">bar</p>" @=? validateContent TFDitaConcept "<p>foo</p><p id=\"x1\">bar</p>"
11 , it "strips duplicate ids" $
12 "<p id=\"y\">foo</p><p id=\"x1\">bar</p>" @=? validateContent TFDitaConcept "<p id='y'>foo</p><p id=\"y\">bar</p>"
13 ]
Something went wrong with that request. Please try again.