Skip to content
Browse files

updated hs-mode support

git-svn-id: svn+ssh://rubyforge.org/var/svn/emacs-rails/trunk@210 cc5033d0-740f-0410-afc7-949910e492f2
  • Loading branch information...
1 parent bfc5b8f commit aea5974abe7bace94260490ae4495d2a045d8884 dimaexe committed Aug 16, 2007
Showing with 4 additions and 3 deletions.
  1. +4 −3 rails-ruby.el
View
7 rails-ruby.el
@@ -59,12 +59,15 @@ See the variable `align-rules-list' for more details.")
(defun display-code-line-counts (ov)
(when (eq 'code (overlay-get ov 'hs))
(overlay-put ov 'face 'font-lock-comment-face)
-; (overlay-put ov 'help-echo (buffer-substring-no-properties (overlay-start ov) (overlay-end ov)))
(overlay-put ov 'display
(format " ··· %d lines"
(count-lines (overlay-start ov)
(overlay-end ov))))))
+(eval-after-load "hs-mode"
+ (unless hs-set-up-overlay
+ (setq hs-set-up-overlay 'display-code-line-counts)))
+
(defun ruby-hs-minor-mode (&optional arg)
(interactive)
(require 'hideshow)
@@ -79,8 +82,6 @@ See the variable `align-rules-list' for more details.")
;(lambda (&rest args) (ruby-beginning-of-defun))
)
hs-special-modes-alist)))
- (unless hs-set-up-overlay
- (setq hs-set-up-overlay 'display-code-line-counts))
(hs-minor-mode arg))
;; flymake ruby support

0 comments on commit aea5974

Please sign in to comment.
Something went wrong with that request. Please try again.