Commit 8116f9d6 authored by Per Cederqvist's avatar Per Cederqvist

Insert links to jskom when an image cannot be displayed.

* lyskom-rest.el (lyskom-format-image): Link to jskom when an
  image cannot be displayed.
* swedish-strings.el, english-strings.el (image-no-show): Now
  takes two additional arguments (two links to display).
parent 1d357c67
2019-08-08 Per Cederqvist <cederp@opera.com>
Insert links to jskom when an image cannot be displayed.
* lyskom-rest.el (lyskom-format-image): Link to jskom when an
image cannot be displayed.
* swedish-strings.el, english-strings.el (image-no-show): Now
takes two additional arguments (two links to display).
2018-04-10 Christer Ekholm <che@chrekh.se>
* commands2.el (lyskom-list-news): Remove Duplicate &optional
......
......@@ -1519,7 +1519,7 @@ On since %#8s%#9s")
(reformat-enriched . "enriched")
(reformat-filled . "filled")
(reformat-image . "image")
(image-no-show . "< The image (%#1s) cannot be shown. >")
(image-no-show . "< The image (%#1s) cannot be shown. Try:\n %#2t\n %#3t >")
(reformat-video . "video")
(video-no-show . "< Video (%#1s) not supported. >")
(reformat-audio . "audio")
......
......@@ -2543,10 +2543,14 @@ in lyskom-messages."
(lyskom-create-image imagedata imagetype t)
(point-max)))
(setq msg (lyskom-format 'image-no-show
(lyskom-text-stat-content-type text text-stat)))))
(lyskom-text-stat-content-type text text-stat)
(format "https://jskom.osd.se/texts/?text=%d" (text-stat->text-no text-stat))
(format "https://jskom.lysator.liu.se/texts/?text=%d" (text-stat->text-no text-stat))))))
; Errors just marks it as a no show
(error (setq msg (lyskom-format 'image-no-show
(lyskom-text-stat-content-type text text-stat)))))
(lyskom-text-stat-content-type text text-stat)
(format "https://jskom.osd.se/texts/?text=%d" (text-stat->text-no text-stat))
(format "https://jskom.lysator.liu.se/texts/?text=%d" (text-stat->text-no text-stat))))))
(lyskom-signal-reformatted-text 'reformat-image)
msg)))
......
......@@ -1568,7 +1568,7 @@ Uppkopplad sedan %#8s%#9s")
(reformat-enriched . "enriched")
(reformat-filled . "ombruten")
(reformat-image . "bild")
(image-no-show . "< Bilden (%#1s) kan inte visas. >")
(image-no-show . "< Bilden (%#1s) kan inte visas. Testa:\n %#2t\n %#3t >")
(reformat-video . "video")
(video-no-show . "< Video (%#1s) stds inte. >")
(reformat-audio . "ljud")
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment