aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/skeleton.el
diff options
context:
space:
mode:
authorGlenn Morris2018-04-20 18:34:39 -0400
committerGlenn Morris2018-04-20 18:34:39 -0400
commit9c3eeba4db26ddaeead100beea7a96f9fa640918 (patch)
treee30a07e6fd48f518c24f5abffb3974ebdef30ec1 /lisp/skeleton.el
parent495963cfaf535646350051f47c085b84319572f0 (diff)
downloademacs-9c3eeba4db26ddaeead100beea7a96f9fa640918.tar.gz
emacs-9c3eeba4db26ddaeead100beea7a96f9fa640918.zip
The tedious game of whack-a-mole with compiler warnings continues
* lisp/abbrev.el (edit-abbrevs-map): * lisp/emacs-lock.el (emacs-lock-from-exiting): * lisp/htmlfontify.el (hfy-optimisations): * lisp/ielm.el (inferior-emacs-lisp-mode-hook) (inferior-emacs-lisp-mode-map): * lisp/isearch.el (isearch-lazy-highlight-word): * lisp/select.el (x-select-enable-clipboard, x-select-enable-primary): * lisp/shell.el (shell-dirtrack-mode): * lisp/skeleton.el (skeleton-transformation, skeleton-filter): * lisp/startup.el (inhibit-splash-screen, inhibit-startup-message): * lisp/window.el (even-window-heights): * lisp/calendar/timeclock.el (timeclock-modeline-display): * lisp/cedet/semantic/db-mode.el (semanticdb-mode-hook) (semanticdb-global-mode): * lisp/emacs-lisp/edebug.el (gud-inhibit-global-bindings): * lisp/emacs-lisp/warnings.el (display-warning-minimum-level) (log-warning-minimum-level): * lisp/erc/erc-dcc.el (erc-dcc-chat-filter-hook): * lisp/gnus/nnspool.el (news-path): * lisp/org/org-agenda.el (org-agenda-search-view-search-words-only) (org-agenda-remove-tags-when-in-prefix) (org-agenda-align-tags-to-column, org-agenda-keymap): * lisp/org/org.el (org-special-ctrl-a) (org-log-state-notes-into-drawer) (org-agenda-multi-occur-extra-files): * lisp/progmodes/flymake-proc.el (flymake-err-line-patterns) (flymake-check-file-limit): * lisp/progmodes/make-mode.el (makefile-query-one-target-method): * lisp/progmodes/octave.el (inferior-octave-startup-hook): * lisp/progmodes/python.el (python-buffer) (python-preoutput-result): * lisp/progmodes/sql.el (sql-dialect): * lisp/textmodes/artist.el (artist-text-renderer): * lisp/textmodes/bibtex.el (bibtex-autokey-name-case-convert) (bibtex-autokey-titleword-case-convert): * lisp/textmodes/flyspell.el (flyspell-generic-check-word-p): * lisp/textmodes/ispell.el (ispell-format-word): * lisp/textmodes/rst.el (rst-preferred-decorations): * lisp/textmodes/sgml-mode.el (sgml-transformation): Move aliases before targets, to silence new compiler warning. * lisp/term/ns-win.el (ns-option-modifier, ns-right-option-modifier): Silence warning.
Diffstat (limited to 'lisp/skeleton.el')
-rw-r--r--lisp/skeleton.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/skeleton.el b/lisp/skeleton.el
index 90e3819cb7f..1d1af825a17 100644
--- a/lisp/skeleton.el
+++ b/lisp/skeleton.el
@@ -37,13 +37,13 @@
37;; page 2: paired insertion 37;; page 2: paired insertion
38;; page 3: mirror-mode, an example for setting up paired insertion 38;; page 3: mirror-mode, an example for setting up paired insertion
39 39
40(defvaralias 'skeleton-transformation 'skeleton-transformation-function)
40 41
41(defvar skeleton-transformation-function 'identity 42(defvar skeleton-transformation-function 'identity
42 "If non-nil, function applied to literal strings before they are inserted. 43 "If non-nil, function applied to literal strings before they are inserted.
43It should take strings and characters and return them transformed, or nil 44It should take strings and characters and return them transformed, or nil
44which means no transformation. 45which means no transformation.
45Typical examples might be `upcase' or `capitalize'.") 46Typical examples might be `upcase' or `capitalize'.")
46(defvaralias 'skeleton-transformation 'skeleton-transformation-function)
47 47
48; this should be a fourth argument to defvar 48; this should be a fourth argument to defvar
49(put 'skeleton-transformation-function 'variable-interactive 49(put 'skeleton-transformation-function 'variable-interactive
@@ -65,11 +65,11 @@ region.")
65 "Hook called at end of skeleton but before going to point of interest. 65 "Hook called at end of skeleton but before going to point of interest.
66The variables `v1' and `v2' are still set when calling this.") 66The variables `v1' and `v2' are still set when calling this.")
67 67
68(defvaralias 'skeleton-filter 'skeleton-filter-function)
68 69
69;;;###autoload 70;;;###autoload
70(defvar skeleton-filter-function 'identity 71(defvar skeleton-filter-function 'identity
71 "Function for transforming a skeleton proxy's aliases' variable value.") 72 "Function for transforming a skeleton proxy's aliases' variable value.")
72(defvaralias 'skeleton-filter 'skeleton-filter-function)
73 73
74(defvar skeleton-untabify nil ; bug#12223 74(defvar skeleton-untabify nil ; bug#12223
75 "When non-nil untabifies when deleting backwards with element -ARG.") 75 "When non-nil untabifies when deleting backwards with element -ARG.")