fix(module/shops): check for the latest occurrence of space

[mahanmoulaei]

This fixes the error that is thrown in case playerInv.open has more than 1 space occurrence in its string value.
Previously, when the playerInv.open value was something like "Cat Cafe Shop 1", the shopType would have been "Cat" instead of "Cat Cafe Shop".

Also tested it with global shops so no such #1146 issue would happen.

[thelindat]

local function test(str, pattern)
	local shopType, shopId = str:match(pattern)
	print('~~~', str, pattern)
	print('type', shopType)
	print('id', shopId)
	print()
end

test("Cat Cafe Shop 1", "^(.-)%s+(%S+)$")
test("Cat Cafe Shop", "^(.-)%s+(%S+)$")

~~~	Cat Cafe Shop 1	^(.-)%s+(%S+)$
type	Cat Cafe Shop
id	1

~~~	Cat Cafe Shop	^(.-)%s+(%S+)$
type	Cat Cafe
id	Shop

[thelindat]

Probably need to double-check other input.