aboutsummaryrefslogtreecommitdiff
path: root/cgi-bin/dict.cgi.in
diff options
context:
space:
mode:
Diffstat (limited to 'cgi-bin/dict.cgi.in')
-rw-r--r--cgi-bin/dict.cgi.in8
1 files changed, 4 insertions, 4 deletions
diff --git a/cgi-bin/dict.cgi.in b/cgi-bin/dict.cgi.in
index a327be7..5531c1c 100644
--- a/cgi-bin/dict.cgi.in
+++ b/cgi-bin/dict.cgi.in
@@ -778,9 +778,9 @@
(let ((ant (sql-query
conn
(string-append
- "SELECT dict.word FROM dict,antonym WHERE antonym.ident="
+ "SELECT dict.word FROM dict,links WHERE links.type='ANT' AND links.ident="
(cadr (car entry))
- " AND dict.ident=antonym.antonym ORDER BY word"))))
+ " AND dict.ident=links.xref ORDER BY word"))))
(if (and ant (not (null? ant)))
(display-xref ant
(if (= (length ant) 1)
@@ -789,9 +789,9 @@
(let ((x (sql-query
conn
(string-append
- "SELECT dict.word FROM dict,xref WHERE xref.ident="
+ "SELECT dict.word FROM dict,links WHERE links.type='XREF' AND links.ident="
(cadr (car entry))
- " AND dict.ident=xref.xref ORDER BY word"))))
+ " AND dict.ident=links.xref ORDER BY word"))))
(if (and x (not (null? x)))
(display-xref x (_"См. также ")))))
(sort-result result))))

Return to:

Send suggestions and report system problems to the System administrator.