diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 11:26:42 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 11:26:42 +0000 |
| commit | 71296446d3cec5bb2a27bc5ad6da574df38d0ec8 (patch) | |
| tree | 0204c3c252547a44e2404959409034406f7680cd /lisp/dabbrev.el | |
| parent | 693ff6134cb2ec65c7d188696f012662edadfbf0 (diff) | |
| download | emacs-71296446d3cec5bb2a27bc5ad6da574df38d0ec8.tar.gz | |
Trailing whitespace deleted.
Diffstat (limited to 'lisp/dabbrev.el')
| -rw-r--r-- | lisp/dabbrev.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/dabbrev.el b/lisp/dabbrev.el index fd8b596d530..b31760ff654 100644 --- a/lisp/dabbrev.el +++ b/lisp/dabbrev.el @@ -751,7 +751,7 @@ DIRECTION = 0 means try both backward and forward. IGNORE-CASE non-nil means ignore case when searching. This sets `dabbrev--last-direction' to 1 or -1 according to the direction in which the occurrence was actually found. -It sets `dabbrev--last-expansion-location' to the location +It sets `dabbrev--last-expansion-location' to the location of the start of the occurrence." (save-excursion ;; If we were scanning something other than the current buffer, @@ -921,7 +921,7 @@ to record whether we upcased the expansion, downcased it, or did neither." ;; record if we upcased or downcased the first word, ;; in order to do likewise for subsequent words. (and record-case-pattern - (setq dabbrev--last-case-pattern + (setq dabbrev--last-case-pattern (and use-case-replace (cond ((equal abbrev (upcase abbrev)) 'upcase) ((equal abbrev (downcase abbrev)) 'downcase))))) |