File: xfig.sl

package info (click to toggle)
slxfig 0.2.0~.117-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, buster
  • size: 1,136 kB
  • ctags: 568
  • sloc: sh: 2,941; ansic: 598; makefile: 274; php: 6
file content (26 lines) | stat: -rw-r--r-- 704 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
$1 = 0; $2 = 2; $3 = 0;
variable _xfig_version = $1*10000 + $2*100 + $3;
variable _xfig_version_string = "pre$1.$2.$3-117"$;

()=evalfile ("xfig/core");
()=evalfile ("xfig/polyline");
()=evalfile ("xfig/ellipse");
%()=evalfile ("xfig/text");  % obsolete-- replaced by latex.sl
()=evalfile ("xfig/png.sl");
()=evalfile ("xfig/latex.sl");
()=evalfile ("xfig/objects");
()=evalfile ("xfig/clip.sl");
()=evalfile ("xfig/plot.sl");
$1 = getenv ("HOME");
if ($1 != NULL)
{
   $1 = path_concat ($1, ".slxfigrc");
   if (NULL != stat_file ($1))
     {
	() = evalfile ($1);
     }
}

$1 = path_concat (path_concat (path_dirname (__FILE__), "help"), "slxfig.hlp");
if (NULL != stat_file ($1))
  add_doc_file ($1);