(menu-bar-help-menu): Add menu item for non-English

[gnu-emacs] / lisp / sun-curs.el

diff --git a/lisp/sun-curs.el b/lisp/sun-curs.el
index b95ecde7e17a2aa4b3a12d0e3648a3ac8fb51c07..934114232cdfb2e08f151e300c7dfbfa50e324b5 100644 (file)
--- a/lisp/sun-curs.el
+++ b/lisp/sun-curs.el
@@ -31,7 +31,8 @@
 ;;;
 ;;; 9-dec-86 Jeff Peck, Sun Microsystems Inc. <peck@sun.com>
 
-(require 'cl)
+(eval-when-compile (require 'cl))
+(require 'sun-fns)
 
 (eval-and-compile
   (defvar sc::cursors nil "List of known cursors"))
@@ -214,6 +215,6 @@ Otherwise, ICON should be a vector or the name of a vector of [x y 32-chars]"
     (setq char (1+ (lsh char 1))))
   (if (not (eolp))(forward-char)))
 
-(provide 'sm-cursors)
+(provide 'sun-curs)
 
 ;;; sun-curs.el ends here