private static IElementType findLiteralTokenType(PsiFile file, int selectionStart, int selectionEnd) {
PsiElement elementAtSelection = file.findElementAt(selectionStart);
if (elementAtSelection == null)
return null;
IElementType tokenType = elementAtSelection.getNode().getElementType();
if (tokenType != HaskellTokenTypes.STRING)
return null;
TextRange textRange = elementAtSelection.getTextRange();
if (selectionStart <= textRange.getStartOffset() || selectionEnd >= textRange.getEndOffset()) {
return null;