From: Dobrica Pavlinusic Date: Wed, 7 Jul 2004 14:33:58 +0000 (+0000) Subject: local changes X-Git-Url: http://git.rot13.org/?p=webpac;a=commitdiff_plain;h=d3adaec872256ae4017c412a4ece5cb5f8d33f1f local changes git-svn-id: file:///home/dpavlin/private/svn/webpac/branches/hidra@380 13eb9ef6-21d5-0310-b721-a9d68796d827 --- diff --git a/TODO.hidra b/TODO.hidra index 0b8fa4d..b2d60cd 100644 --- a/TODO.hidra +++ b/TODO.hidra @@ -1,3 +1,52 @@ + + + + ++ BIB: za jezik bi mo¾da trebalo ostaviti kod jezika jer na engleskom + pretra¾ivanju pi¹e Hrvatski, Engleski... + napravila nove filtere (/filter/lang_display_en.pm), + pa sad pise ispravno + ++ sve ni¾e pojmove staviti u novi red bez obzira da li su dani kroz 553 + ili 461. Ovi od 461 idu u novi red ovi od 553 ne + pretpostavljam da ste ovdje mislili na sire pojmove iz polja 461 i 556. + kako god, sd sam svuda dodala da se ispisuje u novi red, pa bi trebalo + biti u redu. + +- kod prikaza zapisa u THS naziv rubrike "U¾i pojam" kod + "Podruèja" zamijeniti sa "Potpojmovnik" + "Potpojmovnika" zamijeniti sa "Deskriptor" + "Deskriptora" ostaje "U¾i pojam" + +- U polju 901^a pi¹e koja je vrsta zapisa - + "Podruèje" ostaje + "Mikrotezaurus" treba postati "Potpojmovnik" + Ti su nazivi ukljuèeni u nekim IF-ovima ako se ne varam, pa bi to + trebalo promijeniti kad ja napravim novu verziju podataka + +- poslati uputu kako pristupim na¹em serveru s ona dva programa s kojima + sam pristupala va¹em (putty.exe i scite.exe) da mogu podmetati nove podatke + +- kod THS-a. Drugo ponavljanje, pretpostavljam i ostala ponavljanja, + polja 450 se ne pokazuju u kazalu + Primjer je Hrvatski dr¾avni sabor. Prvo ponavljanje se uredno javlja + kao uputnica: + Sabor Republike Hrvatske [1991/1997] >> Hrvatski sabor + +- BIB: predmetno kazalo - pripadni mikrotezaurus + ++ Za adresare ste napravili THU-H i THU-E direktorije. To su vjerojatno + trebali biti TDU-H i TDU-E. U njima nema ni¹ta, a adresar radi za oba + jezika hrvatski, pretpostavljam da radi na direktorij ADR-H. Ako mo¾ete + vidjeti ¹to je s tim + ++ kazalo korporativnih autora i predmetno kazalo za engleski vuku iza + kose crte mikrotezaurus u koji pripadaju na hrvatskom jeziku, trebalo bi + iæi iz 258 polja + engleski - 258 + francuski - 253 + njemaèki - 254 + - KAD KLIKNEM NA GORNJE LINKOVE DOÐEM NA STRANICU ODREÐENOG PRETRA®IVAÈA ALI ME NE SLU©A STIL SLOVA. TEK KAD IDEM BACK ILI FORWARD ONDA MI POKA®E SLOVA KAKVA SU ZADANA STILOM. diff --git a/all2xml.conf b/all2xml.conf index 4375dbe..581a6bf 100644 --- a/all2xml.conf +++ b/all2xml.conf @@ -14,11 +14,11 @@ lookup_newfile=/data/webpac-hidra2/thes.lookup line=............................................................. -#[hidra-ths-e] -# isis_db=/data/hidra/THS-E/THS -# type=isis_hidra_ths_en -# lookup_newfile=/data/webpac-hidra2/thes-en.lookup -# line=............................................................. +[hidra-ths-e] + isis_db=/data/hidra/THS-E/THS + type=isis_hidra_ths_en + lookup_newfile=/data/webpac-hidra2/thes-en.lookup + line=............................................................. ## BIB baze ## @@ -35,7 +35,7 @@ type=isis_hidra_bib_en collection_code=SDRH_E library_url=http://www.hidra.hr/ - lookup_open=/data/webpac-hidra2/thes.lookup + lookup_open=/data/webpac-hidra2/thes-en.lookup #[hidra-sdsz-h] # isis_db=/data/hidra/SDSZ-H/BIB diff --git a/all2xml.pl b/all2xml.pl index 11e49d6..c3388f1 100755 --- a/all2xml.pl +++ b/all2xml.pl @@ -168,6 +168,8 @@ sub data2xml { ($s,$se,$d,$i) = (0,1,0,0); } elsif (lc($type) =~ /^lookup/) { ($s,$se,$d,$i,$il) = (0,1,0,0,1); + } elsif ($type) { + print STDERR "WARNING: unknown type: $type\n"; } return ($s,$se,$d,$i,$il); } @@ -637,6 +639,10 @@ foreach my $database ($cfg->Sections) { my $lookup_file = $cfg -> val($database, 'lookup_newfile'); # optional if ($lookup_file) { #tie %lhash, 'GDBM_File', $lookup_file, &GDBM_NEWDB, 0644; + if (! -e $lookup_file) { + open(LOOKUP, "> $lookup_file") || die "can't create $lookup_file': $!"; + close(LOOKUP); + } tie %lhash, 'TDB_File', $lookup_file, TDB_CLEAR_IF_FIRST, O_RDWR, 0644; print STDERR "creating lookup file '$lookup_file'\n"; # delete memory cache for lookup file diff --git a/filter/lang_display_en.pm b/filter/lang_display_en.pm new file mode 100755 index 0000000..8da9488 --- /dev/null +++ b/filter/lang_display_en.pm @@ -0,0 +1,18 @@ +#!/usr/bin/perl -w + +sub lang_display_en { + my @out; + foreach my $v1 (@_) { + $v1 =~ s/(HRV|CRO)/Croatian/gi; + $v1 =~ s/GER/German/gi; + $v1 =~ s/ENG/English/gi; + $v1 =~ s/ITA/Italian/gi; + $v1 =~ s/SLV/Slovenian/gi; + $v1 =~ s/RUS/Russian/gi; + $v1 =~ s/FRE/French/gi; + push @out,$v1; # save modified version + } + return @out; +} + +1; diff --git a/httpd-hidra.conf b/httpd-hidra.conf index 9c4067c..4d72ee5 100644 --- a/httpd-hidra.conf +++ b/httpd-hidra.conf @@ -1,6 +1,6 @@ # make swish indexing interface available -# Alias /webpac-hidra2 /data/webpac-hidra2/public_html-hidra +#Alias /webpac-hidra2 /data/webpac-hidra2/public_html-hidra Alias /webpac-hidra2-bib /data/webpac-hidra2/public_html-hidra Alias /webpac-hidra2-bib-en /data/webpac-hidra2/public_html-hidra Alias /webpac-hidra2-adr /data/webpac-hidra2/public_html-hidra diff --git a/import_xml/isis_hidra_bib_en.xml b/import_xml/isis_hidra_bib_en.xml index 64a1b0c..9e58643 100644 --- a/import_xml/isis_hidra_bib_en.xml +++ b/import_xml/isis_hidra_bib_en.xml @@ -258,7 +258,7 @@ - + ; 101a diff --git a/import_xml/isis_hidra_ths.xml b/import_xml/isis_hidra_ths.xml index 30431f0..18ba9fd 100644 --- a/import_xml/isis_hidra_ths.xml +++ b/import_xml/isis_hidra_ths.xml @@ -117,12 +117,21 @@ - 5561;;556a - 4611;;461a + + ]]> + 5561;;556a + + + ]]> + 4611;;461a + - 5531;;553a + + ]]> + 5531;;553a +