Make a selection of the image that you want to become the pattern.
Go to "Script-Fu"
Choose "Selection"
Choose "To Pattern"
The new pattern is inserted into the list where you can name it