annotate client/digitallibrary/modules/pdfMaker.js @ 77:b877e54b0794

New servlet version 1.5b. Mostly cleanup. Global parameters for digilib now in DigilibConfiguration, per request parameters are now all in DigilibRequest. The DocuImage implementation can be selected by the configuration docuimage-class. Pixel-by-pixel view implemented with "mo=clip".
author robcast
date Fri, 24 Jan 2003 22:13:49 +0100
parents c5ca5f72fb65
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
32
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
1 /****************************************************************************
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
2 * - sample module for digilib *
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
3 * *
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
4 * christian luginbuehl (luginbuehl@student.unibe.ch) *
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
5 ****************************************************************************/
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
6
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
7 /**
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
8 * generates a pdf-file using a perl-script called makepdf
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
9 *
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
10 * ATTENTION: the script and this function are only in alpha stadium
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
11 */
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
12 function makePDF() {
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
13 var pages = prompt("Enter the pages you like to make a PDF of:", att[1]);
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
14 if (pages != null && pages != "") {
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
15 top.location = "http://penelope.unibe.ch/cgi-bin/cgiwrap/luginbul/makepdf.cgi?dir=" + att[0] + "&pages=" + pages;
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
16 }
c5ca5f72fb65 cleaning up a bit - more follows
luginbue
parents:
diff changeset
17 }