summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlex Bennée <alex.bennee@linaro.org>2014-10-10 12:43:09 +0100
committerAlex Bennée <alex.bennee@linaro.org>2014-10-10 12:43:09 +0100
commit67e4f2381db72496579e6a779320ee7092edc158 (patch)
tree14f5ff5055c8e7df93d7587576e0bf836c0d96cd
parente110c0f17a5c518bf6d0934d0aaf816a9b36a764 (diff)
lava-log-mode: make hacking session detection better
-rw-r--r--lava-log-mode.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/lava-log-mode.el b/lava-log-mode.el
index 2a90375..1154b02 100644
--- a/lava-log-mode.el
+++ b/lava-log-mode.el
@@ -39,7 +39,7 @@
"Minimal highlighting expressions for LAVA Log Mode.")
(defvar lava-log-hacking-session
- "Please connect to: .*root@\\([[:digit:].]+\\)"
+ " \\(\\w*@[[:digit:].]\\{7,15\\}+\\)"
"Regex used to find hacking sessions, the capture group includes IP address.")
;;; Mode magic
@@ -56,10 +56,9 @@ found"
(save-excursion
(goto-char (point-min))
(when (re-search-forward lava-log-hacking-session nil t)
- (let* ((ip (match-string 1))
- (ssh-stanza (format "root@%s" ip)))
- (kill-new ssh-stanza)
- (message "Found hacking session prompt: %s" ssh-stanza)))))
+ (let ((login (match-string 1)))
+ (kill-new login)
+ (message "Found hacking session prompt: %s" login)))))
;; Define the mode
;;###autoload