From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 11 May 2015 02:15:12 +0000 (-0400)
Subject: CEDET (srecode-insert-fcn): Fix use of oref on a class
X-Git-Tag: emacs-25.0.90~2123
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b47f3356fb7ef484a1dc12db58e203404a5d8eef;p=emacs.git

CEDET (srecode-insert-fcn): Fix use of oref on a class

* lisp/cedet/srecode/insert.el (srecode-insert-fcn): Fix use of oref on
a class.  Reported by Pierre Lorenzon.
(srecode-template-inserter-point): Remove declaration.
---

diff --git a/lisp/cedet/srecode/insert.el b/lisp/cedet/srecode/insert.el
index 426e0783982..c2a70fe030f 100644
--- a/lisp/cedet/srecode/insert.el
+++ b/lisp/cedet/srecode/insert.el
@@ -35,7 +35,6 @@
 (require 'srecode/args)
 (require 'srecode/filters)
 
-(defvar srecode-template-inserter-point)
 (declare-function srecode-overlaid-activate "srecode/fields")
 (declare-function srecode-template-inserted-region "srecode/fields")
 
@@ -145,7 +144,7 @@ has set everything up already."
 	       )
       (set-buffer standard-output)
       (setq end-mark (point-marker))
-      (goto-char  (oref srecode-template-inserter-point point)))
+      (goto-char  (oref-default 'srecode-template-inserter-point point)))
     (oset-default 'srecode-template-inserter-point point eieio-unbound)
 
     ;; Return the end-mark.