모듈:해트노트/테스트케이스

Module
현지의 mHatnote = 요구하다('모듈:모자/샌드박스') -- 테스트할 모듈 현지의 스크리분토 유닛 = 요구하다('모듈:스크리분토 유닛') 현지의 스위트 = 스크리분토 유닛:신규()  기능. 스위트:assert Error(아스텐 에러)(기능하다, ...)  현지의 성공., 결과 = pcall(기능하다, ...)  자신:assert False(거짓)(성공.) 끝.  기능. 스위트:assert Not Equals(주장 없음)(기대됩니다, 실제.)  자신:assert True(참)(기대됩니다 ~= 실제.) 끝.  기능. 스위트:assertParentFrameCallEquals(기대됩니다, 기능하다, args)  args = args 또는 {}  현지의 현재의 = .get Current Frame(전류 프레임)()  현지의 부모 = 현재의:새로운 아이{직함 = '부모', args = args}  현지의 어린아이 = 부모:새로운 아이{직함 = '자녀'}  자신:assert Equals(동일)(기대됩니다, 기능하다(어린아이)) 끝.  기능. 스위트:assert Parent Frame Call 포함(기대됩니다, 기능하다, args)  args = args 또는 {}  현지의 현재의 = .get Current Frame(전류 프레임)()  현지의 부모 = 현재의:새로운 아이{직함 = '부모', args = args}  현지의 어린아이 = 부모:새로운 아이{직함 = '자녀'}  자신:assert String 포함(기대됩니다, 기능하다(어린아이)) 끝.  ------------------------------------------------------------------------------- -- find NamespaceId 테스트 -------------------------------------------------------------------------------  기능. 스위트:test Find Namespace Id입력 오류()     자신:assert Error(아스텐 에러)(mHatnote.find Namespace Id, 9)     자신:assert Error(아스텐 에러)(mHatnote.find Namespace Id)     자신:assert Error(아스텐 에러)(mHatnote.find Namespace Id, 'A 페이지', 9) 끝.  기능. 스위트:test Find Namespace Id Namespace()  자신:assert Equals(동일)(0, mHatnote.find Namespace Id('푸우'))  자신:assert Equals(동일)(2, mHatnote.find Namespace Id('사용자: 예'))  자신:assert Equals(동일)(14, mHatnote.find Namespace Id('카테고리:예')) 끝.  기능. 스위트:testFindNamespaceIdColonRemoval()  자신:assert Equals(동일)(14, mHatnote.find Namespace Id(': 카테고리:예')) 끝.  기능. 스위트:testFindNamespaceIdSkipColonRemoval()  자신:assert Not Equals(주장 없음)(14, mHatnote.find Namespace Id(': 카테고리:예', 거짓의)) 끝.  ------------------------------------------------------------------------------- -- makeWikitextError 테스트 -------------------------------------------------------------------------------  기능. 스위트:testMakeWikitextError()  자신:assert Equals(동일)(   '<strong class="error"> 오류: Foo.//strong>[카테고리:오류가 있는 노트템플릿]템플릿]',   mHatnote.makeWikitext 오류('푸우', 제로, 제로, .직함.신규('예'))  ) 끝.  기능. 스위트:test MakeWikitextErrorHelpLink()  자신:assert Equals(동일)(   '<strong class="error"> 오류:푸우([바 도움말]).</strong>[카테고리:오류가 있는 노트템플릿]템플릿]',   mHatnote.makeWikitext 오류('푸우', '바', 제로, .직함.신규('예'))  ) 끝.  기능. 스위트:test MakeWikitext Error Manual Category Suppression(Wikitext 오류 수동 카테고리 억제)()  자신:assert Equals(동일)(   '<strong class="error"> 오류: Foo.</strong>',   mHatnote.makeWikitext 오류('푸우', 제로, 거짓의, .직함.신규('예'))  ) 끝.  기능. 스위트:test MakeWikitextErrorTalkPageCategorySuppression()  자신:assert Equals(동일)(   '<strong class="error"> 오류: Foo.</strong>',   mHatnote.makeWikitext 오류('푸우', 제로, 제로, .직함.신규('Talk: 예'))  ) 끝.  ------------------------------------------------------------------------------- --해트노트 테스트 -------------------------------------------------------------------------------  기능. 스위트:테스트 해트노트입력 오류()     자신:assert Error(아스텐 에러)(mHatnote._해트노트, 9)     자신:assert Error(아스텐 에러)(mHatnote._해트노트)     자신:assert Error(아스텐 에러)(mHatnote._해트노트, 'A 페이지', 9) 끝.  기능. 스위트:테스트 해트노트()  자신:assert String 포함(   '<div role="note" class="hatnote 탐색%-not%-검색 가능"> Foo </div>,   mHatnote._해트노트('푸우')  ) 끝.  기능. 스위트:test Hatnote Selfref()  자신:assert String 포함(   '<div role="note" class="hatnote 탐색%-not%-searchable selfref"> Foo </div>,   mHatnote._해트노트('푸우', {셀프레프 = 진실의})  ) 끝.  기능. 스위트:테스트 해트노트엑스트라 클래스()  자신:assert String 포함(   '<div role="note" class="해트노트 탐색%-not%-검색 가능 엑스트라 클래스"> Foo </div>,   mHatnote._해트노트('푸우', {체외 = '클래스'})  ) 끝.  기능. 스위트:test Hatnote Entry Point()  자신:assert Parent Frame Call 포함(   '<div role="note" class="hatnote 탐색%-not%-검색 가능"> Foo </div>,   mHatnote.해트노트,   {'푸우'}  ) 끝.  기능. 스위트:test Hatnote Entry Point Selfref()  자신:assert Parent Frame Call 포함(   '<div role="note" class="hatnote 탐색%-not%-searchable selfref"> Foo </div>,   mHatnote.해트노트,   {'푸우', 셀프레프 = '네'}  ) 끝.  기능. 스위트:test Hatnote Entry Point Extra Classes()  자신:assert Parent Frame Call 포함(   '<div role="note" class="해트노트 탐색%-not%-검색 가능 엑스트라 클래스"> Foo </div>,   mHatnote.해트노트,   {'푸우', 체외 = '클래스'}  ) 끝.  돌아가다 스위트