Mercurial > hg > digilib-old

annotate client/digitallibrary/modules/pdfMaker.js @ 107:85126da2ae21 vendor start

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
XUL: Digilib Buttons in chrome
author engler
date Tue, 13 May 2003 21:02:22 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
107
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
1 /****************************************************************************
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
2 * - sample module for digilib *
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
3 * *
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
4 * christian luginbuehl (luginbuehl@student.unibe.ch) *
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
5 ****************************************************************************/
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
6
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
7 /**
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
8 * generates a pdf-file using a perl-script called makepdf
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
9 *
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
10 * ATTENTION: the script and this function are only in alpha stadium
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
11 */
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
12 function makePDF() {
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
13 var pages = prompt("Enter the pages you like to make a PDF of:", att[1]);
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
14 if (pages != null && pages != "") {
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
15 top.location = "http://penelope.unibe.ch/cgi-bin/cgiwrap/luginbul/makepdf.cgi?dir=" + att[0] + "&pages=" + pages;
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
16 }
85126da2ae21 XUL: Digilib Buttons in chrome
engler
parents:
diff changeset
17 }