diff options
Diffstat (limited to 'cgi-bin/dict.cgi.in')
-rw-r--r-- | cgi-bin/dict.cgi.in | 8 |
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)))) |