From 17b9cec51b018c60c3a9f4490eab8abeff397453 Mon Sep 17 00:00:00 2001
From: nadrad <me@nader.pm>
Date: Wed, 19 Apr 2023 17:22:49 +0200
Subject: [PATCH] name fix for non-existing filename as argument

---
 h-m-m | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/h-m-m b/h-m-m
index 29a0568..8837262 100755
--- a/h-m-m
+++ b/h-m-m
@@ -470,7 +470,6 @@ function load_file(&$mm)
 		$lines = file($mm['filename'], FILE_IGNORE_NEW_LINES | FILE_SKIP_EMPTY_LINES);
 	else
 	{
-		unset($mm['filename']);
 		load_empty_map($mm);
 		return;
 	}
@@ -2528,9 +2527,13 @@ function load_empty_map(&$mm)
 		]
 	;
 
+	$title = basename( $mm['filename'] ?? 'root' );
+	if (substr($title,-4)=='.hmm')
+		$title = substr($title,0,-4);
+
 	$mm['nodes'][1] =
 		[
-			'title'=> basename( $mm['filename'] ?? 'root' )
+			'title'=> $title
 			,'is_leaf'=>true
 			,'children'=>[]
 			,'collapsed'=>false