]> code.delx.au - gnu-emacs/commitdiff
Silence sym-comp compilation
authorGlenn Morris <rgm@gnu.org>
Fri, 24 May 2013 03:45:50 +0000 (20:45 -0700)
committerGlenn Morris <rgm@gnu.org>
Fri, 24 May 2013 03:45:50 +0000 (20:45 -0700)
* obsolete/sym-comp.el: No need to load hipper-exp when compiling.
(he-search-string, he-tried-table, he-expand-list)
(he-init-string, he-string-member, he-substitute-string)
(he-reset-string): Declare.

lisp/ChangeLog
lisp/obsolete/sym-comp.el

index ee17699eb40b3fe178ef394a51bd93ff3fab927f..6a094692240cb3f43eb76618679ce77883b52c8c 100644 (file)
@@ -1,5 +1,10 @@
 2013-05-24  Glenn Morris  <rgm@gnu.org>
 
+       * obsolete/sym-comp.el: No need to load hipper-exp when compiling.
+       (he-search-string, he-tried-table, he-expand-list)
+       (he-init-string, he-string-member, he-substitute-string)
+       (he-reset-string): Declare.
+
        * obsolete/options.el (list-options): Use custom-variable-p,
        rather than obsolete alias.
 
index 85d427a3317d27e6de608979dfe0738b3b50899f..4641ca68544bac86b8060ed6cd52fb4b8857b050 100644 (file)
@@ -148,7 +148,13 @@ to be set buffer-locally.  Variables `symbol-completion-symbol-function',
     (completion-in-region (- (point) (length pattern)) (point)
                           completions predicate)))
 \f
-(eval-when-compile (require 'hippie-exp))
+(defvar he-search-string)
+(defvar he-tried-table)
+(defvar he-expand-list)
+(declare-function he-init-string "hippie-exp" (beg end))
+(declare-function he-string-member "hippie-exp" (str lst &optional trans-case))
+(declare-function he-substitute-string "hippie-exp" (str &optional trans-case))
+(declare-function he-reset-string "hippie-exp" ())
 
 ;;;###autoload
 (defun symbol-completion-try-complete (old)