fix(calendar): default to current time when switching to time input

Fixes #883

Author: kristijanhusak

lua/orgmode/objects/calendar.lua

@@ -632,7 +632,9 @@ end
 
 function Calendar:set_time()
   self.date = self:get_selected_date()
-  self.date = self.date:set({ date_only = false })
+  if self.date.date_only then
+    self.date = self.date:set({ date_only = false }):set_current_time()
+  end
   --self:rerender_time()
   self:set_sel_hour()
   self:render() -- because we want to highlight the currently selected date, we have to render everything

lua/orgmode/objects/date.lua

@@ -983,6 +983,14 @@ function OrgDate:set_todays_date()
   })
 end
 
+function OrgDate:set_current_time()
+  local time = os_date(os.time())
+  return self:set({
+    hour = tonumber(time.hour) or 0,
+    min = tonumber(time.min) or 0,
+  })
+end
+
 ---@return OrgDate
 function OrgDate:apply_repeater()
   local repeater = self:get_repeater()