[GT Search]: Package - Existing Item Search

seandenigris · Jul 27, 2024 · 3ecaa91 · 3ecaa91
1 parent 3f490d2
commit 3ecaa91
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/src/VirtualStash-Core/VsPackagePrice.class.st b/src/VirtualStash-Core/VsPackagePrice.class.st
@@ -131,6 +131,18 @@ VsPackagePrice >> itemPricesGtViewFor: aView [
 	^ result
 ]
 
+{ #category : #accessing }
+VsPackagePrice >> itemSearchFor: aSearch [
+	<gtSearch>
+
+	^ aSearch list
+		title: 'Items (existing)';
+		priority: 100;
+		items: [ self priceList rootPrices ];
+		filterBySubstring;
+		send: [ :item | self addItem: item ]
+]
+
 { #category : #accessing }
 VsPackagePrice >> itemSearchNewFor: aSearch [
 	<gtSearch>