Remove uses of GRPackage>>grPackages

repository/JQuery-Tests-Core.package/JQFunctionalTest.class/instance/listOfCountryNames.st

@@ -0,0 +1,4 @@
+private
+listOfCountryNames
+
+	^ ((OrderedCollection new) add: 'Afghanistan'; add: 'Albania'; add: 'Algeria'; add: 'Andorra'; add: 'Angola'; add: 'Antigua & Deps'; add: 'Argentina'; add: 'Armenia'; add: 'Australia'; add: 'Austria'; add: 'Azerbaijan'; add: 'Bahamas'; add: 'Bahrain'; add: 'Bangladesh'; add: 'Barbados'; add: 'Belarus'; add: 'Belgium'; add: 'Belize'; add: 'Benin'; add: 'Bhutan'; add: 'Bolivia'; add: 'Bosnia Herzegovina'; add: 'Botswana'; add: 'Brazil'; add: 'Brunei'; add: 'Bulgaria'; add: 'Burkina'; add: 'Burundi'; add: 'Cambodia'; add: 'Cameroon'; add: 'Canada'; add: 'Cape Verde'; add: 'Central African Rep'; add: 'Chad'; add: 'Chile'; add: 'China'; add: 'Colombia'; add: 'Comoros'; add: 'Congo'; add: 'Congo {Democratic Rep}'; add: 'Costa Rica'; add: 'Croatia'; add: 'Cuba'; add: 'Cyprus'; add: 'Czech Republic'; add: 'Denmark'; add: 'Djibouti'; add: 'Dominica'; add: 'Dominican Republic'; add: 'East Timor'; add: 'Ecuador'; add: 'Egypt'; add: 'El Salvador'; add: 'Equatorial Guinea'; add: 'Eritrea'; add: 'Estonia'; add: 'Ethiopia'; add: 'Fiji'; add: 'Finland'; add: 'France'; add: 'Gabon'; add: 'Gambia'; add: 'Georgia'; add: 'Germany'; add: 'Ghana'; add: 'Greece'; add: 'Grenada'; add: 'Guatemala'; add: 'Guinea'; add: 'Guinea-Bissau'; add: 'Guyana'; add: 'Haiti'; add: 'Honduras'; add: 'Hungary'; add: 'Iceland'; add: 'India'; add: 'Indonesia'; add: 'Iran'; add: 'Iraq'; add: 'Ireland {Republic}'; add: 'Israel'; add: 'Italy'; add: 'Ivory Coast'; add: 'Jamaica'; add: 'Japan'; add: 'Jordan'; add: 'Kazakhstan'; add: 'Kenya'; add: 'Kiribati'; add: 'Korea North'; add: 'Korea South'; add: 'Kosovo'; add: 'Kuwait'; add: 'Kyrgyzstan'; add: 'Laos'; add: 'Latvia'; add: 'Lebanon'; add: 'Lesotho'; add: 'Liberia'; add: 'Libya'; add: 'Liechtenstein'; add: 'Lithuania'; add: 'Luxembourg'; add: 'Macedonia'; add: 'Madagascar'; add: 'Malawi'; add: 'Malaysia'; add: 'Maldives'; add: 'Mali'; add: 'Malta'; add: 'Marshall Islands'; add: 'Mauritania'; add: 'Mauritius'; add: 'Mexico'; add: 'Micronesia'; add: 'Moldova'; add: 'Monaco'; add: 'Mongolia'; add: 'Montenegro'; add: 'Morocco'; add: 'Mozambique'; add: 'Myanmar, {Burma}'; add: 'Namibia'; add: 'Nauru'; add: 'Nepal'; add: 'Netherlands'; add: 'New Zealand'; add: 'Nicaragua'; add: 'Niger'; add: 'Nigeria'; add: 'Norway'; add: 'Oman'; add: 'Pakistan'; add: 'Palau'; add: 'Panama'; add: 'Papua New Guinea'; add: 'Paraguay'; add: 'Peru'; add: 'Philippines'; add: 'Poland'; add: 'Portugal'; add: 'Qatar'; add: 'Romania'; add: 'Russian Federation'; add: 'Rwanda'; add: 'St Kitts & Nevis'; add: 'St Lucia'; add: 'Saint Vincent & the Grenadines'; add: 'Samoa'; add: 'San Marino'; add: 'Sao Tome & Principe'; add: 'Saudi Arabia'; add: 'Senegal'; add: 'Serbia'; add: 'Seychelles'; add: 'Sierra Leone'; add: 'Singapore'; add: 'Slovakia'; add: 'Slovenia'; add: 'Solomon Islands'; add: 'Somalia'; add: 'South Africa'; add: 'South Sudan'; add: 'Spain'; add: 'Sri Lanka'; add: 'Sudan'; add: 'Suriname'; add: 'Swaziland'; add: 'Sweden'; add: 'Switzerland'; add: 'Syria'; add: 'Taiwan'; add: 'Tajikistan'; add: 'Tanzania'; add: 'Thailand'; add: 'Togo'; add: 'Tonga'; add: 'Trinidad & Tobago'; add: 'Tunisia'; add: 'Turkey'; add: 'Turkmenistan'; add: 'Tuvalu'; add: 'Uganda'; add: 'Ukraine'; add: 'United Arab Emirates'; add: 'United Kingdom'; add: 'United States'; add: 'Uruguay'; add: 'Uzbekistan'; add: 'Vanuatu'; add: 'Vatican City'; add: 'Venezuela'; add: 'Vietnam'; add: 'Yemen'; add: 'Zambia'; add: 'Zimbabwe'; yourself)

