--- search/Search.cgi 2002/06/24 16:49:54 1.8
+++ search/Search.cgi 2002/06/25 19:46:16 1.21
@@ -1,19 +1,21 @@
#!/usr/bin/perl -w
#*****************************************************************************
-# Copyright (C) 1993-2000, FS Consulting Inc. All rights reserved *
-# *
-# *
-# This notice is intended as a precaution against inadvertent publication *
-# and does not constitute an admission or acknowledgement that publication *
-# has occurred or constitute a waiver of confidentiality. *
-# *
-# This software is the proprietary and confidential property *
-# of FS Consulting, Inc. *
+# Copyright (C) 1993-2000, FS Consulting Inc. All rights reserved *
+# *
+# *
+# This notice is intended as a precaution against inadvertent publication *
+# and does not constitute an admission or acknowledgement that publication *
+# has occurred or constitute a waiver of confidentiality. *
+# *
+# This software is the proprietary and confidential property *
+# of FS Consulting, Inc. *
#*****************************************************************************
#print "Content-type: text/plain\n\n";
+#use Data::Dumper;
+
#--------------------------------------------------------------------------
#
# Author: Francois Schiettecatte (FS Consulting, Inc.)
@@ -230,25 +232,6 @@
$main::QueryReportMimeType = "application/x-wais-report";
-
-# Hash of icon/images names that we use
-%main::ImageNames = (
- 'banner', 'banner.gif',
- 'collapse', 'collapse.gif',
- 'expand', 'expand.gif',
- 'inactive-search', 'inactive-search.gif',
- 'active-search', 'active-search.gif',
- 'inactive-search-history', 'inactive-search-history.gif',
- 'active-search-history', 'active-search-history.gif',
- 'inactive-saved-searches', 'inactive-saved-searches.gif',
- 'active-saved-searches', 'active-saved-searches.gif',
- 'inactive-document-folders','inactive-document-folders.gif',
- 'active-document-folders', 'active-document-folders.gif',
- 'inactive-settings', 'inactive-settings.gif',
- 'active-settings', 'active-settings.gif',
-);
-
-
# Array of mime type names, we use this to map
# mime types to mime type names (which are more readable)
%main::MimeTypeNames = (
@@ -409,6 +392,7 @@
print("$JavaScript\n");
}
print '';
+ print '';
print("\n
Odaberite knjižnicu čiji fond želite pretraživati:
+
");
# Parse out the database names and put them into a
@@ -3215,6 +3165,9 @@
print("
\n");
@@ -3332,11 +3285,11 @@
# Check that at least one database was selected
if ( !defined($main::FormData{'Database'}) ) {
- print("
Database Search:
\n");
- print("
Sorry, no database(s) were selected for searching.
\n");
+ print("
Pretraživanje baza:
\n");
+ print("
Niste odabrali knjižnicu koju želite pretraživati.
\n");
print("
\n");
- print("There needs to be a least one database selected in order to perform the search.\n");
- print("Click 'back' on your browser, select at least one database and try again.\n");
+ print("Potrebno je da barem jedna knjižnica bude odabrana, kako biste mogli pretraživati.\n");
+ print("Kliknite na 'back' u svom browseru, odaberite barem jednu knjižnicu i pokušajte ponovo.\n");
goto bailFromGetSearchResults;
}
@@ -4009,7 +3962,7 @@
# Make sure that we send the header
- &vSendHTMLHeader("My Settings", undef);
+ &vSendHTMLHeader("My Settings", $main::JavaScript_SetChecked);
undef(%Value);
$Value{'GetUserSettings'} = "GetUserSettings";
&vSendMenuBar(%Value);
@@ -4047,7 +4000,7 @@
print("
Postavke:
\n");
print("
\n");
- print("
\n");
@@ -5309,13 +5262,13 @@
# Set the title
if ( $ENV{'PATH_INFO'} eq "/DeleteSavedSearch" ) {
- $Title = "Obriši sačuvana pretraživanja";
+ $Title = "Brisanje sačuvanih pretraživanja";
}
elsif ( $ENV{'PATH_INFO'} eq "/ActivateSavedSearch" ) {
- $Title = "Aktiviraj sačuvana pretraživanja";
+ $Title = "Uključivanje automatskog periodičnog pretraživanja";
}
elsif ( $ENV{'PATH_INFO'} eq "/SuspendSavedSearch" ) {
- $Title = "Stavi u mirovanje sačuvana pretraživanja";
+ $Title = "Isključivanje automatskog periodičnog pretraživanja";
}
@@ -5330,9 +5283,9 @@
# Check to see if the saved search object is defined
if ( ! defined($main::FormData{'SavedSearchObject'}) ) {
# Could not find the saved search object
- print("
Sorry, no searches were selected.
\n");
+ print("
Niste odabrali niti jedan upit.
\n");
print("
\n");
- print("You need to select at least one saved search in order to be able to perform an action on it.\n");
+ print("Potrebno je odabrati barem jedan sačuvani upit nad kojim će se izvršiti akcija.\n");
print("