Mercurial > hg > xemacs-beta

comparison lisp/vm/vm-mouse.el @ 110:fe104dbd9147 r20-1b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b7
author cvs
date Mon, 13 Aug 2007 09:19:45 +0200
parents 360340f9fd5f
children 8619ce7e4c50
comparison
equal deleted inserted replaced
109:e183fc049578 110:fe104dbd9147
215 (insert url ?\n) 215 (insert url ?\n)
216 ;; newline convention used should be the local 216 ;; newline convention used should be the local
217 ;; one, whatever that is. 217 ;; one, whatever that is.
218 (setq buffer-file-type nil) 218 (setq buffer-file-type nil)
219 (and (vm-xemacs-mule-p) 219 (and (vm-xemacs-mule-p)
220 (set-file-coding-system 'no-conversion nil)) 220 (set-buffer-file-coding-system 'no-conversion nil))
221 (write-region (point-min) (point-max) 221 (write-region (point-min) (point-max)
222 (concat "/tmp/Mosaic." pid) 222 (concat "/tmp/Mosaic." pid)
223 nil 0) 223 nil 0)
224 (set-buffer-modified-p nil) 224 (set-buffer-modified-p nil)
225 (kill-buffer work-buffer))) 225 (kill-buffer work-buffer)))