Hello community,
here is the log from the commit of package pgaccess for openSUSE:Factory
checked in at Fri Nov 27 16:13:40 CET 2009.
--------
--- pgaccess/pgaccess.changes 2006-01-25 21:47:22.000000000 +0100
+++ /mounts/work_src_done/STABLE/pgaccess/pgaccess.changes 2009-11-26 16:44:03.000000000 +0100
@@ -1,0 +2,7 @@
+Thu Nov 26 15:50:56 CET 2009 - max@suse.de
+
+- Version 0.99.0-20040219
+- Package cleanup
+- Fix startup problem (bnc#414190).
+
+-------------------------------------------------------------------
calling whatdependson for head-i586
Old:
----
pgaccess-0.98.8.20030520.tar.bz2
New:
----
pgaccess-0_99_0_20040219.tar.bz2
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ pgaccess.spec ++++++
--- /var/tmp/diff_new_pack.Q3Wbp5/_old 2009-11-27 16:12:46.000000000 +0100
+++ /var/tmp/diff_new_pack.Q3Wbp5/_new 2009-11-27 16:12:46.000000000 +0100
@@ -1,5 +1,5 @@
#
-# spec file for package pgaccess (Version 0.98.8.20030520)
+# spec file for package pgaccess (Version 0.99.0.20040219)
#
# Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
@@ -15,50 +15,41 @@
# Please submit bugfixes or comments via http://bugs.opensuse.org/
#
-# norootforbuild
Name: pgaccess
-Summary: A Database Management Tool for PostgreSQL
-Version: 0.98.8.20030520
-Release: 250
-License: Any permissive
+Summary: Database Management Tool for PostgreSQL
+Version: 0.99.0.20040219
+Release: 1
+License: PERMISSIVE-OSI-COMPLIANT
Group: Productivity/Databases/Tools
Url: http://www.pgaccess.org
-Obsoletes: postgresql-tk
-Provides: postgresql-tk
-Requires: postgresql-tcl tcl tk tcllib
+Requires: PgTcl tk tcllib
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildArch: noarch
-Source0: %name-%version.tar.bz2
+Source0: pgaccess-0_99_0_20040219.tar.bz2
Patch0: %name.patch
%description
-A Database Management Tool for PostgreSQL
-
-
-
-Authors:
---------
- Constantin Teodorescu
+PgAccess is a graphical interface and application building environment
+for PostgreSQL.
%prep
-%setup -q
+%setup -q -n pgaccess-0_99_0_20040219
%patch0
+chmod -R a+rX .
%build
%install
-rm -rf %buildroot
-PGA_HOME=/usr/share
-make DESTDIR=%buildroot libdir=$PGA_HOME bindir=%_bindir install
+make DESTDIR=%buildroot libdir=/usr/share bindir=%_bindir install
%clean
rm -rf %buildroot
%files
%defattr(-,root,root,-)
-%doc README changelog copyright known_bugs todo
+%doc README changelog copyright known_bugs todo demo doc/html
/usr/share/pgaccess
/usr/bin/pgaccess
++++++ pgaccess.patch ++++++
--- /var/tmp/diff_new_pack.Q3Wbp5/_old 2009-11-27 16:12:46.000000000 +0100
+++ /var/tmp/diff_new_pack.Q3Wbp5/_new 2009-11-27 16:12:46.000000000 +0100
@@ -1,22 +1,16 @@
---- Makefile
+Index: Makefile
+===================================================================
+--- Makefile.orig
+++ Makefile
-@@ -7,20 +7,21 @@
- #
- #-------------------------------------------------------------------------
-
--bindir = /usr/bin/X11
-+bindir = /usr/bin
- libdir = /usr/lib
- wish = /usr/bin/wish
-+DESTDIR=
+@@ -13,14 +13,14 @@ wish = /usr/bin/wish
pgaccess:
chmod a+x pgaccess.tcl
- mkdir -p $(libdir)/pgaccess
- cp -R * $(libdir)/pgaccess
-- ln -sf $(libdir)/pgaccess.tcl $(bindir)/pgaccess
+- ln -sf $(libdir)/pgaccess/pgaccess.tcl $(bindir)/pgaccess
+ mkdir -p $(DESTDIR)$(libdir)/pgaccess $(DESTDIR)$(bindir)
-+ cp -R * $(DESTDIR)$(libdir)/pgaccess
++ cp -R pgaccess.tcl pgmonitor images lib $(DESTDIR)$(libdir)/pgaccess
+ ln -sf $(libdir)/pgaccess/pgaccess.tcl $(DESTDIR)$(bindir)/pgaccess
all: pgaccess
@@ -28,202 +22,54 @@
- rm -rf $(bindir)/pgaccess
+ rm -rf $(DESTDIR)$(libdir)/pgaccess
+ rm -rf $(DESTDIR)$(bindir)/pgaccess
---- lib/connections.tcl
-+++ lib/connections.tcl
-@@ -634,7 +634,7 @@
- return 0
- }
- }
--puts "RES: $pgres"
-+#puts "RES: $pgres"
- catch {pg_result $pgres -clear}
-
- return 1
---- pgaccess.tcl
+Index: lib/plugins/pgmonitor.tcl
+===================================================================
+--- lib/plugins/pgmonitor.tcl.orig
++++ lib/plugins/pgmonitor.tcl
+@@ -1,3 +1,6 @@
++#!/usr/bin/tclsh
++package require Tk
++
+ #############################################################################
+ # Visual Tcl v1.11p1 Project
+ #
+Index: lib/widgets/tablelist3.3/scripts/tablelistWidget.tcl
+===================================================================
+--- lib/widgets/tablelist3.3/scripts/tablelistWidget.tcl.orig
++++ lib/widgets/tablelist3.3/scripts/tablelistWidget.tcl
+@@ -244,7 +244,7 @@ namespace eval tablelist {
+ #
+ # Use lists to facilitate the handling of miscellaneous options
+ #
+- variable activeStyles [list frame none underline]
++ variable activeStyles [list dotbox frame none underline]
+ variable alignments [list left right center]
+ variable arrowTypes [list up down]
+ variable states [list disabled normal]
+Index: pgaccess.tcl
+===================================================================
+--- pgaccess.tcl.orig
+++ pgaccess.tcl
-@@ -76,7 +76,7 @@
-
- proc set_defaults {} {
- global PgAcVar CurrentDB
-- puts "\nSetting the default values:"
-+ #puts "\nSetting the default values:"
-
- array set def_vars {
- PgAcVar(currentdb,host) ""
-@@ -104,13 +104,22 @@
- foreach i [array names def_vars] {
- if {![info exists $i]} {
- set $i $def_vars($i)
-- puts "\t$i: $def_vars($i)"
-+ #puts "\t$i: $def_vars($i)"
- }
- }
+@@ -235,12 +235,16 @@ global PgAcVar CurrentDB
# the script's home dir
if {![info exists PgAcVar(PGACCESS_HOME)]} {
-- set home [file dirname [info script]]
+- set tmphome [info script]
+- if {[file type $tmphome] == "link"} {
+- set home [file dirname [file readlink $tmphome]]
+- } else {
+- set home [file dirname [info script]]
+- }
+ set script [info script]
+ while {[file type $script] eq "link"} {
+ set s [file readlink $script]
+ if {[file pathtype $s] eq "relative"} {
-+ set script [file normalize [file join [file dirname $script] $s]]
-+ } else {
-+ set script $s
-+ }
++ set script [file normalize [file join [file dirname $script] $s]]
++ } else {
++ set script $s
++ }
+ }
+ set home [file dirname $script]
switch [file pathtype $home] {
absolute {set PgAcVar(PGACCESS_HOME) $home}
relative {set PgAcVar(PGACCESS_HOME) [file join [pwd] $home]}
-@@ -121,7 +130,7 @@
- cd $curdir
- }
- }
-- puts "\tPGACCESS_HOME: $PgAcVar(PGACCESS_HOME)"
-+ #puts "\tPGACCESS_HOME: $PgAcVar(PGACCESS_HOME)"
- }
-
- # The path to the libpgtcl shared object lib.
-@@ -156,13 +165,13 @@
- set PgAcVar(PGLIB) ""
- }
- }
-- puts "\tPGLIB: $PgAcVar(PGLIB)"
-+ #puts "\tPGLIB: $PgAcVar(PGLIB)"
- }
- }
-
- proc load_conf_file {filename} {
- global PgAcVar
-- puts "\nLoading the $filename config file:"
-+ #puts "\nLoading the $filename config file:"
- if {![file exists $filename]} {
- return 0
- }
-@@ -197,7 +206,7 @@
-
- proc load_env_vars {} {
- global PgAcVar env
-- puts "\nLoading the enviroment variables:"
-+ #puts "\nLoading the enviroment variables:"
- set var_list {PGACCESS_HOME PGLIB PGPORT}
-
- foreach i $var_list {
-@@ -212,7 +221,7 @@
-
- proc parse_cmd_line {} {
- global PgAcVar argv
-- puts "Parsing the command line parameters:"
-+ #puts "Parsing the command line parameters:"
- if {[catch {package require cmdline} msg]} {
- puts "\tCouldn't find cmdline package elsewhere on your machine."
- puts "\tNow trying to load the cmdline package from PgAccess."
-@@ -441,75 +450,58 @@
-
- # only load PGLIB if PGINTCL not specified on command line
- if {![info exists PgAcVar(PGINTCL)]} {
-- set shlib [file join $PgAcVar(PGLIB) libpgtcl][info sharedlibextension]
-- if {![file exists $shlib]} {
-- puts "\nError: Shared library file: '$shlib' does not exist. \n\
-- Check this file, or check PGLIB variable (in pgaccess.cfg)\n"
-- #exit
-- puts "====> Using pgin.tcl instead\n"
-- set PgAcVar(PGINTCL) 1
-- }
--
-- if {[catch {load $shlib} err]} {
-- puts "Error: can not load $shlib shared library."
-- puts "You need to make sure that the library exists and"
-- puts "the environment variable PGLIB points to the directory"
-- puts "where it is located.\n"
-- puts "If you use Windows, be sure that the needed libpgtcl.dll"
-- puts "and libpq.dll files are copied in the Windows/System"
-- puts "directory"
-- puts "\nERROR MESSAGE: $err\n"
-- #exit
-+ if {[catch {package require Pgtcl} err]} {
-+ puts "Error: can not load package Pgtcl."
- puts "====> Using pgin.tcl instead\n"
- set PgAcVar(PGINTCL) 1
-- }
-+ }
- }
-
- # Loading all defined namespaces
-- puts -nonewline "\nLoading namespaces:"
-+ #puts -nonewline "\nLoading namespaces:"
- foreach module {mainlib stack syntax database debug tables queries visualqb forms views functions reports scripts usergroups sequences diagrams help preferences printer importexport connections graphs pgackages images} {
-- puts -nonewline " $module"
-- flush stdout
-+ #puts -nonewline " $module"
-+ #flush stdout
- if {[catch {source [file join $PgAcVar(PGACCESS_HOME) lib $module.tcl]} msg]} {
- puts "\nERROR: $msg"
- puts "Please check your installation or set the PGACCESS_HOME ($PgAcVar(PGACCESS_HOME)) variable properly!"
- exit -1
- }
- }
-- puts ""
-+ #puts ""
-
- ## Loadin plugins
-- puts -nonewline "\nLoading plugins:"
-+ #puts -nonewline "\nLoading plugins:"
- foreach plugin [glob -nocomplain [file join $PgAcVar(PGACCESS_HOME) lib plugins *.tcl]] {
- # special check for pgin.tcl
- if {[string match "pgin" [file rootname [file tail $plugin]]] && ![info exists PgAcVar(PGINTCL)]} {
-- puts -nonewline " [file rootname [file tail $plugin]]-(NOT LOADED)"
-- flush stdout
-+ #puts -nonewline " [file rootname [file tail $plugin]]-(NOT LOADED)"
-+ #flush stdout
- } else {
-- puts -nonewline " [file rootname [file tail $plugin]]"
-- flush stdout
-+ #puts -nonewline " [file rootname [file tail $plugin]]"
-+ #flush stdout
- source $plugin
- }
- }
-- puts ""
-+ #puts ""
-
- Preferences::load
-
- Connections::load
-
- # Loading the required packages
-- puts "\nLoading the required packages:"
-+ #puts "\nLoading the required packages:"
- lappend ::auto_path [file join $PgAcVar(PGACCESS_HOME) lib] [file join $PgAcVar(PGACCESS_HOME) lib widgets]
-- if {[catch [
-- puts "\ttablelist: [package require tablelist 2.7]"
-- puts "\tBWidget: [package require BWidget]"
-- puts "\ticons: [package require icons]"
-- puts "\tbase64: [package require base64]"
-- puts "\tcsv: [package require csv]"
-- puts "\tfileutil: [package require fileutil]"
-- puts "\ttkwizard: [package require tkwizard]"
-- ] msg]} {
-- puts $msg
-+ if {[catch {
-+ package require tablelist 2.7
-+ package require BWidget
-+ package require icons
-+ package require base64
-+ package require csv
-+ package require fileutil
-+ package require tkwizard
-+ } msg]} {
-+ puts $::errorInfo
- puts "\n[intlmsg {Please install the required packages:}]\n"
- puts "\ttablelist: http:://www.nemethi.de"
- puts "\ttcllib: http:://www.sourceforge.net/projects/tcllib"
-@@ -517,7 +509,7 @@
- puts "\ttkwizard: http://www2.clearlight.com/~oakley/tcl/tkwizard/"
- }
-
-- puts ""
-+ #puts ""
-
- # Creating icons
- ::icons::icons create \
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Remember to have fun...
--
To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org
For additional commands, e-mail: opensuse-commit+help@opensuse.org