[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
flymake doc fix
From: |
dnz |
Subject: |
flymake doc fix |
Date: |
Wed, 07 Nov 2007 23:35:32 +0300 |
Update flymake-perl-init example to the latest version
(flymake-build-relative-filename replaced with file-relative-name).
diff --git a/doc/misc/flymake.texi b/doc/misc/flymake.texi
index 491ee63..6ab4c19 100644
--- a/doc/misc/flymake.texi
+++ b/doc/misc/flymake.texi
@@ -413,12 +413,9 @@ First, we write the @code{init-function}:
(defun flymake-perl-init ()
(let* ((temp-file (flymake-init-create-temp-buffer-copy
'flymake-create-temp-inplace))
- (local-file (concat (flymake-build-relative-filename
- (file-name-directory
- (buffer-file-name
- (current-buffer)))
- (file-name-directory temp-file))
- (file-name-nondirectory temp-file))))
+ (local-file (file-relative-name
+ temp-file
+ (file-name-directory buffer-file-name))))
(list "perl" (list "-wc " local-file))))
@end lisp