[fixed] Missing clearances of action when forced to strip out of an outfit because you can't wear it

locations/wardrobe.qsrc

@@ -576,6 +576,7 @@ if $ARGS[0] = 'default_entry_wear':
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/vicky/event/vika_game_strip16.mp4"></video></center>'
 		'Your <<$def_clothing_name[default_entry]>> outfit has worn out and can''t be used anymore. Guess you will have to find something else to wear.'
 		act 'Strip out of worn out clothing':
+			cla
 			gs 'clothing', 'strip'
 			gs 'wardrobe', 'default_entry_delete'
 			gs 'stat'
@@ -587,6 +588,7 @@ if $ARGS[0] = 'default_entry_wear':
 		'<center><video autoplay loop src="images/locations/pavlovsk/trainstation/bimbo.strip6.mp4"></video></center>'
 		'You don''t feel daring enough to wear your <<$def_clothing_name[default_entry]>> outfit. Maybe you will be confident enough in the future? Guess you will have to find something else to wear.'
 		act 'Strip out of revealing clothing':
+			cla
 			gs 'clothing', 'strip'
 			gs 'stat'
 			act 'Return': gt 'wardrobe', $wloc
@@ -600,6 +602,7 @@ if $ARGS[0] = 'default_entry_wear':
 			iif(RESULT < pcs_hips - 8,'<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/dressup.mp4"></video></center>','<center><video autoplay loop src="images/locations/pavlovsk/clinic/therapist/stripping<<rand(1,4)>>.mp4"></video></center>')
 			'As you put on your <<$def_clothing_name[default_entry]>> outfit you notice it doesn''t fit correctly anymore. It''s ' + iif(RESULT < pcs_hips - 8,'unbearably tight and uncomfortable to wear.','extremely loose and won''t stay in place no matter how hard you try.') + ' You must have ' + iif(RESULT < pcs_hips - 8,'gained','lost') + ' some weight since this was purchased or last tailored. You will have to get this clothing resized before you can wear it again.'
 			act 'Strip out of ill-fitting clothing':
+				cla
 				gs 'clothing', 'strip'
 				gs 'stat'
 				act 'Return': gt 'wardrobe', $wloc