Skip to content

Commit

Permalink
Don't require obsolete cl
Browse files Browse the repository at this point in the history
Use cl-lib instead.
  • Loading branch information
tuhdo committed Apr 29, 2015
1 parent e8f75ac commit 13bdba5
Showing 1 changed file with 12 additions and 11 deletions.
23 changes: 12 additions & 11 deletions stickyfunc-enhance.el
Original file line number Diff line number Diff line change
Expand Up @@ -44,7 +44,7 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;;; Code:
(require 'cl)
(require 'cl-lib)
(require 'cc-mode)
(require 'semantic)
(if (not (version< emacs-version "24.4"))
Expand Down Expand Up @@ -192,18 +192,19 @@ TAGS are a list of tags that are function parameters of PARENT-TAG.
PARENT-TAG is a function."
(let ((start-line (line-number-at-pos (window-start))))
(remove-if (lambda (tag)
(>= (line-number-at-pos (if (listp tag)
(semantic-tag-start tag)
(save-excursion
(goto-char (semantic-tag-start parent-tag))
(search-forward tag)
(point))))
start-line))
tags)))
(cl-remove-if (lambda (tag)
(>= (line-number-at-pos (if (listp tag)
(semantic-tag-start tag)
(save-excursion
(goto-char (semantic-tag-start parent-tag))
(search-forward tag)
(point))))
start-line))
tags)))

(provide 'stickyfunc-enhance)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; stickyfunc-enhance.el ends here
;; Local Variables:
;; byte-compile-warnings: (not cl-functions)
;; byte-compile-warnings: t
;; End:

0 comments on commit 13bdba5

Please sign in to comment.