repository/JQuery-Tests-Core.package/JQJsonFunctionalTest.class/instance/countriesForCurrencyCode..st

@@ -0,0 +1,4 @@
+private
+countriesForCurrencyCode: aCurrencyCode
+
+	^ self countriesPerCurrencyCode at: aCurrencyCode

repository/JQuery-Tests-Core.package/JQJsonFunctionalTest.class/instance/countriesPerCurrencyCode.st

@@ -0,0 +1,197 @@
+private
+countriesPerCurrencyCode
+
+	^ Dictionary new
+		  add: 'AFN' -> #( 'Afghanistan' );
+		  add: 'ALL' -> #( 'Albania' );
+		  add: 'DZD' -> #( 'Algeria' );
+		  add:
+			  'USD' -> #( 'American Samoa' 'British Indian Ocean Territory'
+				     'East Timor' 'Guam' 'Marshall Islands' 'Micronesia, Federated States of'
+				     'Northern Mariana Islands' 'Palau' 'Puerto Rico'
+				     'Turks and Caicos Islands' 'United States' 'United States Minor Outlying Islands'
+				     'Virgin Islands, British' 'Virgin Islands, U.S.' );
+		  add: 'EUR'
+			  -> #( 'Andorra' 'Austria' 'Belgium' 'Croatia' 'Cyprus' 'Estonia'
+				     'Finland' 'France' 'French Guiana' 'French Southern territories'
+				     'Germany' 'Greece' 'Guadeloupe' 'Holy See (Vatican City State)'
+				     'Ireland' 'Italy' 'Latvia' 'Lithuania' 'Luxembourg'
+				     'Malta' 'Martinique' 'Mayotte' 'Monaco' 'Netherlands'
+				     'Portugal' 'Reunion' 'Saint Pierre and Miquelon'
+				     'San Marino' 'Slovakia' 'Slovenia' 'Spain' );
+		  add: 'AOA' -> #( 'Angola' );
+		  add: 'XCD'
+			  ->
+				  #( 'Anguilla' 'Antarctica' 'Antigua and Barbuda'
+				     'Dominica' 'Grenada' 'Montserrat' 'Saint Kitts and Nevis'
+				     'Saint Lucia' 'Saint Vincent and the Grenadines' );
+		  add: 'ARS' -> #( 'Argentina' );
+		  add: 'AMD' -> #( 'Armenia' );
+		  add: 'AWG' -> #( 'Aruba' );
+		  add:
+			  'AUD'
+			  -> #( 'Australia' 'Christmas Island' 'Cocos (Keeling) Islands'
+				     'Heard Island and McDonald Islands'
+				     'Kiribati' 'Nauru' 'Norfolk Island' 'Tuvalu' );
+		  add: 'AZN' -> #( 'Azerbaijan' );
+		  add: 'BSD' -> #( 'Bahamas' );
+		  add: 'BHD' -> #( 'Bahrain' );
+		  add: 'BDT' -> #( 'Bangladesh' );
+		  add: 'BBD' -> #( 'Barbados' );
+		  add: 'BYR' -> #( 'Belarus' );
+		  add: 'BZD' -> #( 'Belize' );
+		  add: 'XOF'
+			  ->
+				  #( 'Benin' 'Burkina Faso' 'Ivory Coast' 'Mali' 'Niger' 'Senegal'
+				     'Togo' );
+		  add: 'BMD' -> #( 'Bermuda' );
+		  add: 'BTN' -> #( 'Bhutan' );
+		  add: 'BOB' -> #( 'Bolivia' );
+		  add: 'BAM' -> #( 'Bosnia and Herzegovina' );
+		  add: 'BWP' -> #( 'Botswana' );
+		  add:
+			  'NOK' -> #( 'Bouvet Island' 'Norway' 'Svalbard and Jan Mayen' );
+		  add: 'BRL' -> #( 'Brazil' );
+		  add: 'BND' -> #( 'Brunei' );
+		  add: 'BGN' -> #( 'Bulgaria' );
+		  add: 'BIF' -> #( 'Burundi' );
+		  add: 'KHR' -> #( 'Cambodia' );
+		  add: 'XAF'
+			  ->
+				  #( 'Cameroon' 'Central African Republic'
+				     'Chad' 'Congo' 'Equatorial Guinea' 'Gabon' );
+		  add: 'CAD' -> #( 'Canada' );
+		  add: 'CVE' -> #( 'Cape Verde' );
+		  add: 'KYD' -> #( 'Cayman Islands' );
+		  add: 'CLP' -> #( 'Chile' );
+		  add: 'CNY' -> #( 'China' );
+		  add: 'COP' -> #( 'Colombia' );
+		  add: 'KMF' -> #( 'Comoros' );
+		  add:
+			  'NZD'
+			  -> #( 'Cook Islands' 'New Zealand' 'Niue' 'Pitcairn Islands'
+				     'Tokelau' );
+		  add: 'CRC' -> #( 'Costa Rica' );
+		  add: 'CUP' -> #( 'Cuba' );
+		  add: 'CZK' -> #( 'Czech Republic' );
+		  add: 'DKK' -> #( 'Denmark' 'Faroe Islands' 'Greenland' );
+		  add: 'DJF' -> #( 'Djibouti' );
+		  add: 'DOP' -> #( 'Dominican Republic' );
+		  add: 'ECS' -> #( 'Ecuador' );
+		  add: 'EGP' -> #( 'Egypt' );
+		  add: 'SVC' -> #( 'El Salvador' );
+		  add: 'GBP'
+			  ->
+				  #( 'England' 'Northern Ireland' 'Scotland' 'South Georgia and the South Sandwich Islands'
+				     'United Kingdom' 'Wales' );
+		  add: 'ERN' -> #( 'Eritrea' );
+		  add: 'SZL' -> #( 'Eswatini' );
+		  add: 'ETB' -> #( 'Ethiopia' );
+		  add: 'FKP' -> #( 'Falkland Islands' );
+		  add: 'FJD' -> #( 'Fiji Islands' );
+		  add:
+			  'XPF'
+			  -> #( 'French Polynesia' 'New Caledonia' 'Wallis and Futuna' );
+		  add: 'GMD' -> #( 'Gambia' );
+		  add: 'GEL' -> #( 'Georgia' );
+		  add: 'GHS' -> #( 'Ghana' );
+		  add: 'GIP' -> #( 'Gibraltar' );
+		  add: 'QTQ' -> #( 'Guatemala' );
+		  add: 'GNF' -> #( 'Guinea' );
+		  add: 'CFA' -> #( 'Guinea-Bissau' );
+		  add: 'GYD' -> #( 'Guyana' );
+		  add: 'HTG' -> #( 'Haiti' );
+		  add: 'HNL' -> #( 'Honduras' );
+		  add: 'HKD' -> #( 'Hong Kong' );
+		  add: 'HUF' -> #( 'Hungary' );
+		  add: 'ISK' -> #( 'Iceland' );
+		  add: 'INR' -> #( 'India' );
+		  add: 'IDR' -> #( 'Indonesia' );
+		  add: 'IRR' -> #( 'Iran' );
+		  add: 'IQD' -> #( 'Iraq' );
+		  add: 'ILS' -> #( 'Israel' );
+		  add: 'JMD' -> #( 'Jamaica' );
+		  add: 'JPY' -> #( 'Japan' );
+		  add: 'JOD' -> #( 'Jordan' );
+		  add: 'KZT' -> #( 'Kazakhstan' );
+		  add: 'KES' -> #( 'Kenya' );
+		  add: 'KWD' -> #( 'Kuwait' );
+		  add: 'KGS' -> #( 'Kyrgyzstan' );
+		  add: 'LAK' -> #( 'Laos' );
+		  add: 'LBP' -> #( 'Lebanon' );
+		  add: 'LSL' -> #( 'Lesotho' );
+		  add: 'LRD' -> #( 'Liberia' );
+		  add: 'LYD' -> #( 'Libya' );
+		  add: 'CHF' -> #( 'Liechtenstein' 'Switzerland' );
+		  add: 'MOP' -> #( 'Macau' );
+		  add: 'MKD' -> #( 'North Macedonia' );
+		  add: 'MGF' -> #( 'Madagascar' );
+		  add: 'MWK' -> #( 'Malawi' );
+		  add: 'MYR' -> #( 'Malaysia' );
+		  add: 'MVR' -> #( 'Maldives' );
+		  add: 'MRO' -> #( 'Mauritania' );
+		  add: 'MUR' -> #( 'Mauritius' );
+		  add: 'MXN' -> #( 'Mexico' );
+		  add: 'MDL' -> #( 'Moldova' );
+		  add: 'MNT' -> #( 'Mongolia' );
+		  add: 'MAD' -> #( 'Morocco' 'Western Sahara' );
+		  add: 'MZN' -> #( 'Mozambique' );
+		  add: 'MMR' -> #( 'Myanmar' );
+		  add: 'NAD' -> #( 'Namibia' );
+		  add: 'NPR' -> #( 'Nepal' );
+		  add: 'ANG' -> #( 'Netherlands Antilles' );
+		  add: 'NIO' -> #( 'Nicaragua' );
+		  add: 'NGN' -> #( 'Nigeria' );
+		  add: 'KPW' -> #( 'North Korea' );
+		  add: 'OMR' -> #( 'Oman' );
+		  add: 'PKR' -> #( 'Pakistan' );
+		  add: nil -> #( 'Palestine' );
+		  add: 'PAB' -> #( 'Panama' );
+		  add: 'PGK' -> #( 'Papua New Guinea' );
+		  add: 'PYG' -> #( 'Paraguay' );
+		  add: 'PEN' -> #( 'Peru' );
+		  add: 'PHP' -> #( 'Philippines' );
+		  add: 'PLN' -> #( 'Poland' );
+		  add: 'QAR' -> #( 'Qatar' );
+		  add: 'RON' -> #( 'Romania' );
+		  add: 'RUB' -> #( 'Russia' );
+		  add: 'RWF' -> #( 'Rwanda' );
+		  add: 'SHP' -> #( 'Saint Helena' );
+		  add: 'WST' -> #( 'Samoa' );
+		  add: 'STD' -> #( 'Sao Tome and Principe' );
+		  add: 'SAR' -> #( 'Saudi Arabia' );
+		  add: 'RSD' -> #( 'Serbia' );
+		  add: 'SCR' -> #( 'Seychelles' );
+		  add: 'SLL' -> #( 'Sierra Leone' );
+		  add: 'SGD' -> #( 'Singapore' );
+		  add: 'SBD' -> #( 'Solomon Islands' );
+		  add: 'SOS' -> #( 'Somalia' );
+		  add: 'ZAR' -> #( 'South Africa' );
+		  add: 'KRW' -> #( 'South Korea' );
+		  add: 'SSP' -> #( 'South Sudan' );
+		  add: 'LKR' -> #( 'Sri Lanka' );
+		  add: 'SDG' -> #( 'Sudan' );
+		  add: 'SRD' -> #( 'Suriname' );
+		  add: 'SEK' -> #( 'Sweden' );
+		  add: 'SYP' -> #( 'Syria' );
+		  add: 'TJS' -> #( 'Tajikistan' );
+		  add: 'TZS' -> #( 'Tanzania' );
+		  add: 'THB' -> #( 'Thailand' );
+		  add: 'CDF' -> #( 'The Democratic Republic of Congo' );
+		  add: 'TOP' -> #( 'Tonga' );
+		  add: 'TTD' -> #( 'Trinidad and Tobago' );
+		  add: 'TND' -> #( 'Tunisia' );
+		  add: 'TRY' -> #( 'Turkey' );
+		  add: 'TMT' -> #( 'Turkmenistan' );
+		  add: 'UGX' -> #( 'Uganda' );
+		  add: 'UAH' -> #( 'Ukraine' );
+		  add: 'AED' -> #( 'United Arab Emirates' );
+		  add: 'UYU' -> #( 'Uruguay' );
+		  add: 'UZS' -> #( 'Uzbekistan' );
+		  add: 'VUV' -> #( 'Vanuatu' );
+		  add: 'VEF' -> #( 'Venezuela' );
+		  add: 'VND' -> #( 'Vietnam' );
+		  add: 'YER' -> #( 'Yemen' );
+		  add: 'ZMW' -> #( 'Zambia' );
+		  add: 'ZWD' -> #( 'Zimbabwe' );
+		  yourself

