Function: bs--goto-current-buffer

bs--goto-current-buffer is a byte-compiled function defined in bs.el.gz.

Signature

(bs--goto-current-buffer)

Documentation

Go to line which represents the current buffer.

Actually, it goes to the line which begins with the character in bs-string-current or bs-string-current-marked.

Source Code

;; Defined in /usr/src/emacs/lisp/bs.el.gz
(defun bs--goto-current-buffer ()
  "Go to line which represents the current buffer.
Actually, it goes to the line which begins with the character
in `bs-string-current' or `bs-string-current-marked'."
  (let ((regexp (concat "^"
			(regexp-quote bs-string-current)
			"\\|^"
			(regexp-quote bs-string-current-marked)))
	point)
    (save-excursion
      (goto-char (point-min))
      (when (search-forward-regexp regexp nil t)
	(setq point (1- (point)))))
    (when point
      (goto-char point))))