diff options
author | Bill Page <bill.page@newsynthesis.org> | 2008-05-30 00:22:15 +0000 |
---|---|---|
committer | Bill Page <bill.page@newsynthesis.org> | 2008-05-30 00:22:15 +0000 |
commit | 80f04bfc96aa07a99eadc794b3ed4d276410a086 (patch) | |
tree | 6853557e540fd1eefed913b28c4cf7059a0cb661 | |
parent | 54a6b006a39fd52cb0110e4ae3e2cec8e2708ec6 (diff) | |
download | open-axiom-80f04bfc96aa07a99eadc794b3ed4d276410a086.tar.gz |
Fix typo in getConstructorKindFromDB
-rw-r--r-- | src/interp/i-syscmd.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-syscmd.boot b/src/interp/i-syscmd.boot index cd46b09b..0c7d6258 100644 --- a/src/interp/i-syscmd.boot +++ b/src/interp/i-syscmd.boot @@ -1111,7 +1111,7 @@ displayValue($op,u,omitVariableNameIfTrue) == STRCONC('"Value of ", PNAME $op,'": ") labmode := prefix2String objMode(u) if ATOM labmode then labmode := [labmode] - getConstructorKindDB expr = "domain" => + getConstructorKindFromDB expr = "domain" => sayMSG concat('" ",label,labmode,rhs,form2String expr) mathprint ['CONCAT,label,:labmode,rhs, outputFormat(expr,objMode(u))] |