]> code.delx.au - gnu-emacs/blobdiff - lisp/calc/calc-embed.el
Add a provide statement.
[gnu-emacs] / lisp / calc / calc-embed.el
index ee9c14669239b6734035480163d4108bd3421210..067d233bf4a5d9302eab382ba32405b0a4c4467a 100644 (file)
 ;;; Code:
 
 ;; This file is autoloaded from calc-ext.el.
-(require 'calc-ext)
 
+(require 'calc-ext)
 (require 'calc-macs)
 
-(defun calc-Need-calc-embed () nil)
-
 (defun calc-show-plain (n)
   (interactive "P")
   (calc-wrapper
@@ -331,7 +329,6 @@ This is not required to be present for user-written mode annotations.")
       (aset info 8 val)
       (calc-embedded-update info 14 t t))))
 
-;;;###autoload
 (defun calc-do-embedded-activate (arg cbuf)
   (calc-plain-buffer-only)
   (if arg
@@ -1010,7 +1007,7 @@ The command \\[yank] can retrieve it from there."
              (t
               (set (car (car calc-embed-prev-modes)) 
                     (cdr (car calc-embed-prev-modes)))))
-       (setq calc-embed-prev-modes (cdr prev-modes))))))
+       (setq calc-embed-prev-modes (cdr calc-embed-prev-modes))))))
 
 
 
@@ -1226,5 +1223,7 @@ The command \\[yank] can retrieve it from there."
        (setq bp (if buf nil (cdr bp))))
       (or first calc-embedded-quiet (message "")))))
 
+(provide 'calc-embed)
+
 ;;; arch-tag: 1b8f311e-fba1-40d3-b8c3-1d6f68fd26fc
 ;;; calc-embed.el ends here