From 681e43ccd9cf4dbd7abd6e5308f5e6665b28b65f Mon Sep 17 00:00:00 2001
From: Reinhard Kotucha <reinhard.kotucha@web.de>
Date: Fri, 14 Mar 2008 23:22:27 +0000
Subject: texmf-dist/scripts/ppower4/pdfthumb.texlua: new file.

git-svn-id: svn://tug.org/texlive/trunk@6971 c570f23f-e606-0410-a88d-b1316a301751
---
 Master/bin/win32/pdfthumb.exe    | Bin 10752 -> 0 bytes
 Master/bin/win32/pdfthumb.texlua |  44 +++++++++++++++++++++++++++++++++++++++
 2 files changed, 44 insertions(+)
 delete mode 100755 Master/bin/win32/pdfthumb.exe
 create mode 100644 Master/bin/win32/pdfthumb.texlua

(limited to 'Master/bin/win32')

diff --git a/Master/bin/win32/pdfthumb.exe b/Master/bin/win32/pdfthumb.exe
deleted file mode 100755
index c7a051f0faf..00000000000
Binary files a/Master/bin/win32/pdfthumb.exe and /dev/null differ
diff --git a/Master/bin/win32/pdfthumb.texlua b/Master/bin/win32/pdfthumb.texlua
new file mode 100644
index 00000000000..383e741e189
--- /dev/null
+++ b/Master/bin/win32/pdfthumb.texlua
@@ -0,0 +1,44 @@
+#!/usr/bin/env texlua
+--*-Lua-*-
+-- $Id: .texlua 6969 2008-03-14 22:17:00Z reinhardk $
+
+-- Copyright (C) 2008 Reinhard Kotucha.
+-- You may freely use, modify and/or distribute this file.
+
+-- Launch pdfthumb
+
+function fixwin(args_unix)
+   if os.type == 'windows' then
+      local args_win={}  -- new table
+      args_win[0]=args_unix[1]
+      for i=1, #args_unix do  
+	 args_win[i]='"'..args_unix[i]..'"'
+      end
+      return args_win
+   else
+      return args_unix
+   end
+end
+
+kpse.set_program_name('pdfthumb.texlua', 'pdfthumb')
+
+jarfile=kpse.find_file('pp4p.jar', 'texmfscripts')
+
+command={'java', '-cp', jarfile, 'de.tu_darmstadt.sp.pdftools.ThumbGen'}
+
+for i=1, #arg do
+    command[#command+1]=arg[i]
+end
+
+command=fixwin(command)
+
+--[[ prepend an additional hyphen to activate this code
+for i=0, #command do
+   print (command[i])
+end
+os.exit(ret)
+--]]
+
+ret=os.spawn(command)
+os.exit(ret)
+ft
\ No newline at end of file
-- 
cgit v1.2.3