[prev in list] [next in list] [prev in thread] [next in thread]
List: lon-capa-cvs
Subject: [LON-CAPA-cvs] cvs: loncom /xml londefdef.pm
From: sakharuk <lon-capa-cvs () mail ! lon-capa ! org>
Date: 2002-04-26 18:25:56
Message-ID: cvssakharuk1019845556 () cvsserver
[Download RAW message or body]
sakharuk Fri Apr 26 14:25:56 2002 EDT
Modified files:
/loncom/xml londefdef.pm
Log:
sorry, I commited the wrong version last time``
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.54 loncom/xml/londefdef.pm:1.55
--- loncom/xml/londefdef.pm:1.54 Fri Apr 26 14:18:37 2002
+++ loncom/xml/londefdef.pm Fri Apr 26 14:25:56 2002
@@ -2,7 +2,7 @@
# The LearningOnline Network with CAPA
# Tags Default Definition Module
#
-# $Id: londefdef.pm,v 1.54 2002/04/26 18:18:37 sakharuk Exp $
+# $Id: londefdef.pm,v 1.55 2002/04/26 18:25:56 sakharuk Exp $
#
#
# Copyright Michigan State University Board of Trustees
@@ -1390,7 +1390,14 @@
my $src = &Apache::lonxml::get_param('src',$parstack,$safeeval);
$src=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$src);
my $file;
- my $path;
+ my $path;
+ if ($src =~ m!(.*)/([^/]*)$!) {
+ $file = $2;
+ $path = $1;
+ } else {
+ $path = $Apache::lonxml::pwd[-1];
+ $file = $src;
+ }
$file=~s/(\.gif|\.jpg)$/\.eps/;
if ($path) {
$currentstring .= '\graphicspath{{'.$path.'/}}\fbox{\includegraphics{'.$file.'}}';
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic