diff --git a/fix_tei.py b/fix_tei.py
index 22057a3..5b8a85c 100644
--- a/fix_tei.py
+++ b/fix_tei.py
@@ -478,11 +478,7 @@ def fix_tei_header(xml_tree, bibfile_string, bibtype):
     eoadevteam = etree.SubElement(project_desc, "p", n="eoadevteam").text = BOILERPLATES.get("Header","eoadevteam")
     encoding_desc.insert(0, project_desc)
 
-    appinfo = encoding_desc.find("t:appInfo", namespaces=NS_MAP)
-    fix_tei_info = etree.Element("application", ident="fix_tei", version=__version__)
-    fix_tei_info.attrib["{http://www.w3.org/XML/1998/namespace}id"] = "fixtei"
-    fix_tei_label = etree.SubElement(fix_tei_info, "label").text = "Fix TEI for EOA"
-    appinfo.insert(-1, fix_tei_info)
+    libeoaconvert.write_appinfo(xml_tree, "fix_tei", __version__, "fixtei", "Fix TEI for EOA", datetime.now().strftime("%Y-%m-%d"))
 
     revision_desc = xml_tree.xpath("//t:revisionDesc", namespaces=NS_MAP)[0]
     olderchanges = revision_desc.find("t:listChange", namespaces=NS_MAP)
diff --git a/libeoaconvert.py b/libeoaconvert.py
index fecea75..ecec712 100644
--- a/libeoaconvert.py
+++ b/libeoaconvert.py
@@ -372,3 +372,15 @@ def assign_xml_id(element, identifier):
 
     return
 # def assign_xml_id ends here
+
+def write_appinfo(xml_tree, ident, version, xmlid, text, date):
+    """Log the change of a TEI document in the appinfo element"""
+
+    appinfo = xml_tree.find("//t:encodingDesc/t:appInfo", namespaces={"t": "http://www.tei-c.org/ns/1.0",})
+    fix_tei_info = etree.Element("application", ident=ident, version=version, when=date)
+    fix_tei_info.attrib["{http://www.w3.org/XML/1998/namespace}id"] = xmlid
+    fix_tei_label = etree.SubElement(fix_tei_info, "label").text = text
+    appinfo.insert(0, fix_tei_info)
+
+    return
+# def write_appinfo ends here