metanorma-cli 1.3.3.1 → 1.3.4

data/gems/ruby/2.6.0/gems/metanorma-iec-1.2.1/spec/isodoc/terms_spec.rb

@@ -0,0 +1,193 @@
+require "spec_helper"
+
+RSpec.describe IsoDoc do
+  it "processes IsoXML terms" do
+    input = <<~INPUT
+    <iso-standard xmlns="http://riboseinc.com/isoxml">
+    <sections>
+    <terms id="_terms_and_definitions" obligation="normative"><title>Terms and definitions</title>
+
+<term id="paddy1"><preferred>paddy</preferred>
+<domain>rice</domain>
+<definition><p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">rice retaining its husk after threshing</p></definition>
+<termexample id="_bd57bbf1-f948-4bae-b0ce-73c00431f892">
+  <p id="_65c9a509-9a89-4b54-a890-274126aeb55c">Foreign seeds, husks, bran, sand, dust.</p>
+  <ul>
+  <li>A</li>
+  </ul>
+</termexample>
+<termexample id="_bd57bbf1-f948-4bae-b0ce-73c00431f894">
+  <ul>
+  <li>A</li>
+  </ul>
+</termexample>
+
+<termsource status="modified">
+  <origin bibitemid="ISO7301" type="inline" citeas="ISO 7301:2011"><locality type="clause"><referenceFrom>3.1</referenceFrom></locality>ISO 7301:2011, 3.1</origin>
+    <modification>
+    <p id="_e73a417d-ad39-417d-a4c8-20e4e2529489">The term "cargo rice" is shown as deprecated, and Note 1 to entry is not included here</p>
+  </modification>
+</termsource></term>
+
+<term id="paddy">
+<preferred>paddy</preferred><admitted>paddy rice</admitted>
+<admitted>rough rice</admitted>
+<deprecates>cargo rice</deprecates>
+<definition><p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">rice retaining its husk after threshing</p></definition>
+<termnote id="_671a1994-4783-40d0-bc81-987d06ffb74e">
+  <p id="_19830f33-e46c-42cc-94ca-a5ef101132d5">The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p>
+</termnote>
+<termnote id="_671a1994-4783-40d0-bc81-987d06ffb74f">
+<ul><li>A</li></ul>
+  <p id="_19830f33-e46c-42cc-94ca-a5ef101132d5">The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p>
+</termnote>
+<termexample id="_bd57bbf1-f948-4bae-b0ce-73c00431f893">
+  <ul>
+  <li>A</li>
+  </ul>
+</termexample>
+<termsource status="identical">
+  <origin bibitemid="ISO7301" type="inline" citeas="ISO 7301:2011"><locality type="clause"><referenceFrom>3.1</referenceFrom></locality>ISO 7301:2011, 3.1</origin>
+</termsource></term>
+</terms>
+</sections>
+</iso-standard>
+    INPUT
+    presxml = <<~INPUT
+    <iso-standard xmlns="http://riboseinc.com/isoxml">
+    <sections>
+    <terms id="_terms_and_definitions" obligation="normative"><title depth="1">1<tab/>Terms and definitions</title>
+
+<term id="paddy1">
+<name>1.1</name><preferred>paddy</preferred>
+<domain>rice</domain>
+<definition><p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">rice retaining its husk after threshing</p></definition>
+<termexample id="_bd57bbf1-f948-4bae-b0ce-73c00431f892">
+<name>EXAMPLE 1</name>
+  <p id="_65c9a509-9a89-4b54-a890-274126aeb55c">Foreign seeds, husks, bran, sand, dust.</p>
+  <ul>
+  <li>A</li>
+  </ul>
+</termexample>
+<termexample id="_bd57bbf1-f948-4bae-b0ce-73c00431f894">
+<name>EXAMPLE 2</name>
+  <ul>
+  <li>A</li>
+  </ul>
+</termexample>
+
+<termsource status="modified">
+  <origin bibitemid="ISO7301" type="inline" citeas="ISO 7301:2011"><locality type="clause"><referenceFrom>3.1</referenceFrom></locality>ISO 7301:2011, 3.1</origin>
+    <modification>
+    <p id="_e73a417d-ad39-417d-a4c8-20e4e2529489">The term "cargo rice" is shown as deprecated, and Note 1 to entry is not included here</p>
+  </modification>
+</termsource></term>
+
+<term id="paddy">
+<name>1.2</name>
+<preferred>paddy</preferred><admitted>paddy rice</admitted>
+<admitted>rough rice</admitted>
+<deprecates>cargo rice</deprecates>
+<definition><p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">rice retaining its husk after threshing</p></definition>
+<termnote id="_671a1994-4783-40d0-bc81-987d06ffb74e">
+<name>Note 1 to entry</name>
+  <p id="_19830f33-e46c-42cc-94ca-a5ef101132d5">The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p>
+</termnote>
+<termnote id="_671a1994-4783-40d0-bc81-987d06ffb74f">
+<name>Note 2 to entry</name>
+<ul><li>A</li></ul>
+  <p id="_19830f33-e46c-42cc-94ca-a5ef101132d5">The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p>
+</termnote>
+<termexample id="_bd57bbf1-f948-4bae-b0ce-73c00431f893">
+<name>EXAMPLE</name>
+  <ul>
+  <li>A</li>
+  </ul>
+</termexample>
+<termsource status="identical">
+  <origin bibitemid="ISO7301" type="inline" citeas="ISO 7301:2011"><locality type="clause"><referenceFrom>3.1</referenceFrom></locality>ISO 7301:2011, 3.1</origin>
+</termsource></term>
+</terms>
+</sections>
+</iso-standard>
+    INPUT
+    html = <<~OUTPUT
+    #{HTML_HDR}
+    <div id="">
+        <h1 class="ForewordTitle">FOREWORD</h1>
+        <div class="boilerplate_legal"/>
+        </div>
+        #{IEC_TITLE1}
+             <div id="_terms_and_definitions"><h1>1&#160; Terms and definitions</h1>
+       <p class="TermNum" id="paddy1">1.1</p><p class="Terms" style="text-align:left;">paddy</p>
+
+       <p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">&lt;rice&gt; rice retaining its husk after threshing</p>
+       <div id="_bd57bbf1-f948-4bae-b0ce-73c00431f892" class="example"><p><span class="example_label">EXAMPLE 1</span>&#160; Foreign seeds, husks, bran, sand, dust.</p><ul>
+         <li>A</li>
+         </ul></div>
+       <div id="_bd57bbf1-f948-4bae-b0ce-73c00431f894" class="example"><p><span class="example_label">EXAMPLE 2</span>&#160; </p>
+         <ul>
+         <li>A</li>
+         </ul>
+       </div>
+
+       <p>[TERMREF]
+         <a href="#ISO7301">ISO 7301:2011, 3.1</a>
+           [MODIFICATION]The term "cargo rice" is shown as deprecated, and Note 1 to entry is not included here
+       [/TERMREF]</p><p class="TermNum" id="paddy">1.2</p><p class="Terms" style="text-align:left;">paddy</p><p class="AltTerms" style="text-align:left;">paddy rice</p>
+       <p class="AltTerms" style="text-align:left;">rough rice</p>
+       <p class="DeprecatedTerms" style="text-align:left;">DEPRECATED: cargo rice</p>
+       <p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">rice retaining its husk after threshing</p>
+       <div id="_bd57bbf1-f948-4bae-b0ce-73c00431f893" class="example"><p><span class="example_label">EXAMPLE</span>&#160; </p>
+         <ul>
+         <li>A</li>
+         </ul>
+       </div>
+       <div id="_671a1994-4783-40d0-bc81-987d06ffb74e" class="Note"><p>Note 1 to entry: The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p></div>
+       <div id='_671a1994-4783-40d0-bc81-987d06ffb74f' class="Note"><p>Note 2 to entry: <ul><li>A</li></ul><p id="_19830f33-e46c-42cc-94ca-a5ef101132d5">The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p></p></div>
+       <p>[TERMREF]
+         <a href="#ISO7301">ISO 7301:2011, 3.1</a>
+       [/TERMREF]</p></div>
+           </div>
+         </body>
+       </html>
+OUTPUT
+  
+    word = <<~OUTPUT
+    <div id="_terms_and_definitions"><h1>1<span style="mso-tab-count:1">&#160; </span>Terms and definitions</h1><p class="TermNum" id="paddy1">1.1</p><p class="Terms" style="text-align:left;">paddy</p>
+
+       <p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">&lt;rice&gt; rice retaining its husk after threshing</p>
+       <div id="_bd57bbf1-f948-4bae-b0ce-73c00431f892" class="example"><p><span class="example_label">EXAMPLE 1</span><span style="mso-tab-count:1">&#160; </span>Foreign seeds, husks, bran, sand, dust.</p><ul>
+         <li>A</li>
+         </ul></div>
+       <div id="_bd57bbf1-f948-4bae-b0ce-73c00431f894" class="example"><p><span class="example_label">EXAMPLE 2</span><span style="mso-tab-count:1">&#160; </span></p>
+
+         <ul>
+         <li>A</li>
+         </ul>
+       </div>
+
+       <p>[TERMREF]
+         <a href="#ISO7301">ISO 7301:2011, 3.1</a>
+           [MODIFICATION]The term "cargo rice" is shown as deprecated, and Note 1 to entry is not included here
+       [/TERMREF]</p><p class="TermNum" id="paddy">1.2</p><p class="Terms" style="text-align:left;">paddy</p><p class="AltTerms" style="text-align:left;">paddy rice</p>
+       <p class="AltTerms" style="text-align:left;">rough rice</p>
+       <p class="DeprecatedTerms" style="text-align:left;">DEPRECATED: cargo rice</p>
+       <p id="_eb29b35e-123e-4d1c-b50b-2714d41e747f">rice retaining its husk after threshing</p><div id="_bd57bbf1-f948-4bae-b0ce-73c00431f893" class="example"><p><span class="example_label">EXAMPLE</span><span style="mso-tab-count:1">&#160; </span></p>
+
+         <ul>
+         <li>A</li>
+         </ul>
+       </div><div id="_671a1994-4783-40d0-bc81-987d06ffb74e" class="Note"><p class="Note">Note 1 to entry: The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p></div><div id="_671a1994-4783-40d0-bc81-987d06ffb74f" class="Note"><p class="Note">Note 2 to entry: <ul><li>A</li></ul><p id="_19830f33-e46c-42cc-94ca-a5ef101132d5">The starch of waxy rice consists almost entirely of amylopectin. The kernels have a tendency to stick together after cooking.</p></p></div>
+
+
+
+       <p>[TERMREF]
+         <a href="#ISO7301">ISO 7301:2011, 3.1</a>
+       [/TERMREF]</p></div>
+OUTPUT
+    expect(xmlpp(IsoDoc::Iec::PresentationXMLConvert.new({}).convert("test", input, true))).to be_equivalent_to xmlpp(presxml)
+    expect(xmlpp(IsoDoc::Iec::HtmlConvert.new({}).convert("test", presxml, true))).to be_equivalent_to xmlpp(html)
+    expect(xmlpp(IsoDoc::Iec::WordConvert.new({}).convert("test", presxml, true).sub(%r{^.*<div id="_terms_and_definitions">}m, '<div id="_terms_and_definitions">').sub(%r{</div>\s*<br[^>]*>\s*<div class="colophon"/>.*$}m, ""))).to be_equivalent_to xmlpp(word)
+  end
+end

