Mercurial > hg > digilib-old

changeset 32:c5ca5f72fb65

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
cleaning up a bit - more follows
author luginbue
date Thu, 21 Feb 2002 02:19:31 +0100
parents 904f2b2f0cf5
children 054ebc851059
files client/digitallibrary/modules/pdfMaker.js
diffstat 1 files changed, 17 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/client/digitallibrary/modules/pdfMaker.js	Thu Feb 21 02:19:31 2002 +0100
@@ -0,0 +1,17 @@
+/****************************************************************************
+ * - sample module for digilib                                              *
+ *                                                                          *
+ *                       christian luginbuehl (luginbuehl@student.unibe.ch) *
+ ****************************************************************************/
+
+/**
+ * generates a pdf-file using a perl-script called makepdf
+ *
+ * ATTENTION: the script and this function are only in alpha stadium
+ */
+function makePDF() {
+	var pages = prompt("Enter the pages you like to make a PDF of:", att[1]);
+	if (pages != null && pages != "") {
+		top.location = "http://penelope.unibe.ch/cgi-bin/cgiwrap/luginbul/makepdf.cgi?dir=" + att[0] + "&pages=" + pages;
+	}
+}