diff options
Diffstat (limited to 'lisp/cedet/semantic/analyze/refs.el')
| -rw-r--r-- | lisp/cedet/semantic/analyze/refs.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/cedet/semantic/analyze/refs.el b/lisp/cedet/semantic/analyze/refs.el index 7fbaa2ce974..d0c84ac1dfd 100644 --- a/lisp/cedet/semantic/analyze/refs.el +++ b/lisp/cedet/semantic/analyze/refs.el @@ -104,7 +104,7 @@ Use `semantic-analyze-current-tag' to debug this fcn." "Return the implementations derived in the reference analyzer REFS. Optional argument IN-BUFFER indicates that the returned tag should be in an active buffer." (let ((allhits (oref refs rawsearchdata)) - (tag (oref refs :tag)) + (tag (slot-value refs 'tag)) (impl nil) ) (semanticdb-find-result-mapc @@ -129,7 +129,7 @@ Optional argument IN-BUFFER indicates that the returned tag should be in an acti "Return the prototypes derived in the reference analyzer REFS. Optional argument IN-BUFFER indicates that the returned tag should be in an active buffer." (let ((allhits (oref refs rawsearchdata)) - (tag (oref refs :tag)) + (tag (slot-value refs 'tag)) (proto nil)) (semanticdb-find-result-mapc (lambda (T DB) |