listener: regression: txr bails when .txr-profile missing.

* parser.c (load_rcfile): When neither ~/.txr-profile nor ~/.txr_profile
exist, then bail. Do not pass nil to abs-path-p and other functions.

1 files changed, 3 insertions, 0 deletions

diff --git a/parser.c b/parser.c
index e60166cc..ba236e65 100644
--- a/parser.c
+++ b/parser.c
@@ -1040,6 +1040,9 @@ static void load_rcfile(val home, val pexist_s, val psafe_s, val ppriv_s)
                  if2(funcall1(pexist_s, try2), try2));
   val resolved_name = name;
 
+  if (!name)
+    return;
+
   if (!funcall1(psafe_s, name)) {
     report_path_perm_problem(name);
     return;