From 33c53a14abe5f6ee3813b19df34486d3de6e02c7 Mon Sep 17 00:00:00 2001
From: Tom Alexander <tom@fizz.buzz>
Date: Mon, 9 Oct 2023 21:32:29 -0400
Subject: [PATCH] Switch back to the old compare heading function until we
 support additional properties.

---
 src/compare/diff.rs | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/src/compare/diff.rs b/src/compare/diff.rs
index 16c62e0..687bda5 100644
--- a/src/compare/diff.rs
+++ b/src/compare/diff.rs
@@ -605,6 +605,8 @@ fn new_compare_heading<'b, 's>(
     let mut child_status = Vec::new();
     let mut message = None;
 
+    // TODO: This needs to support additional properties from the property drawer
+
     compare_children(
         source,
         emacs,
@@ -684,17 +686,17 @@ fn new_compare_heading<'b, 's>(
             compare_property_boolean
         ),
         (
-            EmacsField::Required(":scheduled"),
+            EmacsField::Optional(":scheduled"),
             |r| r.scheduled.as_ref(),
             compare_property_single_ast_node
         ),
         (
-            EmacsField::Required(":deadline"),
+            EmacsField::Optional(":deadline"),
             |r| r.deadline.as_ref(),
             compare_property_single_ast_node
         ),
         (
-            EmacsField::Required(":closed"),
+            EmacsField::Optional(":closed"),
             |r| r.closed.as_ref(),
             compare_property_single_ast_node
         ),