🚀 go-pugleaf

GNU Emacs 18.55.0 on ata (berkeley-unix)
Sun OS 4.1
Sun4c

The problem is that the lisp-complete-symbol function uses the current
buffer's syntax table rather than the lisp-mode-syntax-table.  I
noticed this when I started defining elisp functions with a colon (:)
in the name and could not do symbol completion in the minibuffer on
that symbol.

Included are some context diffs for a proposed solution.

Scott D. Kalter  <sdk@twinsun.com>
Chris D. Houser  <chris@twinsun.com>

----------------

*** /usr/tmp/aaaa03778	Mon Aug 13 17:37:57 1990
--- lisp.el	Mon Aug 13 17:37:51 1990
***************
*** 197,207 ****
  or properties are considered."
    (interactive)
    (let* ((end (point))
! 	 (beg (save-excursion
! 		(backward-sexp 1)
! 		(while (= (char-syntax (following-char)) ?\')
! 		  (forward-char 1))
! 		(point)))
  	 (pattern (buffer-substring beg end))
  	 (predicate
  	  (if (eq (char-after (1- beg)) ?\()
--- 197,211 ----
  or properties are considered."
    (interactive)
    (let* ((end (point))
! 	 (beg
! 	  (save-excursion             
! 	    (let ((old-syntax-table (syntax-table)))
! 	      (set-syntax-table lisp-mode-syntax-table)
! 	      (backward-sexp 1)
! 	      (while (= (char-syntax (following-char)) ?\')
! 		(forward-char 1))
! 	      (set-syntax-table old-syntax-table)
! 	      (point))))
  	 (pattern (buffer-substring beg end))
  	 (predicate
  	  (if (eq (char-after (1- beg)) ?\()

----------------