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 a7afc084..05a0b57c 100644
--- a/src/interp/br-con.boot
+++ b/src/interp/br-con.boot
@@ -768,7 +768,7 @@ conOpPage1(conform,:options) ==
htpSetProperty(page,'domname,domname) --> !!note!! <--
htpSetProperty(page,'conform,conform)
htpSetProperty(page,'signature,signature)
- if selectedOperation := LASSOC('selectedOperation,IFCDR options) then
+ if selectedOperation := symbolLAssoc('selectedOperation,IFCDR options) then
htpSetProperty(page,'selectedOperation,selectedOperation)
for [a,:b] in bindingsAlist repeat htpSetProperty(page,a,b)
koPage(page,'"operation")
@@ -1076,7 +1076,7 @@ dbShowConsDoc1(htPage,conform,indexOrNil) ==
--NOTE that we pass conform is as "origin"
getConstructorDocumentation conname ==
- LASSOC('constructor,getConstructorDocumentationFromDB conname)
+ symbolLassoc('constructor,getConstructorDocumentationFromDB conname)
is [[nil,line,:.],:.] and line or '""
dbSelectCon(htPage,which,index) ==