mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-01 08:17:38 +00:00
Code Issues Releases Activity

idlwave trivia.

Browse Source 
* lisp/progmodes/idlwave.el (idlwave-pset): Only used on XEmacs.
(props): Remove unnecessary declaration.
This commit is contained in:
Glenn Morris 2010-11-03 00:57:43 -07:00
parent e337e22c24
commit 0b03a950a0
2 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/ChangeLog
View File

@ -1,5 +1,8 @@
2010-11-03 Glenn Morris <rgm@gnu.org>
* progmodes/idlwave.el (idlwave-pset): Only used on XEmacs.
(props): Remove unnecessary declaration.
* textmodes/ispell.el (ispell-init-process): On Emacs, always use
set-process-query-on-exit-flag.

9
lisp/progmodes/idlwave.el
View File

@ -6911,9 +6911,10 @@ accumulate information on matching completions."
;;----------------------------------------------------------------------
;;----------------------------------------------------------------------
;;----------------------------------------------------------------------
(defvar rtn)
(defun idlwave-pset (item)
(set 'rtn item))
(when (featurep 'xemacs)
(defvar rtn)
(defun idlwave-pset (item)
(set 'rtn item)))
(defun idlwave-popup-select (ev list title &optional sort)
"Select an item in LIST with a popup menu.
@ -7683,7 +7684,6 @@ property indicating the link is added."
(t nil))))
(defvar link) ;dynamic variables set by help callback
(defvar props)
(defun idlwave-complete-sysvar-help (mode word)
(let ((word (or (nth 1 idlwave-completion-help-info) word))
(entry (assoc word idlwave-system-variables-alist)))
@ -9364,5 +9364,4 @@ This function was written since `list-abbrevs' looks terrible for IDLWAVE mode."
(provide 'idlwave)
;; arch-tag: f77f3b0c-c37c-424f-a328-0886fd42b6fb
;;; idlwave.el ends here