data/gems/ruby/2.6.0/gems/metanorma-iec-1.2.1/spec/metanorma/processor_spec.rb

@@ -0,0 +1,76 @@
+require "spec_helper"
+require "metanorma"
+require "fileutils"
+
+#RSpec.describe Asciidoctor::Gb do
+RSpec.describe Metanorma::Iec::Processor do
+
+  registry = Metanorma::Registry.instance
+  registry.register(Metanorma::Iec::Processor)
+  processor = registry.find_processor(:iec)
+
+  it "registers against metanorma" do
+    expect(processor).not_to be nil
+  end
+
+  it "registers output formats against metanorma" do
+    expect(processor.output_formats.sort.to_s).to be_equivalent_to <<~"OUTPUT"
+    [[:doc, "doc"], [:html, "html"], [:pdf, "pdf"], [:presentation, "presentation.xml"], [:rxl, "rxl"], [:xml, "xml"]]
+    OUTPUT
+  end
+
+  it "registers version against metanorma" do
+    expect(processor.version.to_s).to match(%r{^Metanorma::Iec })
+  end
+
+  it "generates IsoDoc XML from a blank document" do
+    expect(xmlpp(strip_guid(processor.input_to_isodoc(<<~"INPUT", nil)))).to be_equivalent_to xmlpp(<<~"OUTPUT")
+    #{ASCIIDOC_BLANK_HDR}
+    INPUT
+    #{BLANK_HDR}
+<sections/>
+</iec-standard>
+    OUTPUT
+  end
+
+  it "generates HTML from IsoDoc XML" do
+    FileUtils.rm_f "test.xml"
+    processor.output(<<~"INPUT", "test.xml", "test.html", :html)
+               <iec-standard xmlns="http://riboseinc.com/isoxml">
+       <sections>
+       <terms id="H" obligation="normative"><title>1<tab/>Terms, Definitions, Symbols and Abbreviated Terms</title>
+         <term id="J">
+         <name>1.1</name>
+         <preferred>Term2</preferred>
+       </term>
+        </terms>
+        </sections>
+        </iec-standard>
+    INPUT
+    expect(xmlpp(File.read("test.html", encoding: "utf-8").gsub(%r{^.*<main}m, "<main").gsub(%r{</main>.*}m, "</main>"))).to be_equivalent_to xmlpp(<<~"OUTPUT")
+           <main class="main-section"><button onclick="topFunction()" id="myBtn" title="Go to top">Top</button>
+              <br />
+ <p class="zzSTDTitle1">INTERNATIONAL ELECTROTECHNICAL COMMISSION</p>
+ <p class="zzSTDTitle1">____________</p>
+ <p class="zzSTDTitle1">&#xA0;</p>
+ <p class="zzSTDTitle1">
+   <b></b>
+ </p>
+ <p class="zzSTDTitle1">&#xA0;</p>
+ <div id="">
+   <h1 class="ForewordTitle" id="toc0">FOREWORD</h1>
+   <div class="boilerplate_legal"></div>
+ </div>
+ <p class="zzSTDTitle1">
+   <b></b>
+ </p>
+ <p class="zzSTDTitle1">&#xA0;</p>
+             <div id="H"><h1 id="toc1">1&#xA0; Terms, Definitions, Symbols and Abbreviated Terms</h1>
+       <h2 class="TermNum" id="J">1.1</h2>
+         <p class="Terms" style="text-align:left;">Term2</p>
+       </div>
+           </main>
+    OUTPUT
+  end
+
+end

