rpms/gnu-smalltalk/devel gst-2.3.6-pathfix.patch, NONE, 1.1 gnu-smalltalk.spec, 1.22, 1.23

[Jochen Schmitt (s4504kr)]

Author: s4504kr

Update of /cvs/extras/rpms/gnu-smalltalk/devel
In directory cvs-int.fedora.redhat.com:/tmp/cvs-serv896

Modified Files:
	gnu-smalltalk.spec 
Added Files:
	gst-2.3.6-pathfix.patch 
Log Message:
Disable ppc64 temporarly

gst-2.3.6-pathfix.patch:

--- NEW FILE gst-2.3.6-pathfix.patch ---
--- orig/kernel/VFS.st
+++ mod/kernel/VFS.st
@@ -231,10 +231,7 @@ update: aspect
      filesystems specified by the subclasses upon image load."
 
     (aspect == #returnFromSnapshot or: [ aspect == #finishedSnapshot ]) ifTrue: [
-	Registry := LookupTable new.
-	self allSubclassesDo: [ :each |
-	    each fileSystems do: [ :fs | self register: fs forClass: each ]
-	]
+	Registry := nil.
     ].
     (aspect == #aboutToQuit or: [ aspect == #aboutToSnapshot ]) ifTrue: [
 	self allSubclassesDo: [ :each | each release ].
@@ -264,6 +261,12 @@ vfsFor: fileName name: fsName subPath: s
     "Create an instance of a subclass of the receiver, implementing the virtual
      file `subPath' inside the `fileName' archive.  fsName is the virtual
      filesystem name and is used to determine the subclass to be instantiated."
+    Registry isNil ifTrue: [
+        Registry := LookupTable new.
+	self allSubclassesDo: [ :each |
+	    each fileSystems do: [ :fs | self register: fs forClass: each ]
+	]
+    ].
     ^(Registry at: fsName) 
 	vfsFor: fileName name: fsName subPath: subPath!
 

Index: gnu-smalltalk.spec
===================================================================
RCS file: /cvs/extras/rpms/gnu-smalltalk/devel/gnu-smalltalk.spec,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -r1.22 -r1.23
--- gnu-smalltalk.spec	6 Sep 2007 19:36:36 -0000	1.22
+++ gnu-smalltalk.spec	9 Sep 2007 19:41:41 -0000	1.23
@@ -1,14 +1,17 @@
 Summary: GNU Smalltalk
 Name: gnu-smalltalk
 Version: 2.3.6
-Release: 1%{?dist}
+Release: 2%{?dist}
 Source: ftp://ftp.gnu.org/gnu/smalltalk/smalltalk-%{version}.tar.gz
 Patch1: gst-2.3.6-am.patch
+Patch2: gst-2.3.6-pathfix.patch
 License: GPLv2
 Group: Development/Languages
 URL: http://www.gnu.org/software/smalltalk/smalltalk.html
 Buildroot: %{_tmppath}/%{name}-%{version}-root-%(%{__id_u} -n)
 
+ExcludeArch: ppc64
+
 Requires(post): /sbin/install-info
 Requires(preun): /sbin/install-info
 
@@ -61,7 +64,8 @@
 
 %prep
 %setup -q -n smalltalk-%{version}
-%patch1 -p1 -b .automake
+%patch1 -p1
+%patch2 -p1 -b .pfx
 
 %build
 # automake
@@ -142,6 +146,10 @@
 %{_datadir}/emacs/site-lisp/*
 
 %changelog
+* Sun Sep  9 2007 Jochen Schmitt <Jochen herr-schmitt de> 2.3.6-2
+- Remove build path from gst.im
+- Temporarly disable ppc64
+
 * Thu Sep  6 2007 Jochen Schmitt <Jochen herr-schmitt de> 2.3.6-1
 - New upstream release