Skip to content

Commit

Permalink
fixing 'reference/assignment to free variable' warnings
Browse files Browse the repository at this point in the history
  • Loading branch information
Jason Filsinger authored and Jason Filsinger committed Jul 9, 2012
1 parent e2405fd commit b06cb3d
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions regpop.el
Original file line number Diff line number Diff line change
Expand Up @@ -41,7 +41,7 @@ line number containing the regex.")
(defun regpop-buffer-lines-to-list(&optional buffer)
"Returns a list of strings for every line in a buffer."
(let ((prevBuffer (current-buffer))
(needBufferSwitch (and buffer (not (eq buffer (current-buffer))))))
(needBufferSwitch (and buffer (not (eq buffer (current-buffer))))) buffer-lines)
(when needBufferSwitch (set-buffer buffer))
(setq buffer-lines (split-string (buffer-substring-no-properties (buffer-end -1) (buffer-end 1)) "\n" nil))
(when needBufferSwitch (set-buffer prevBuffer))
Expand Down Expand Up @@ -82,7 +82,7 @@ line number containing the regex.")

(defun* regpop* (regex &key index buffer point)
"Display a popup for all instinces of a regex in a buffer."
(let ((regexList (regpop-get-match-list regex index buffer)))
(let ((regexList (regpop-get-match-list regex index buffer)) tempLine)
(when regexList
(setq tempLine (if (> (length regexList) 1)
(popup-menu* regexList :isearch regpop-isearch :point point)
Expand Down

0 comments on commit b06cb3d

Please sign in to comment.