From c1f3675dc5616f25698dbc4cd712495bcf3fc6ac Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Mon, 22 Jul 2019 07:42:49 -0700
Subject: doc: eliminate example uses of obsolete txr-path.

* txr.1: In the --args example, don't use txr-path, but
txr-exe-path. Also, path-cat instead of plain string
catenation. The example for save-exe was additionally doing
something wrong: taking the dir-name of txr-path, which would
calculate the parent of the executable directory. This example
is harmonized with the --args one.
---
 txr.1 | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/txr.1 b/txr.1
index 451bccf8..3086fefe 100644
--- a/txr.1
+++ b/txr.1
@@ -68620,7 +68620,7 @@ executable can then be edited so that the data area which follows the
 bytes contains the following string:
 
 .verb
-  --args|-e|(load `@{txr-path}main.tl`)
+  --args|-e|(load (path-cat (dir-name txr-exe-path) "main.tl"))
 .brev
 
 When the
@@ -68718,8 +68718,9 @@ which will load a file called
 that is located in the same directory.
 
 .verb
-  (save-exe "myapp"
-            "--args|-e|(load `@(dir-name txr-path)/main.tl`)")
+  (save-exe
+    "myapp"
+    "--args|-e|(load (path-cat (dir-name txr-exe-path) \e"main.tl\e"))")
 .brev
 
 .SH* DEBUGGER
-- 
cgit v1.2.3