File 0002-Allow-to-override-pdmp-base.patch of Package emacs
From 0000000000000000000000000000000000000000 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Bidar?= <bjorn.bidar@thaodan.de>
Date: Fri, 10 Feb 2023 23:31:35 +0200
Subject: [PATCH] Allow to override pdmp base
---
src/emacs.c | 8 ++++++++
1 file changed, 8 insertions(+)
diff --git a/src/emacs.c b/src/emacs.c
index 1cb1e70ac65eb773cba64d809b0b91a7a1473bc4..e3f629edcc419ef203953197284776abe974ccb9 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -915,11 +915,15 @@ load_pdump (int argc, char **argv, char *dump_file)
NULL
#endif
;
+#ifdef PDMP_BASE
+ const char *argv0_base = PDMP_BASE
+#else
const char *argv0_base =
#ifdef NS_SELF_CONTAINED
"Emacs"
#else
"emacs"
+#endif
#endif
;
@@ -1060,7 +1064,11 @@ load_pdump (int argc, char **argv, char *dump_file)
if (IS_DIRECTORY_SEP (*p))
last_sep = p;
}
+#ifdef PDMP_BASE
+ argv0_base = PDMP_BASE;
+#else
argv0_base = last_sep ? last_sep + 1 : argv[0];
+#endif
ptrdiff_t needed = (strlen (path_exec)
+ 1
+ strlen (argv0_base)