data/gems/ruby/2.6.0/gems/metanorma-iec-1.2.1/spec/spec_helper.rb

@@ -0,0 +1,296 @@
+require "simplecov"
+SimpleCov.start do
+  add_filter "/spec/"
+end
+
+require "bundler/setup"
+require "asciidoctor"
+require "metanorma-iec"
+require "rspec/matchers"
+require "equivalent-xml"
+require "metanorma"
+require "metanorma/iec"
+require "iev"
+require "rexml/document"
+
+RSpec.configure do |config|
+  # Enable flags like --only-failures and --next-failure
+  config.example_status_persistence_file_path = ".rspec_status"
+
+  # Disable RSpec exposing methods globally on `Module` and `main`
+  config.disable_monkey_patching!
+
+  config.expect_with :rspec do |c|
+    c.syntax = :expect
+  end
+end
+
+def strip_guid(x)
+  x.gsub(%r{ id="_[^"]+"}, ' id="_"').gsub(%r{ target="_[^"]+"}, ' target="_"')
+end
+
+def xmlpp(x)
+  s = ""
+  f = REXML::Formatters::Pretty.new(2)
+  f.compact = true
+  f.write(REXML::Document.new(x),s)
+  s
+end
+
+ASCIIDOC_BLANK_HDR = <<~"HDR"
+      = Document title
+      Author
+      :docfile: test.adoc
+      :nodoc:
+      :novalid:
+      :no-isobib:
+
+HDR
+
+ISOBIB_BLANK_HDR = <<~"HDR"
+      = Document title
+      Author
+      :docfile: test.adoc
+      :nodoc:
+      :novalid:
+      :no-isobib-cache:
+
+HDR
+
+FLUSH_CACHE_ISOBIB_BLANK_HDR = <<~"HDR"
+      = Document title
+      Author
+      :docfile: test.adoc
+      :nodoc:
+      :novalid:
+      :flush-caches:
+
+HDR
+
+CACHED_ISOBIB_BLANK_HDR = <<~"HDR"
+      = Document title
+      Author
+      :docfile: test.adoc
+      :nodoc:
+      :novalid:
+
+HDR
+
+LOCAL_CACHED_ISOBIB_BLANK_HDR = <<~"HDR"
+      = Document title
+      Author
+      :docfile: test.adoc
+      :nodoc:
+      :novalid:
+      :local-cache:
+
+HDR
+
+VALIDATING_BLANK_HDR = <<~"HDR"
+      = Document title
+      Author
+      :docfile: test.adoc
+      :nodoc:
+      :no-isobib:
+
+HDR
+
+TERMS_BOILERPLATE = <<~"BOILERPLATE"
+       <p id="_">ISO and IEC maintain terminological databases for use in
+       standardization at the following addresses:</p>
+       
+        <ul id="_">
+        <li> <p id="_">IEC Electropedia: available at
+        <link target="http://www.electropedia.org"/>
+        </p> </li> 
+                <li> <p id="_">ISO Online browsing platform: available at
+          <link target="http://www.iso.org/obp"/></p> </li>
+</ul>
+BOILERPLATE
+
+BOILERPLATE =
+  HTMLEntities.new.decode(
+  File.read(File.join(File.dirname(__FILE__), "..", "lib", "asciidoctor", "iec", "iec_intro_en.xml"), encoding: "utf-8").
+  gsub(/\{\{ agency \}\}/, "IEC").gsub(/\{\{ docyear \}\}/, Date.today.year.to_s).
+  gsub(/\{% if unpublished %\}.*\{% endif %\}/m, "").
+  gsub(/(?<=\p{Alnum})'(?=\p{Alpha})/, "’").
+  gsub(/<p>/, "<p id='_'>").
+  gsub(/<ol>/, "<ol id='_'>")
+)
+
+BOILERPLATE_LICENSE = <<~END
+<license-statement>
+  <clause>
+    <title>Warning for CDs, CDVs and FDISs</title>
+    <p id='_'>
+      This document is not an IEC International Standard. It is distributed
+      for review and comment. It is subject to change without notice and may
+      not be referred to as an International Standard.
+    </p>
+    <p id='_'>
+      Recipients of this draft are invited to submit, with their comments,
+      notification of any relevant patent rights of which they are aware and
+      to provide supporting documentation.
+    </p>
+  </clause>
+</license-statement>
+END
+
+UNPUBLISHED_BOILERPLATE = BOILERPLATE.sub(/<\/boilerplate>/, "#{BOILERPLATE_LICENSE}</boilerplate>")
+
+
+BLANK_HDR = <<~"HDR"
+<?xml version="1.0" encoding="UTF-8"?>
+<iec-standard xmlns="https://www.metanorma.org/ns/iec">
+<bibdata type="standard">
+  <contributor>
+    <role type="author"/>
+    <organization>
+      <name>International Electrotechnical Commission</name>
+      <abbreviation>IEC</abbreviation>
+    </organization>
+  </contributor>
+  <contributor>
+    <role type="publisher"/>
+    <organization>
+      <name>International Electrotechnical Commission</name>
+      <abbreviation>IEC</abbreviation>
+    </organization>
+  </contributor>
+  <language>en</language>
+  <script>Latn</script>
+  <status>
+    <stage abbreviation="PPUB">60</stage>
+    <substage abbreviation="PPUB">60</substage>
+  </status>
+  <copyright>
+    <from>#{Time.new.year}</from>
+    <owner>
+      <organization>
+        <name>International Electrotechnical Commission</name>
+        <abbreviation>IEC</abbreviation>
+      </organization>
+    </owner>
+  </copyright>
+  <ext>
+    <doctype>article</doctype>
+  <editorialgroup>
+    <technical-committee/>
+    <subcommittee/>
+    <workgroup/>
+  </editorialgroup>
+  <stagename>International standard</stagename>
+  </ext>
+</bibdata>
+#{BOILERPLATE}
+HDR
+
+IEC_TITLE = <<~END
+ <p class="zzSTDTitle1">INTERNATIONAL ELECTROTECHNICAL COMMISSION</p>
+             <p class="zzSTDTitle1">____________</p>
+             <p class="zzSTDTitle1">&#160;</p>
+             <p class="zzSTDTitle1">
+               <b/>
+             </p>
+             <p class="zzSTDTitle1">&#160;</p>
+END
+
+IEC_TITLE1 = <<~END
+             <p class="zzSTDTitle1">
+               <b/>
+             </p>
+             <p class="zzSTDTitle1">&#160;</p>
+END
+
+HTML_HDR = <<~END
+        <html xmlns:epub="http://www.idpf.org/2007/ops" lang="en">
+          <head/>
+          <body lang="en">
+            <div class="title-section">
+              <p>&#160;</p>
+            </div>
+            <br/>
+            <div class="prefatory-section">
+              <p>&#160;</p>
+            </div>
+            <br/>
+            <div class="main-section">
+             <br/>
+             #{IEC_TITLE}
+END
+
+WORD_HDR = <<~END
+       <html xmlns:epub="http://www.idpf.org/2007/ops">
+          <head>
+            <title>test</title>
+          </head>
+         <body lang="EN-US" link="blue" vlink="#954F72">
+           <div class="WordSection1">
+             <p>&#160;</p>
+           </div>
+           <p><br clear="all" class="section"/></p>
+           <div class="WordSection2">
+             <p>&#160;</p>
+           </div>
+           <p><br clear="all" class="section"/></p>
+           <div class="WordSection3">
+END
+
+
+def stub_fetch_ref(**opts)
+  xml = ""
+
+  hit = double("hit")
+  expect(hit).to receive(:"[]").with("title") do
+    Nokogiri::XML(xml).at("//docidentifier").content
+  end.at_least(:once)
+
+  hit_instance = double("hit_instance")
+  expect(hit_instance).to receive(:hit).and_return(hit).at_least(:once)
+  expect(hit_instance).to receive(:to_xml) do |builder, opt|
+    expect(builder).to be_instance_of Nokogiri::XML::Builder
+    expect(opt).to eq opts
+    builder << xml
+  end.at_least :once
+
+  hit_page = double("hit_page")
+  expect(hit_page).to receive(:first).and_return(hit_instance).at_least :once
+
+  hit_pages = double("hit_pages")
+  expect(hit_pages).to receive(:first).and_return(hit_page).at_least :once
+
+  expect(Isobib::IsoBibliography).to receive(:search).
+    and_wrap_original do |search, *args|
+    code = args[0]
+    expect(code).to be_instance_of String
+    xml = get_xml(search, code, opts)
+    hit_pages
+  end.at_least :once
+end
+
+private
+
+def get_xml(search, code, opts)
+  c = code.gsub(%r{[\/\s:-]}, "_").sub(%r{_+$}, "").downcase
+  o = opts.keys.join "_"
+  file = "spec/examples/#{[c, o].join '_'}.xml"
+  if File.exist? file
+    File.read file
+  else
+    result = search.call(code)
+    hit = result&.first&.first
+    xml = hit.to_xml nil, opts
+    File.write file, xml
+    xml
+  end
+end
+
+def mock_open_uri(code)
+  #expect(OpenURI).to receive(:open_uri).and_wrap_original do |m, *args|
+  expect(Iev).to receive(:get).with(code, "en") do |m, *args|
+    file = "spec/examples/#{code.tr('-', '_')}.html"
+    File.write file, m.call(*args).read unless File.exist? file
+    File.read file
+  end.at_least :once
+end
+