File: pgaccess.tcl

package info (click to toggle)
postgresql 6.5.3-27
  • links: PTS
  • area: main
  • in suites: potato
  • size: 28,360 kB
  • ctags: 20,905
  • sloc: ansic: 204,608; yacc: 10,718; sql: 9,387; sh: 9,379; java: 8,835; tcl: 7,709; makefile: 3,376; lex: 1,642; perl: 1,034; python: 959; cpp: 847; asm: 70; pascal: 42; awk: 10; sed: 8
file content (25 lines) | stat: -rw-r--r-- 453 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
 
#! /bin/sh
#
# One word command to start up pgaccess.tcl
 
if  [ -x /usr/bin/wish8.0 ]
then
	WISH=/usr/bin/wish8.0
	export PATH_TO_WISH=$WISH
else
	echo Cannot find wish8.0
	exit 1
fi

# postgresql.env is provided by the package Postgesql
if [ -f /etc/postgresql/postgresql.env ]
then
	. /etc/postgresql/postgresql.env
else
	if [ -z "$PGACCESS_HOME" ]
	then
		export PGACCESS_HOME=/usr/lib/postgresql/pgaccess
	fi
fi

$WISH -f ${PGACCESS_HOME}/main.tcl