| Current Path : /usr/share/latex2html/styles/ |
Linux ift1.ift-informatik.de 5.4.0-216-generic #236-Ubuntu SMP Fri Apr 11 19:53:21 UTC 2025 x86_64 |
| Current File : //usr/share/latex2html/styles/xspace.perl |
#
# $Id: xspace.perl,v 1.3 1999/04/09 18:17:41 JCL Exp $
# xspace.perl
# Jens Lippmann <lippmann@rbg.informatik.tu-darmstadt.de> 26-JAN-97
#
# Extension to LaTeX2HTML to support xspace.sty.
#
# Change Log:
# ===========
# jcl = Jens Lippmann
#
# $Log: xspace.perl,v $
# Revision 1.3 1999/04/09 18:17:41 JCL
# changed my e-Mail address
#
# Revision 1.2 1998/02/19 22:24:35 latex2html
# th-darmstadt -> tu-darmstadt
#
# Revision 1.1 1997/01/27 19:40:44 JCL
# initial revision
#
#
# JCL -- 26-JAN-97 -- created
#
package main;
sub do_cmd_xspace {
local($_) = @_;
local($space) = " ";
# the list is taken from xspace.sty 1.04
$space = "" if /^([{}~.!,:;?\/'\)-]|\\\/|\\ )/;
$space.$_;
}
1; # Must be last line