Mercurial > emacs

comparison lisp/term/sun.el @ 85846:56cec281e296

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* cmdargs.texi (Misc Variables): Remove Sun windows info. * MACHINES: Remove Sun windows info. * term/sun-mouse.el: * obsolete/sun-fns.el: * obsolete/sun-curs.el: Remove files. * term/sun.el (select-previous-complex-command): * sunfns.c: Remove file * m/sun386.h: * m/sun2.h: * m/sparc.h: Remove Sun windows code.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 01 Nov 2007 03:06:23 +0000
parents a91afd109e55
children 107ccd98fa12 880960b70474
comparison
equal deleted inserted replaced
85845:e95712050fdc 85846:56cec281e296
44 "Like kill-region, but pops the mark [which equals point, anyway.]" 44 "Like kill-region, but pops the mark [which equals point, anyway.]"
45 (interactive "r") 45 (interactive "r")
46 (kill-region beg end) 46 (kill-region beg end)
47 (setq this-command 'kill-region-and-unmark) 47 (setq this-command 'kill-region-and-unmark)
48 (set-mark-command t)) 48 (set-mark-command t))
49
50 (defun select-previous-complex-command ()
51 "Select Previous-complex-command"
52 (interactive)
53 (if (zerop (minibuffer-depth))
54 (repeat-complex-command 1)
55 ;; FIXME: this function does not seem to exist. -stef'01
56 (previous-complex-command 1)))
57 49
58 (defun rerun-prev-command () 50 (defun rerun-prev-command ()
59 "Repeat Previous-complex-command." 51 "Repeat Previous-complex-command."
60 (interactive) 52 (interactive)
61 (eval (nth 0 command-history))) 53 (eval (nth 0 command-history)))