Subversion Repositories DevTools

Rev

Rev 4704 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4704 Rev 5061
Line 199... Line 199...
199
					' Sort versions
199
					' Sort versions
200
					Call objSortHelper.VersionSort( aVersions, 0, lastRow, rsRep.FieldIndex("pkg_version") )
200
					Call objSortHelper.VersionSort( aVersions, 0, lastRow, rsRep.FieldIndex("pkg_version") )
201
					
201
					
202
					
202
					
203
					DestroyPackage = ""
203
					DestroyPackage = ""
204
					CanDestroyPackage = objAccessControl.IsVisible ( "DestroyPackage" )
204
					CanDestroyPackage = canShowControlInProject( "DestroyPackage" )
205
					
205
					
206
					
206
					
207
				  ' Descending order
207
				  ' Descending order
208
				  For i = lastRow To 0 Step -1
208
				  For i = lastRow To 0 Step -1
209
				  	imgLock = IMG_NOT_OFFICIAL
209
				  	imgLock = IMG_NOT_OFFICIAL