diff --git a/lib/package.gi b/lib/package.gi index 6dcbf97a26..bee41da722 100644 --- a/lib/package.gi +++ b/lib/package.gi @@ -3167,7 +3167,6 @@ InstallGlobalFunction( PackageVariablesInfo, function( pkgname, version ) # Save the relevant global variables, and replace them. GAPInfo.data:= rec( userGVars:= NamesUserGVars(), varsThisPackage:= [], - revision_components:= [], pkgpath:= test, pkgname:= pkgname ); @@ -3202,7 +3201,7 @@ InstallGlobalFunction( PackageVariablesInfo, function( pkgname, version ) UnbindGlobal( "ReadPackage" ); localBindGlobal( "ReadPackage", function( arg ) - local pos, pkgname, before, cbefore, res, after, cafter; + local pos, pkgname, before, res, after; if Length( arg ) = 1 then pos:= Position( arg[1], '/' ); pkgname:= LowercaseString( arg[1]{[ 1 .. pos - 1 ]} ); @@ -3213,20 +3212,12 @@ InstallGlobalFunction( PackageVariablesInfo, function( pkgname, version ) fi; if pkgname = GAPInfo.data.pkgname then before:= NamesUserGVars(); - if IsBoundGlobal( "Revision" ) then - cbefore:= RecNames( ValueGlobal( "Revision" ) ); - fi; fi; res:= CallFuncList( GAPInfo.data.ReadPackage, arg ); if pkgname = GAPInfo.data.pkgname then after:= NamesUserGVars(); UniteSet( GAPInfo.data.varsThisPackage, Filtered( Difference( after, before ), IsBoundGlobal ) ); - if IsBoundGlobal( "Revision" ) then - cafter:= RecNames( ValueGlobal( "Revision" ) ); - UniteSet( GAPInfo.data.revision_components, - Difference( cafter, cbefore ) ); - fi; fi; return res; end ); @@ -3385,13 +3376,6 @@ InstallGlobalFunction( PackageVariablesInfo, function( pkgname, version ) guesssource( nam ) ] ) ] ); fi; - # Have new components been added to `Revision'? - if not IsEmpty( GAPInfo.data.revision_components ) then - Add( result, [ "new components of the outdated 'Revision' record", - List( GAPInfo.data.revision_components, - x -> [ [ x, "", "" ], [ fail, fail ] ] ) ] ); - fi; - # Delete the auxiliary component from `GAPInfo'. Unbind( GAPInfo.data );