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 f8413bfa..064060d3 100644
--- a/src/interp/br-con.boot
+++ b/src/interp/br-con.boot
@@ -1126,9 +1126,9 @@ dbConsHeading(htPage,conlist,view,kind) ==
nil
heading := [:prefix,:placepart]
connective :=
- member(view,'(abbrs files kinds)) => '" as "
+ view in '(abbrs files kinds) => '" as "
'" with "
- if count ~= 0 and member(view,'(abbrs files parameters conditions)) then heading:= [:heading,'" viewed",connective,'"{\em ",STRINGIMAGE view,'"}"]
+ if count ~= 0 and view in '(abbrs files parameters conditions) then heading:= [:heading,'" viewed",connective,'"{\em ",STRINGIMAGE view,'"}"]
heading
dbShowConstructorLines lines ==