Function String-Remove-Right

Part of:

package weblocks
( string-remove-right < str > < suffix > &key < ignore-case-p > )
If string 'str' ends with 'suffix', remove 'suffix' from the end of
'str'.