aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-con.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-con.boot')
-rw-r--r--src/interp/br-con.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/br-con.boot b/src/interp/br-con.boot
index 70dee07b..c4e53323 100644
--- a/src/interp/br-con.boot
+++ b/src/interp/br-con.boot
@@ -1053,8 +1053,8 @@ bcUnixTable(u) ==
else htSaySaturn '"&"
htSay '"{"
ft := '("SPAD")
- filename := NAMESTRING findFile(STRINGIMAGE x, ft)
- htMakePage [['text, '"\unixcommand{",PATHNAME_-NAME x, '"}{",
+ filename := filePathString findFile(STRINGIMAGE x, ft)
+ htMakePage [['text, '"\unixcommand{",filePathName x, '"}{",
textEditor(), '" ", filename, '"} "]]
htSay '"}"
htEndTable()