diff options
| author | Glenn Morris | 2018-04-20 18:34:39 -0400 |
|---|---|---|
| committer | Glenn Morris | 2018-04-20 18:34:39 -0400 |
| commit | 9c3eeba4db26ddaeead100beea7a96f9fa640918 (patch) | |
| tree | e30a07e6fd48f518c24f5abffb3974ebdef30ec1 /lisp/skeleton.el | |
| parent | 495963cfaf535646350051f47c085b84319572f0 (diff) | |
| download | emacs-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.el | 4 |
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. |
| 43 | It should take strings and characters and return them transformed, or nil | 44 | It should take strings and characters and return them transformed, or nil |
| 44 | which means no transformation. | 45 | which means no transformation. |
| 45 | Typical examples might be `upcase' or `capitalize'.") | 46 | Typical 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. |
| 66 | The variables `v1' and `v2' are still set when calling this.") | 66 | The 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.") |