aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-saturn.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-saturn.boot')
-rw-r--r--src/interp/br-saturn.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot
index 21813a35..19a97e23 100644
--- a/src/interp/br-saturn.boot
+++ b/src/interp/br-saturn.boot
@@ -741,7 +741,7 @@ kPageContextMenuSaturn page ==
saturnExampleLink lname ==
htSay '"\docLink{\csname "
- htSay STRCONC(first(rest(lname)), '"\endcsname}{E&xamples}")
+ htSay STRCONC(second lname, '"\endcsname}{E&xamples}")
$exampleConstructors := nil
@@ -1380,7 +1380,7 @@ displayDomainOp(htPage,which,origin,op,sig,predicate,
htSaySaturnAmpersand()
htSayIndentRel(15)
htSay '"\spadref{"
- htSay first(rest(link))
+ htSay second link
htSay '"}"
htSayIndentRel(-15)
htSayStandard('"\newline{}")