asciidoctor

asciidoctor

[Gottfried]

[-- Attachment #1.1.1: Type: text/plain, Size: 2979 bytes --]

Hi everybody,

I installed asccidoc and asciidoctor

and I was able to open adoc-mode in emacs.

But what are with those messages?

Warning (comp): adoc-mode.el:177:1: Warning: Package cl is deprecated 
Disable showing Disable logging
Warning (comp): adoc-mode.el:334:1: Warning: defcustom for 
‘adoc-default-title-type’ fails to specify type Disable showing Disable 
logging
Warning (comp): adoc-mode.el:334:1: Warning: defcustom for 
‘adoc-default-title-type’ fails to specify type Disable showing Disable 
logging
Warning (comp): adoc-mode.el:339:1: Warning: defcustom for 
‘adoc-default-title-sub-type’ fails to specify type Disable showing 
Disable logging
Warning (comp): adoc-mode.el:339:1: Warning: defcustom for 
‘adoc-default-title-sub-type’ fails to specify type Disable showing 
Disable logging
Warning (comp): adoc-mode.el:442:1: Warning: defconst 
`adoc-summarize-re-uolisti' docstring wider than 80 characters Disable 
showing Disable logging
Warning (comp): adoc-mode.el:1329:20: Warning: ‘some’ is an obsolete 
function (as of 27.1); use ‘cl-some’ instead. Disable showing Disable 
logging
Warning (comp): adoc-mode.el:1334:25: Warning: ‘some’ is an obsolete 
function (as of 27.1); use ‘cl-some’ instead. Disable showing Disable 
logging
Warning (comp): adoc-mode.el:1334:25: Warning: value returned from 
(match-beginning x) is unused Disable showing Disable logging
Warning (comp): adoc-mode.el:1334:25: Warning: value returned from 
(match-beginning x) is unused Disable showing Disable logging
Warning (comp): adoc-mode.el:2266:45: Warning: 
‘font-lock-fontify-buffer’ is for interactive use only; use 
‘font-lock-ensure’ or ‘font-lock-flush’ instead. Disable showing Disable 
logging
Warning (comp): adoc-mode.el:2645:15: Warning: reference to free 
variable ‘tempo-user-elements’ Disable showing Disable logging
Warning (comp): adoc-mode.el:2645:15: Warning: assignment to free 
variable ‘tempo-user-elements’ Disable showing Disable logging
Warning (comp): adoc-mode.el:2661:25: Warning: reference to free 
variable ‘tempo-insert-region’ Disable showing Disable logging
Warning (comp): adoc-mode.el:2815:46: Warning: reference to free 
variable ‘arg’ Disable showing Disable logging
Warning (comp): adoc-mode.el:2853:12: Warning: reference to free 
variable ‘unicode-character-list’ Disable showing Disable logging
Warning (comp): adoc-mode.el:3004:4: Warning: ‘easy-menu-add’ is an 
obsolete function (as of 28.1); this was always a no-op in Emacs and can 
be safely removed. Disable showing Disable logging
Warning (comp): adoc-mode.el:3004:18: Warning: reference to free 
variable ‘adoc-mode-menu’ Disable showing Disable logging
Warning (comp): adoc-mode.el:2630:28: Warning: the function 
‘tempo-insert’ is not known to be defined. Disable showing Disable logging

How to solve that?

Kind regards

Gottfried


[-- Attachment #1.1.2: OpenPGP public key --]
[-- Type: application/pgp-keys, Size: 3191 bytes --]

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 840 bytes --]

Re: asciidoctor

[Eli Zaretskii]

> Date: Thu,  9 Feb 2023 16:50:55 +0000
> From: Gottfried <gottfried@posteo.de>
> 
> Warning (comp): adoc-mode.el:3004:18: Warning: reference to free 
> variable ‘adoc-mode-menu’ Disable showing Disable logging
> Warning (comp): adoc-mode.el:2630:28: Warning: the function 
> ‘tempo-insert’ is not known to be defined. Disable showing Disable logging
> 
> How to solve that?

Either fix those packages not to use 'cl', or shut up the warnings by
clicking the button they show.

Re: asciidoctor

[Jean Louis]

* Gottfried <gottfried@posteo.de> [2023-02-09 19:51]:
> Hi everybody,
> 
> I installed asccidoc and asciidoctor
> 
> and I was able to open adoc-mode in emacs.
> 
> But what are with those messages?

You need not put attention on it. It is not critical. adoc-mode will
work.

Here are some handy functions, I have modified it for you that you get
preview of Asciidoc by using `asciidoctor` implementation (not
asciidoc one). Both are good, but try this one first.

You need to put functions somewhere.

If you are in markdown or asciidoc mode you will get preview with C-c a

(defun string-to-file-force (string file)
  "Prints string into file, matters not if file exists. Return FILE as file name."
  (with-temp-file file
    (insert string))
  file)

(defun rcd-command-output-from-input (program input &rest args)
  "Return output string from PROGRAM with given INPUT string and optional ARGS."
  (let* ((output (with-temp-buffer
		   (insert input)
		   (apply #'call-process-region nil nil program t '(t nil) nil args)
		   (buffer-string))))
    output))

(defun rcd-asciidoctor (string &rest args)
  "Return HTML by using Asciidoctor markup STRING."
  (let ((asciidoctor (executable-find "asciidoctor")))
    (apply 'rcd-command-output-from-input "asciidoctor" string "-" args)))

(defun rcd-asciidoctor-preview ()
  "Preview asciidoctor"
  (interactive)
  (let ((asciidoctor (executable-find "asciidoctor")))
    (when asciidoctor 
      (let* ((output (buffer-string))
	     (output (rcd-asciidoctor output))
	     (file (string-to-file-force output "asciidoctor-preview.html")))
	(browse-url file)))))

(require 'adoc-mode)
(define-key adoc-mode-map (kbd "C-c a") #'rcd-asciidoctor-preview)






-- 
Jean

Take action in Free Software Foundation campaigns:
https://www.fsf.org/campaigns

In support of Richard M. Stallman
https://stallmansupport.org/

Re: asciidoctor

[Gottfried]

[-- Attachment #1.1.1: Type: text/plain, Size: 2122 bytes --]

Hi Jean,

thank you very much.

I copied it into my init.el file and it works.

when I did a

C-c a my browser Icecat opened and the file was shown.

I am very happy.

kind regards

Gottfried


Am 09.02.23 um 19:41 schrieb Jean Louis:
> * Gottfried <gottfried@posteo.de> [2023-02-09 19:51]:
>> Hi everybody,
>>
>> I installed asccidoc and asciidoctor
>>
>> and I was able to open adoc-mode in emacs.
>>
>> But what are with those messages?
> 
> You need not put attention on it. It is not critical. adoc-mode will
> work.
> 
> Here are some handy functions, I have modified it for you that you get
> preview of Asciidoc by using `asciidoctor` implementation (not
> asciidoc one). Both are good, but try this one first.
> 
> You need to put functions somewhere.
> 
> If you are in markdown or asciidoc mode you will get preview with C-c a
> 
> (defun string-to-file-force (string file)
>    "Prints string into file, matters not if file exists. Return FILE as file name."
>    (with-temp-file file
>      (insert string))
>    file)
> 
> (defun rcd-command-output-from-input (program input &rest args)
>    "Return output string from PROGRAM with given INPUT string and optional ARGS."
>    (let* ((output (with-temp-buffer
> 		   (insert input)
> 		   (apply #'call-process-region nil nil program t '(t nil) nil args)
> 		   (buffer-string))))
>      output))
> 
> (defun rcd-asciidoctor (string &rest args)
>    "Return HTML by using Asciidoctor markup STRING."
>    (let ((asciidoctor (executable-find "asciidoctor")))
>      (apply 'rcd-command-output-from-input "asciidoctor" string "-" args)))
> 
> (defun rcd-asciidoctor-preview ()
>    "Preview asciidoctor"
>    (interactive)
>    (let ((asciidoctor (executable-find "asciidoctor")))
>      (when asciidoctor
>        (let* ((output (buffer-string))
> 	     (output (rcd-asciidoctor output))
> 	     (file (string-to-file-force output "asciidoctor-preview.html")))
> 	(browse-url file)))))
> 
> (require 'adoc-mode)
> (define-key adoc-mode-map (kbd "C-c a") #'rcd-asciidoctor-preview)
> 
> 


[-- Attachment #1.1.2: OpenPGP public key --]
[-- Type: application/pgp-keys, Size: 3191 bytes --]

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 840 bytes --]