Mercurial > hg > xemacs-beta

comparison lisp/vm/vm-mouse.el @ 136:b980b6286996 r20-2b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b2
author cvs
date Mon, 13 Aug 2007 09:31:12 +0200
parents 1370575f1259
children 585fb297b004
comparison
equal deleted inserted replaced
135:4636a6841cd6 136:b980b6286996
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-buffer-file-coding-system 'no-conversion nil)) 225 (set-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)))