]> git.eshelyaron.com Git - emacs.git/commitdiff
; Fix example in the Flymake manual
authorEli Zaretskii <eliz@gnu.org>
Sat, 17 Jun 2023 07:49:45 +0000 (10:49 +0300)
committerEli Zaretskii <eliz@gnu.org>
Sat, 17 Jun 2023 07:49:45 +0000 (10:49 +0300)
* doc/misc/flymake.texi (An annotated example backend): Fix the
example.  (Bug#64070)

doc/misc/flymake.texi

index c7c46896709296f18f7fbcc9b65a481c49af97bb..66dba8a1d3c0da95d366a987ccb6f363c4a966ed 100644 (file)
@@ -738,9 +738,13 @@ The following code needs lexical binding (@pxref{Using Lexical
 Binding,,, elisp, The Emacs Lisp Reference Manual}) to be active.
 
 @example
+@group
 ;;; ruby-flymake.el --- A ruby Flymake backend  -*- lexical-binding: t; -*-
+(require 'cl-lib)
 (defvar-local ruby--flymake-proc nil)
+@end group
 
+@group
 (defun ruby-flymake (report-fn &rest _args)
   ;; Not having a ruby interpreter is a serious problem which should cause
   ;; the backend to disable itself, so an @code{error} is signaled.
@@ -754,7 +758,9 @@ Binding,,, elisp, The Emacs Lisp Reference Manual}) to be active.
   ;;
   (when (process-live-p ruby--flymake-proc)
     (kill-process ruby--flymake-proc))
+@end group
 
+@group
   ;; Save the current buffer, the narrowing restriction, remove any
   ;; narrowing restriction.
   ;;
@@ -820,11 +826,14 @@ Binding,,, elisp, The Emacs Lisp Reference Manual}) to be active.
       ;;
       (process-send-region ruby--flymake-proc (point-min) (point-max))
       (process-send-eof ruby--flymake-proc))))
+@end group
 
+@group
 (defun ruby-setup-flymake-backend ()
   (add-hook 'flymake-diagnostic-functions 'ruby-flymake nil t))
 
 (add-hook 'ruby-mode-hook 'ruby-setup-flymake-backend)
+@end group
 @end example
 
 @node The legacy Proc backend