comparison lisp/vm/vm-mouse.el @ 140:585fb297b004 r20-2b4

Import from CVS: tag r20-2b4
author cvs
date Mon, 13 Aug 2007 09:32:43 +0200
parents b980b6286996
children 43dd3413c7c7
comparison
equal deleted inserted replaced
139:2b5203979d01 140:585fb297b004
220 (insert url ?\n) 220 (insert url ?\n)
221 ;; newline convention used should be the local 221 ;; newline convention used should be the local
222 ;; one, whatever that is. 222 ;; one, whatever that is.
223 (setq buffer-file-type nil) 223 (setq buffer-file-type nil)
224 (and vm-xemacs-mule-p 224 (and vm-xemacs-mule-p
225 (set-file-coding-system 'no-conversion nil)) 225 (set-buffer-file-coding-system 'no-conversion nil))
226 (write-region (point-min) (point-max) 226 (write-region (point-min) (point-max)
227 (concat "/tmp/Mosaic." pid) 227 (concat "/tmp/Mosaic." pid)
228 nil 0) 228 nil 0)
229 (set-buffer-modified-p nil) 229 (set-buffer-modified-p nil)
230 (kill-buffer work-buffer))) 230 (kill-buffer work-buffer)))