diff options
author | tradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-09-05 08:42:28 +0000 |
---|---|---|
committer | tradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-09-05 08:42:28 +0000 |
commit | c6755d50f6e6738c2e74f1508c59b3e43e801f6b (patch) | |
tree | f844f80fe60ae360f0eca2bb219ff2a0b7ffed73 /lib/sbin/ThornGuide.pl | |
parent | cb403ba929ec2497303851835dcdc8f5997c2f3f (diff) |
Ian's fix to include pictures in the ThornGuide.
This closes PR Documentation 761.
git-svn-id: http://svn.cactuscode.org/flesh/trunk@2339 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/ThornGuide.pl')
-rw-r--r-- | lib/sbin/ThornGuide.pl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/sbin/ThornGuide.pl b/lib/sbin/ThornGuide.pl index e2daf519..ed0ec227 100644 --- a/lib/sbin/ThornGuide.pl +++ b/lib/sbin/ThornGuide.pl @@ -190,14 +190,15 @@ print STDERR "\nFinished\n" if ($verbose); #################################################################### sub Read_Thorn_Doc { - my ($pathandfile) = shift; - my ($contents) = ""; + my ($path) = shift; + my ($contents) = ""; + my ($pathandfile); my ($start) = 0; my ($stop) = 0; my ($temp) = 0; - $pathandfile .= "/$file"; + $pathandfile .= "$path/$file"; open (DOC, "$pathandfile"); @@ -209,6 +210,7 @@ sub Read_Thorn_Doc } if ($start && ! $stop) { # add to $contents + s/(\\includegraphics.*?\{)\s*?(.*\.eps\s*?\})/$1$path\/$2/g; $contents .= $_; } elsif (/\\begin\{document\}/) { # don't begin yet.... 1st flag $temp = 1; |