aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-syscmd.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-05-29 02:28:09 +0000
committerdos-reis <gdr@axiomatics.org>2011-05-29 02:28:09 +0000
commitc220d4d9a44a3828d96e55b1b1a0756d3acea9fe (patch)
tree095a41566dc0299676d32d7c9068d9b0e392652d /src/interp/i-syscmd.boot
parent05f1dbf1e8564c316a4e0ed7146b4991162f8875 (diff)
downloadopen-axiom-c220d4d9a44a3828d96e55b1b1a0756d3acea9fe.tar.gz
* interp/sys-utility.boot (displayTextFile): New.
* interp/i-syscmd.boot (summary): Use it. (copyright): Likewise. * algebra/net.spad.pamphlet: Replace closeFile with closeStream. * boot/translator.boot: Likewise. * interp/as.boot: Likewise. * interp/ax.boot: Likewise. * interp/br-saturn.boot: Likewise. * interp/br-search.boot: Likewise.
Diffstat (limited to 'src/interp/i-syscmd.boot')
-rw-r--r--src/interp/i-syscmd.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-syscmd.boot b/src/interp/i-syscmd.boot
index a9ed2364..1e995c05 100644
--- a/src/interp/i-syscmd.boot
+++ b/src/interp/i-syscmd.boot
@@ -877,10 +877,10 @@ withAsharpCmd args ==
--% )copyright -- display copyright notice
summary l ==
- runCommand strconc('"cat _"", systemRootDirectory(),'"/lib/summary_"")
+ displayTextFile strconc(systemRootDirectory(),'"/lib/summary")
copyright () ==
- runCommand strconc('"cat _"", systemRootDirectory(),'"/lib/copyright_"")
+ displayTextFile strconc(systemRootDirectory(),'"/lib/copyright")
--% )credits -- display credit list