fix #12400083

expansions/script/c12400083.lua

@@ -232,14 +232,17 @@ function s.shtg2(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function s.shop2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil)
 	if g:GetCount()>0 then
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 		Duel.ConfirmCards(1-tp,g)
+		if c:IsRelateToEffect(e) then 
+		   Duel.Remove(c,POS_FACEUP,REASON_EFFECT)
+		end
 	end
-	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
-
+ 
 end