comparison lisp/sun-curs.el @ 25232:d8024d259129

(sun-curs): Provide `sun-curs', not `sm-cursors'.
author Karl Heuer <kwzh@gnu.org>
date Tue, 10 Aug 1999 17:14:22 +0000
parents be8a62ae8d21
children 2903a7401519
comparison
equal deleted inserted replaced
25231:b587c4aeff78 25232:d8024d259129
212 (if (or (eolp) (char-equal (following-char) 32)) 212 (if (or (eolp) (char-equal (following-char) 32))
213 (setq char (lsh char 1)) 213 (setq char (lsh char 1))
214 (setq char (1+ (lsh char 1)))) 214 (setq char (1+ (lsh char 1))))
215 (if (not (eolp))(forward-char))) 215 (if (not (eolp))(forward-char)))
216 216
217 (provide 'sm-cursors) 217 (provide 'sun-curs)
218 218
219 ;;; sun-curs.el ends here 219 ;;; sun-curs.el ends here