version 1.107, 2011/05/27 18:34:07
|
version 1.108, 2011/06/06 16:08:45
|
Line 247 sub init_math_support {
|
Line 247 sub init_math_support {
|
sub mimetex_valign { |
sub mimetex_valign { |
my ($esc_texstring)=@_; |
my ($esc_texstring)=@_; |
my $valign = 0; |
my $valign = 0; |
my $lonhost = $Apache::lonnet::perlvar{'lonHostID'}; |
|
my $hostname = &Apache::lonnet::hostname($lonhost); |
|
my $path = '/cgi-bin/mimetex.cgi?'.$esc_texstring; |
my $path = '/cgi-bin/mimetex.cgi?'.$esc_texstring; |
my $socket; |
my $socket; |
&Apache::lonxml::start_alarm(); |
&Apache::lonxml::start_alarm(); |
$socket = IO::Socket::INET->new(PeerAddr => $hostname, |
$socket = IO::Socket::INET->new(PeerAddr => 'localhost', |
PeerPort => 'http(80)', |
PeerPort => 'http(80)', |
Proto => 'tcp'); |
Proto => 'tcp'); |
if ($socket) { |
if ($socket) { |