From eeb947b3fd5a0d30de6c39b5058ab6162cfed810 Mon Sep 17 00:00:00 2001
From: 10sr <8slashes+git@gmail.com>
Date: Fri, 18 Oct 2013 14:41:47 +0900
Subject: [PATCH] show user@host in minibuffer

---
 emacs.el | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/emacs.el b/emacs.el
index 721af95..c472afb 100644
--- a/emacs.el
+++ b/emacs.el
@@ -2056,5 +2056,15 @@ this is test, does not rename files"
 ;; (defadvice message (before message-for-stupid (arg &rest arg2) activate)
 ;;   (setq arg
 ;;         (concat arg
-;;                 (if (eq nil (string-match "\\. *$" arg)) ".")
+;;                 (if (eq nil
+;;                         (string-match "\\. *$"
+;;                                       arg))
+;;                     ".")
 ;;                 " Stupid!")))
+
+;; show usename and hostname when prompting something in minibuffer
+(defadvice read-from-minibuffer
+  (before message-for-stupid (prompt &rest args) activate)
+  (setq prompt
+        (concat "[" user-login-name "@" system-name "] "
+                prompt)))