aboutsummaryrefslogtreecommitdiff
path: root/src/interp/pspad2.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/pspad2.boot')
-rw-r--r--src/interp/pspad2.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/pspad2.boot b/src/interp/pspad2.boot
index 92c84b2a..bd514f50 100644
--- a/src/interp/pspad2.boot
+++ b/src/interp/pspad2.boot
@@ -209,7 +209,7 @@ formatCategory ['Category] == format " " and format "Category"
formatCATEGORY cat ==
con := opOf $form
- $comments: local := SUBST('_$,'_%,GETDATABASE(con,'DOCUMENTATION))
+ $comments: local := SUBST('_$,'_%,getConstructorDocumentationFromDB con)
$insideEXPORTS : local := true
format ["with",formatDeftranCategory cat]
@@ -290,7 +290,7 @@ formatColon [":",a,b] ==
formatColonWith(form,a,b) ==
con := opOf $form
- $comments: local := SUBST('_$,'_%,GETDATABASE(con,'DOCUMENTATION))
+ $comments: local := SUBST('_$,'_%,getConstructorDocumentationFromDB con)
$insideEXPORTS : local := true
$pilesAreOkHere: local := true
$insideTypeExpression : local := false