Function: ebrowse-unhide-base-classes

ebrowse-unhide-base-classes is a byte-compiled function defined in ebrowse.el.gz.

Signature

(ebrowse-unhide-base-classes)

Documentation

Unhide the line the cursor is on and all base classes.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/ebrowse.el.gz
(defun ebrowse-unhide-base-classes ()
  "Unhide the line the cursor is on and all base classes."
  (with-silent-modifications
    (save-excursion
      (let (indent last-indent)
	(forward-line 0)
	(when (not (looking-at "\n[^ \t]"))
	  (skip-chars-forward "\n \t")
	  (while (and (or (null last-indent) ;first time
			  (> indent 1))	;not root class
		      (re-search-backward "\n[ \t]*" nil t))
	    (setf indent (- (match-end 0)
			    (match-beginning 0)))
	    (when (or (null last-indent)
		      (< indent last-indent))
	      (setf last-indent indent)
	      (when (ebrowse--hidden-p)
                (ebrowse--unhide (point) (line-end-position 2))))))))))