repository/JQuery-Tests-Core.package/JQJsonFunctionalTest.class/instance/currenciesAndCountriesOn..st

@@ -0,0 +1,10 @@
+private
+currenciesAndCountriesOn: json
+
+	json array: [
+		self listOfCurrencyCodes do:[ :currencyCode |
+			json object: [ 
+				json key: 'currency' value: currencyCode.
+				json key: 'countries' value: [  
+					json array: [ (self countriesForCurrencyCode: currencyCode) do: [ :country |
+						json value: [ json string: country ] ] ] ] ] ] ]

repository/JQuery-Tests-Core.package/JQJsonFunctionalTest.class/instance/listOfCurrencyCodes.st

@@ -0,0 +1,4 @@
+private
+listOfCurrencyCodes
+
+	^ self countriesPerCurrencyCode keys

repository/JQuery-Tests-Core.package/JQJsonFunctionalTest.class/instance/renderJsonCallbackOn..st

@@ -5,5 +5,5 @@ renderJsonCallbackOn: html
 	html textArea id: 'textarea'.
 	html document addLoadScript: 
 		(html jQuery getJson 
-				json: [ :json | self seasidePackagesOn: json ];
+				json: [ :json | self currenciesAndCountriesOn: json ];
 				onSuccess: ((html jQuery id: 'textarea') value: (JSStream on: 'JSON.stringify(arguments[0])')) asFunction)

