diff options
| -rw-r--r-- | emms-compat.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/emms-compat.el b/emms-compat.el index f20588b..74ecb48 100644 --- a/emms-compat.el +++ b/emms-compat.el @@ -103,7 +103,7 @@ If fifth arg LITERAL is non-nil, insert REPLACEMENT literally." (cond ((fboundp 'replace-regexp-in-string) (replace-regexp-in-string regexp replacement text fixedcase literal)) - ((fboundp 'replace-in-string) + ((and (featurep 'xemacs) (fboundp 'replace-in-string)) (replace-in-string text regexp replacement literal)) (t (let ((repl-len (length replacement)) start) |