diff options
Diffstat (limited to 'src/interp/br-con.boot')
| -rw-r--r-- | src/interp/br-con.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-con.boot b/src/interp/br-con.boot index 53a0e927..7789d71b 100644 --- a/src/interp/br-con.boot +++ b/src/interp/br-con.boot @@ -992,7 +992,7 @@ dbShowCons1(htPage,cAlist,key) == bcUnixTable(listSort(function GLESSEQP,REMDUP flist)) key = 'documentation => dbShowConsDoc(page,conlist) if $exposedOnlyIfTrue then - cAlist := [x for x in cAlist | isExposedConstructor opOf CAR x] + cAlist := [x for x in cAlist | isExposedConstructor opOf first x] key = 'conditions => dbShowConditions(page,cAlist,kind) key = 'parameters => bcConTable REMDUP ASSOCLEFT cAlist key = 'kinds => dbShowConsKinds cAlist |