diff options
| -rw-r--r-- | emms.el | 16 |
1 files changed, 7 insertions, 9 deletions
@@ -369,15 +369,6 @@ See `emms-repeat-track'." (error "No EMMS player playing right now"))) -;;; Compatibility functions - -(if (not (fboundp 'propertize)) - (defun emms-propertize (string &rest properties) - (set-text-properties 0 (length string) properties string) - string) - (defalias 'emms-propertize 'propertize)) - - ;;; Tracks ;; This is a simple datatype to store track information. @@ -1165,5 +1156,12 @@ If fifth arg LITERAL is non-nil, insert REPLACEMENT literally." text (replace-match replacement fixedcase literal text)))) text))) +(if (not (fboundp 'propertize)) + (defun emms-propertize (string &rest properties) + (set-text-properties 0 (length string) properties string) + string) + (defalias 'emms-propertize 'propertize)) + + (provide 'emms) ;;; emms.el ends here |