Mercurial > hg > xemacs-beta

comparison lisp/prim/lisp.el @ 70:131b0175ea99 r20-0b30

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b30
author cvs
date Mon, 13 Aug 2007 09:02:59 +0200
parents 8d2a9b52c682
children 54cc21c15cbb
comparison
equal deleted inserted replaced
69:804d1389bcd6 70:131b0175ea99
113 (defun backward-up-list (arg) 113 (defun backward-up-list (arg)
114 "Move backward out of one level of parentheses. 114 "Move backward out of one level of parentheses.
115 With argument, do this that many times. 115 With argument, do this that many times.
116 A negative argument means move forward but still to a less deep spot. 116 A negative argument means move forward but still to a less deep spot.
117 In Lisp programs, an argument is required." 117 In Lisp programs, an argument is required."
118 (interactive "_p") 118 (interactive "p")
119 (up-list (- arg))) 119 (up-list (- arg)))
120 120
121 (defun up-list (arg) 121 (defun up-list (arg)
122 "Move forward out of one level of parentheses. 122 "Move forward out of one level of parentheses.
123 With argument, do this that many times. 123 With argument, do this that many times.