From 02388f26c9ce8e28845166ef29307227fc35f7ce Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Mon, 2 Oct 2023 17:03:18 +1100 Subject: Minor fix: bom-area-parent requires bom-areas --- bom.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'bom.el') diff --git a/bom.el b/bom.el index 710aa4d..1c2b79a 100644 --- a/bom.el +++ b/bom.el @@ -124,7 +124,9 @@ Used as parentfn for hierarchy." "Call BOM API and return hierarchy of VIC areas with forecasts." (let ((areas (hierarchy-new))) (hierarchy-add-trees - bom-area-hierarchy (bom-get-areas (bom-api-vic)) 'bom-area-parent) + bom-area-hierarchy + (setq bom-areas (bom-get-areas (bom-api-vic))) + 'bom-area-parent) (hierarchy-sort bom-area-hierarchy 'bom-area-lessp) areas)) -- cgit v1.2.3