summaryrefslogtreecommitdiffabout
path: root/xml
authorSergey Poznyakoff <gray@gnu.org.ua>2006-10-10 22:03:42 (GMT)
committer Sergey Poznyakoff <gray@gnu.org.ua>2006-10-10 22:03:42 (GMT)
commitaa3b80645e8b1d9df3136591aa95bacbe8fb1f8a (patch) (side-by-side diff)
treebd34ecd211cb114521bd5fb2858b4614b5fbfa18 /xml
parent485dcd4e301771df4788ad4ada976703129ab49d (diff)
downloadellinika-aa3b80645e8b1d9df3136591aa95bacbe8fb1f8a.tar.gz
ellinika-aa3b80645e8b1d9df3136591aa95bacbe8fb1f8a.tar.bz2
Add htdig framework
git-svn-id: file:///home/puszcza/svnroot/ellinika/trunk@469 941c8c0f-9102-463b-b60b-cd22ce0e6858
Diffstat (limited to 'xml') (more/less context) (ignore whitespace changes)
-rw-r--r--xml/lingua.conf.in83
-rw-r--r--xml/pl/ellinika.xml23
-rw-r--r--xml/uk/ellinika.xml24
3 files changed, 125 insertions, 5 deletions
diff --git a/xml/lingua.conf.in b/xml/lingua.conf.in
index 41ed693..3569f8a 100644
--- a/xml/lingua.conf.in
+++ b/xml/lingua.conf.in
@@ -12,13 +12,16 @@
<SOUNDREF>
<![CDATA[
<img src="graphics/audio.png" width="16" height="16" alt="[ sound ]" />]]>
- </SOUNDREF>
+ </SOUNDREF>
+ <SEARCH
+ ADD-INPUTS="config=ellinika.{@LANG},restrict=/{@LANG}/,lang={@LANG}" />
<GUILE>
<![CDATA[
(use-modules (xmltools xmltrans)
(xmltools gamlet)
(xmltrans lingua)
- (xmltools dict))
+ (xmltools dict)
+ (ice-9 format))
(define-macro (install-nea)
`(use-modules (xmltrans lingua)
@@ -29,7 +32,7 @@
"/nea.=SCRIPT_SUFFIX=?LANG="
(lingua:LANG args)))))
(xmltrans:set-attr "LINGUA" "NEA" nea)))
-
+
(xmltrans:end-tag
"KATHAREVUSA"
(tag attr text)
@@ -59,7 +62,79 @@
"news:permanent-article"
(tag attr text)
(list "<div class=\"permanent-article\">" text "</div>"))
-
+
+(xmltrans:end-tag
+ "htdig:nomatch"
+ (tag attr text)
+ (format #f
+"<div class=\"htdig-result-header\">
+~A
+</div>
+
+<div class=\"htdig-result-form\">
+<form method=\"get\" action=\"$(CGI)\">
+<input type=\"hidden\" name=\"exclude\" value=\"$&(EXCLUDE)\">
+~A: $(METHOD)
+~A: $(FORMAT)
+~A: $(SORT)
+<br>
+~A:
+<input type=\"text\" size=\"30\" name=\"words\" value=\"$&(WORDS)\">
+<input type=\"submit\" value=\"~A\">
+~{~A~}
+</form>
+</div>"
+ (lingua:gettext "No matches were found for '$&amp;(LOGICAL_WORDS)'")
+ (lingua:gettext "Match")
+ (lingua:gettext "Format")
+ (lingua:gettext "Sort by")
+ (lingua:gettext "New search")
+ (lingua:gettext "Search")
+ (lingua:expand-additional-inputs
+ (xmltrans:tag-attributes "LINGUA")
+ (lingua:attr "SEARCH" "ADD-INPUTS"))))
+
+(xmltrans:end-tag
+ "htdig:body"
+ (tag attr text)
+ (format #f
+"<div class=\"htdig-result-form\">
+<form method=\"get\" action=\"$(CGI)\">
+<input type=\"hidden\" name=\"exclude\" value=\"$&(EXCLUDE)\">
+~A: $(METHOD)
+~A: $(FORMAT)
+~A: $(SORT)
+<br>
+~A:
+<input type=\"text\" size=\"30\" name=\"words\" value=\"$&(WORDS)\">
+<input type=\"submit\" value=\"~A\">
+~{~A~}
+</form>
+</div>
+
+<div class=\"htdig-result-header\">
+~A
+~A
+</div>
+
+<div class=\"htdig-result-list\">
+$(HTSEARCH_RESULTS)
+$(PAGEHEADER)
+$(PREVPAGE) $(PAGELIST) $(NEXTPAGE)
+</div>"
+ (lingua:gettext "Match")
+ (lingua:gettext "Format")
+ (lingua:gettext "Sort by")
+ (lingua:gettext "New search")
+ (lingua:gettext "Search")
+ (lingua:expand-additional-inputs
+ (xmltrans:tag-attributes "LINGUA")
+ (lingua:attr "SEARCH" "ADD-INPUTS"))
+ (lingua:gettext "Documents $(FIRSTDISPLAYED) - $(LASTDISPLAYED) of $(MATCHES) matches.")
+ (format #f
+ (lingua:gettext "More ~A's indicate a better match.")
+ "<img src=\"/htdig/star.gif\" alt=\"*\">")))
+
(gamlet:set-handler "INFO"
(lambda (. args)
(display "<ul class=\"menu\">")
diff --git a/xml/pl/ellinika.xml b/xml/pl/ellinika.xml
index ea1e3e3..6925957 100644
--- a/xml/pl/ellinika.xml
+++ b/xml/pl/ellinika.xml
@@ -22,6 +22,17 @@
<MSGSTR ID="Next Page">Następna strona</MSGSTR>
<MSGSTR ID="Top of the Page">Początek strony</MSGSTR>
<MSGSTR ID="This page in other languages">Ta strona w innych językach</MSGSTR>
+ <MSGSTR ID="Search">Szukaj</MSGSTR>
+ <MSGSTR ID="Match">Dopasowanie</MSGSTR>
+ <MSGSTR ID="Format">Format</MSGSTR>
+ <MSGSTR ID="Sort by">Sortuj</MSGSTR>
+ <MSGSTR ID="New search">Nowy wzorzec</MSGSTR>
+ <MSGSTR ID="Documents $(FIRSTDISPLAYED) - $(LASTDISPLAYED) of $(MATCHES) matches.">
+ Wyniki $(FIRSTDISPLAYED) - $(LASTDISPLAYED) z $(MATCHES).
+ </MSGSTR>
+ <MSGSTR ID="More ~A's indicate a better match.">
+ Im więcej gwiazdek (~A), tym lepiej pasuje wzorzec.
+ </MSGSTR>
</LOCALIZATION>
<COPYRIGHT>
@@ -110,13 +121,23 @@ this notice is preserved.</PARA>
<PAGE PREFIX="map" HEADER="Mapa witryny">
{SITEMAP}
</PAGE>
+<ITEM>SEARCH</ITEM>
</GROUP>
<GROUP TITLE="permalink" HIDDEN="1">
-<PAGE PREFIX="monima" HEADER="@@title@@" REF="NEA">
+<PAGE PREFIX="monima" HEADER="@@title@@" REF="NEA" ROBOTS="index,nofollow">
<PARA>@@article-date@@</PARA>
<news:permanent-article>@@article-text@@</news:permanent-article>
</PAGE>
+
+<PAGE PREFIX="htdig" HIDDEN="1">
+<HEADER>Wyniki wyszukiwania "$&amp;(WORDS)"</HEADER>
+<htdig:body />
+</PAGE>
+<PAGE PREFIX="nomatch" HIDDEN="1">
+<HEADER>Wyniki wyszukiwania "$&amp;(WORDS)"</HEADER>
+<htdig:nomatch />
+</PAGE>
</GROUP>
</LINGUA>
diff --git a/xml/uk/ellinika.xml b/xml/uk/ellinika.xml
index b8ef25d..38e7e3a 100644
--- a/xml/uk/ellinika.xml
+++ b/xml/uk/ellinika.xml
@@ -22,6 +22,20 @@
<MSGSTR ID="Next Page">Наступна сторінка</MSGSTR>
<MSGSTR ID="Top of the Page">Початок сторінки</MSGSTR>
<MSGSTR ID="This page in other languages">Ця сторінка іншими мовами</MSGSTR>
+ <MSGSTR ID="Search">Пошук</MSGSTR>
+ <MSGSTR ID="Match">Шукати</MSGSTR>
+ <MSGSTR ID="Format">Формат</MSGSTR>
+ <MSGSTR ID="Sort by">Сортировка</MSGSTR>
+ <MSGSTR ID="New search">Новий пошук</MSGSTR>
+ <MSGSTR ID="Documents $(FIRSTDISPLAYED) - $(LASTDISPLAYED) of $(MATCHES) matches.">
+ Сторінки $(FIRSTDISPLAYED) - $(LASTDISPLAYED) з $(MATCHES).
+ </MSGSTR>
+ <MSGSTR ID="More ~A's indicate a better match.">
+ Кількість ~A зірок відповідає ступеню збігу.
+ </MSGSTR>
+ <MSGSTR ID="No matches were found for '$&amp;(LOGICAL_WORDS)'">
+
+ </MSGSTR>
</LOCALIZATION>
<COPYRIGHT>
@@ -110,6 +124,7 @@ this notice is preserved.</PARA>
<PAGE PREFIX="map" HEADER="Мапа сайту">
{SITEMAP}
</PAGE>
+<ITEM>SEARCH</ITEM>
</GROUP>
<GROUP TITLE="permalink" HIDDEN="1">
@@ -117,6 +132,15 @@ this notice is preserved.</PARA>
<PARA>@@article-date@@</PARA>
<news:permanent-article>@@article-text@@</news:permanent-article>
</PAGE>
+
+<PAGE PREFIX="htdig" HIDDEN="1">
+<HEADER>Результати пошуку "$&amp;(WORDS)"</HEADER>
+<htdig:body />
+</PAGE>
+<PAGE PREFIX="nomatch" HIDDEN="1">
+<HEADER>Результати пошуку "$&amp;(WORDS)"</HEADER>
+<htdig:nomatch />
+</PAGE>
</GROUP>
</LINGUA>

Return to:

Send suggestions and report system problems to the System administrator.