[elpa] 156/287: Try to make compatible with 24.4

[Matthew Fidler]

mlf176f2 pushed a commit to branch externals/ergoemacs-mode
in repository elpa.

commit 310200dcd8cbd99bcfc5e22a73d57446ddef9cf9
Author: Matthew L. Fidler <address@hidden>
Date:   Wed Jun 18 14:29:11 2014 -0500

    Try to make compatible with 24.4
---
 ergoemacs-theme-engine.el |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/ergoemacs-theme-engine.el b/ergoemacs-theme-engine.el
index 8d2b11e..80ebe23 100644
--- a/ergoemacs-theme-engine.el
+++ b/ergoemacs-theme-engine.el
@@ -202,7 +202,9 @@ a set type."
            (if (not (stringp new-value))
                (signal 'invalid-slot-type
                        (list obj slot-name 'string new-value)))
-           (object-set-name-string obj new-value))
+           (funcall (if (fboundp 'eieio-object-set-name-string)
+                        'eieio-object-set-name-string
+                      'object-set-name-string) obj new-value))
           (t (save-match-data (replace-regexp-in-string "::.*$" "" 
(object-name-string obj))))))
    ((or (eq slot-name 'object-symbol)
         (eq slot-name :object-symbol))