mirror of
https://git.FreeBSD.org/ports.git
synced 2024-11-04 22:33:27 +00:00
18 lines
460 B
Plaintext
18 lines
460 B
Plaintext
|
;;; -*- Emacs-Lisp -*-
|
||
|
|
;;; PORT_TEXIFMT.MK --- for texinfo-format
|
||
|
|
;;; Code:
|
||
|
|
|
||
|
|
(defun port-texinfo-format (file &optional coding-system)
|
||
|
|
(let (obuf)
|
||
|
|
(find-file (expand-file-name file))
|
||
|
|
(setq obuf (current-buffer))
|
||
|
|
(require 'texinfmt)
|
||
|
|
(texinfo-format-buffer t)
|
||
|
|
(if coding-system
|
||
|
|
(set-buffer-file-coding-system coding-system))
|
||
|
|
(save-buffer)
|
||
|
|
(kill-buffer (current-buffer))
|
||
|
|
(kill-buffer obuf)))
|
||
|
|
|
||
|
|
;;; PORT_TEXIFMT.MK ends here
|