branch: externals/xpm
commit 6d65fce82e77550a1a12ccdaa84db6dc135cabb0
Author: Thien-Thi Nguyen <t...@gnu.org>
Commit: Thien-Thi Nguyen <t...@gnu.org>
Use U+2018, U+2019 more
* flower.el: Throughout, use U+2018, U+2019 instead of ` and '.
* xpm-compose.el: Likewise.
* xpm-m2z.el: Likewise.
* xpm-palette.el: Likewise.
* xpm.el: Likewise.
---
flower.el | 10 +++++-----
xpm-compose.el | 2 +-
xpm-m2z.el | 4 ++--
xpm-palette.el | 2 +-
xpm.el | 14 +++++++-------
5 files changed, 16 insertions(+), 16 deletions(-)
diff --git a/flower.el b/flower.el
index 25e6813..e34ef7f 100644
--- a/flower.el
+++ b/flower.el
@@ -1,4 +1,4 @@
-;;; flower.el --- can `xpm-raster' DTRT? -*- lexical-binding: t -*-
+;;; flower.el --- can ‘xpm-raster’ DTRT? -*- lexical-binding: t -*-
;; Copyright (C) 2014-2017 Free Software Foundation, Inc.
@@ -20,10 +20,10 @@
;;; Commentary:
-;; This file helps visualize `xpm-raster' failure modes. Maybe one
-;; day it will be rendered useless by improvements to `xpm-raster'.
+;; This file helps visualize ‘xpm-raster’ failure modes. Maybe one
+;; day it will be rendered useless by improvements to ‘xpm-raster’.
;;
-;; NB: There is no `provide' form.
+;; NB: There is no ‘provide’ form.
;; NB: Loading munges the global keymap -- YHBW!
;;; Code:
@@ -37,7 +37,7 @@
For best results, this should be at least 99 and odd.")
(defun flower (&optional again)
- "Stress `xpm-raster' in various ways."
+ "Stress ‘xpm-raster’ in various ways."
(interactive "P")
(let ((buf (get-buffer "flower")))
(when buf (kill-buffer buf)))
diff --git a/xpm-compose.el b/xpm-compose.el
index cc2399c..7ebe28b 100644
--- a/xpm-compose.el
+++ b/xpm-compose.el
@@ -45,7 +45,7 @@
(defun xpm-buffer-from (image &optional name)
"Return a new XPM buffer initialized from IMAGE.
-IMAGE should have type `xpm'. NAME is the new buffer name,
+IMAGE should have type ‘xpm’. NAME is the new buffer name,
which defaults to the name specified in IMAGE."
(let* ((plist (cdr image))
source populate)
diff --git a/xpm-m2z.el b/xpm-m2z.el
index 1dfc8e2..23e9873 100644
--- a/xpm-m2z.el
+++ b/xpm-m2z.el
@@ -25,7 +25,7 @@
;; "span", i.e., (% (- HI LO -1) 2) => 1, since the origin is *on* an
;; integral coordinate (i.e., intersection of row and column).
;;
-;; This file provides funcs `xpm-m2z-ellipse' and `xpm-m2z-circle' to
+;; This file provides funcs ‘xpm-m2z-ellipse’ and ‘xpm-m2z-circle’ to
;; locally rectify the current situation ("m2z" means "modulo 2 => 0"),
;; with the hope that eventually a generalization can be worked back
;; into artist.el, perhaps as a subpixel-center minor mode of some sort.
@@ -93,7 +93,7 @@ absolute value of RX or RY is less than 1, the value is nil."
;;;###autoload
(defun xpm-m2z-circle (cx cy radius)
- "Like `xpm-m2z-ellipse' with a shared radius RADIUS."
+ "Like ‘xpm-m2z-ellipse’ with a shared radius RADIUS."
(xpm-m2z-ellipse cx cy radius radius))
(provide 'xpm-m2z)
diff --git a/xpm-palette.el b/xpm-palette.el
index 7f7f81e..5bd45a9 100644
--- a/xpm-palette.el
+++ b/xpm-palette.el
@@ -59,7 +59,7 @@
;; Change count of colors by adding N to the current value.
;; But first, move point to POS, which should be
;; the colors list bol (and leave it there when done).
- ;; See `xpm-drop-px' and `xpm-add-px'.
+ ;; See ‘xpm-drop-px’ and ‘xpm-add-px’.
(goto-char (car palette))
(save-excursion
(search-backward "\n\"")
diff --git a/xpm.el b/xpm.el
index 116a42e..c0e69fe 100644
--- a/xpm.el
+++ b/xpm.el
@@ -69,9 +69,9 @@
(autoload 'image-toggle-display "image-mode" t) ; hmm is this TRT?
(defvar xpm-raster-inhibit-continuity-optimization nil
- "Non-nil disables a heuristic in `xpm-raster' filling.
+ "Non-nil disables a heuristic in ‘xpm-raster’ filling.
Normally, if you pass a well-formed (closed, no edge crossings)
-shape to `xpm-raster', then you can ignore this variable.")
+shape to ‘xpm-raster’, then you can ignore this variable.")
(cl-defstruct (xpm--gg ; gathered gleanings
(:type vector) ; no ‘:named’ so no predicate
@@ -92,7 +92,7 @@ shape to `xpm-raster', then you can ignore this variable.")
"Analyze buffer and prepare internal data structures.
When called as a command, display in the echo area a
summary of image dimensions, cpp and palette.
-Set buffer-local variable `xpm--gg' and return its value.
+Set buffer-local variable ‘xpm--gg’ and return its value.
Normally, preparation includes making certain parts of the
buffer intangible. Optional arg SIMPLE non-nil inhibits that."
(interactive)
@@ -177,7 +177,7 @@ buffer intangible. Optional arg SIMPLE non-nil inhibits
that."
;;;###autoload
(defun xpm-generate-buffer (name width height cpp palette)
"Return a new buffer in XPM image format.
-In this buffer, undo is disabled (see `buffer-enable-undo').
+In this buffer, undo is disabled (see ‘buffer-enable-undo’).
NAME is the buffer and XPM name. For best interoperation
with other programs, NAME should be a valid C identifier.
@@ -303,7 +303,7 @@ Optional arg FILL specifies a fill pixel, or t to fill with
EDGE.
If FORM is not closed or has inopportune vertical-facing
concavities, filling might give bad results. For those cases,
-see variable `xpm-raster-inhibit-continuity-optimization'."
+see variable ‘xpm-raster-inhibit-continuity-optimization’."
(when (eq t fill)
(setq fill edge))
(xpm--w/gg (h) (xpm--gate)
@@ -421,7 +421,7 @@ see variable `xpm-raster-inhibit-continuity-optimization'."
(fillarray nin nil)))))))))
(defun xpm-as-xpm (&rest props)
- "Return the XPM image (via `create-image') of the buffer.
+ "Return the XPM image (via ‘create-image’) of the buffer.
PROPS are additional image properties to place on
the new XPM. See info node `(elisp) XPM Images'."
(apply 'create-image (buffer-substring-no-properties
@@ -429,7 +429,7 @@ the new XPM. See info node `(elisp) XPM Images'."
'xpm t props))
(defun xpm-finish (&rest props)
- "Like `xpm-as-xpm', but also kill the buffer afterwards."
+ "Like ‘xpm-as-xpm’, but also kill the buffer afterwards."
(prog1 (apply 'xpm-as-xpm props)
(kill-buffer nil)))