repository/JQuery-Tests-UI.package/JQAutocompleteFunctionalTest.class/instance/countryNames.st

@@ -0,0 +1,4 @@
+querying
+countryNames 
+
+	^ countryNames ifNil: [ countryNames := self listOfCountryNames ]

repository/JQuery-Tests-UI.package/JQAutocompleteFunctionalTest.class/instance/countryNamesFor..st

@@ -0,0 +1,8 @@
+querying
+countryNamesFor: aString
+	| filtered |
+	filtered := self countryNames
+		select: [ :each | each includesSubstring: aString caseSensitive: false ].
+	filtered size > 10
+		ifTrue: [ filtered := filtered first: 10 ].
+	^ filtered

repository/JQuery-Tests-UI.package/JQAutocompleteFunctionalTest.class/instance/renderContentOn..st

@@ -7,27 +7,26 @@ renderContentOn: html
 	html paragraph: [
 		html label
 			for: html nextId;
-			with: 'Type a Seaside package name (no callback):'.
+			with: 'Type a country name (no callback):'.
 		html break.
 		html textInput
 			id: html lastId;
-			script: (html jQuery this autocomplete sourceCallback: [ :term |
-						 self packageNamesFor: term ]) ].
+			script: (html jQuery this autocomplete sourceCallback: [ :term | self countryNamesFor: term ]) ].
 
 	html paragraph: [
 		html label
 			for: html nextId;
-			with: 'Type a Seaside package name (with callback):'.
+			with: 'Type a country name (with callback):'.
 		html break.
 		html textInput
 			id: html lastId;
 			script: (html jQuery this autocomplete
-					 search: [ :term | self packageNamesFor: term ]
-					 labels: [ :packagename | packagename ]
+					 search: [ :term | self countryNamesFor: term ]
+					 labels: [ :countryName | countryName ]
 					 callback: [ :val :s |
-						 selectedPackageName := val.
-						 s << (s jQuery id: showId) html: [ :r | self renderSelectedPackageNameOn: r ] ]).
+						 selectedCountryName := val.
+						 s << (s jQuery id: showId) html: [ :r | self renderSelectedCountryNameOn: r ] ]).
 		html break.
 		html div
 			id: showId;
-			with: [ self renderSelectedPackageNameOn: html ] ]
+			with: [ self renderSelectedCountryNameOn: html ] ]

repository/JQuery-Tests-UI.package/JQAutocompleteFunctionalTest.class/instance/renderSelectedCountryNameOn..st

@@ -0,0 +1,6 @@
+rendering
+renderSelectedCountryNameOn: html
+
+	html text: (selectedCountryName
+			 ifNil: [ 'No selected country' ]
+			 ifNotNil: [ selectedCountryName , ' was selected' ])

repository/JQuery-Tests-UI.package/JQAutocompleteFunctionalTest.class/properties.json

@@ -7,7 +7,8 @@
 	"classvars" : [ ],
 	"instvars" : [
 		"packages",
-		"selectedPackageName"
+		"countryNames",
+		"selectedCountryName"
 	],
 	"name" : "JQAutocompleteFunctionalTest",
 	"type" : "normal"