Commit f7ba2ff4 authored by Dan Nicolaescu's avatar Dan Nicolaescu
Browse files

* term/w32-win.el (w32-drag-n-drop): Use mapc instead of mapcar.

* term/tvi970.el (terminal-init-tvi970): Likewise.

* term/sun-mouse.el (print-mouse-format): Likewise.

* term/sun.el (scroll-down-in-place, scroll-up-in-place): Use
forward-line instead of previous-line and next-line.
parent f3de57e9
2007-09-23 Dan Nicolaescu <dann@ics.uci.edu>
* term/w32-win.el (w32-drag-n-drop): Use mapc instead of mapcar.
* term/tvi970.el (terminal-init-tvi970): Likewise.
* term/sun-mouse.el (print-mouse-format): Likewise.
* term/sun.el (scroll-down-in-place, scroll-up-in-place): Use
forward-line instead of previous-line and next-line.
2007-09-22 Juri Linkov <juri@jurta.org>
* textmodes/org.el (org-confirm-shell-link-function): Doc fix.
......
......@@ -501,7 +501,7 @@ If there is no documentation string, then the string
(defun print-mouse-format (binding)
(princ (car binding))
(princ ": ")
(mapcar (function
(mapc (function
(lambda (mouse-list)
(princ mouse-list)
(princ " ")))
......
......@@ -32,12 +32,12 @@
(defun scroll-down-in-place (n)
(interactive "p")
(previous-line n)
(forward-line (- n))
(scroll-down n))
(defun scroll-up-in-place (n)
(interactive "p")
(next-line n)
(forward-line n)
(scroll-up n))
(defun kill-region-and-unmark (beg end)
......
......@@ -37,7 +37,7 @@
;; (define-key local-function-key-map "\eO" (make-keymap)))
;; Miscellaneous keys
(mapcar (function (lambda (key-binding)
(mapc (function (lambda (key-binding)
(define-key local-function-key-map
(car key-binding) (nth 1 key-binding))))
'(
......
......@@ -112,7 +112,7 @@ Switch to a buffer editing the last file dropped."
(y (cdr coords)))
(if (and (> x 0) (> y 0))
(set-frame-selected-window nil window))
(mapcar (lambda (file-name)
(mapc (lambda (file-name)
(let ((f (subst-char-in-string ?\\ ?/ file-name))
(coding (or file-name-coding-system
default-file-name-coding-system)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment