File: gbklatex

package info (click to toggle)
cjk 4.8.4%2Bgit20170127-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, bullseye
  • size: 3,888 kB
  • sloc: lisp: 12,099; sh: 3,731; ansic: 2,429; perl: 1,804; makefile: 336
file content (43 lines) | stat: -rwxr-xr-x 1,216 bytes parent folder | download | duplicates (16)
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
#! /bin/sh

# Copyright (C) 1994-2015  Werner Lemberg <wl@gnu.org>
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program in doc/COPYING; if not, write to the Free
# Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
# MA 02110-1301 USA

n=1
argv=

# get last argument
while test 1 -lt $#; do
  eval argv$n=\$1
  argv="$argv \"\$argv$n\""
  n=`expr $n + 1`
  shift
done

# replace extension with .cjk or append .cjk if there is no extension
tex=$1
case $tex in
""|*.cjk)
  echo >&2 "Usage: $0 [options] latex-file"
  exit 1;;
*)
  aux=`expr "X$tex" : 'X\(.*\)\.[^/]*$' \| "X$tex" : 'X\(.*\)'`.cjk;;
esac

extconv < "$tex" > "$aux" && eval latex "$argv" "\$aux"

# EOF