[nongnu] elpa/drupal-mode 213ebf5e65 124/308: Fixed eshell site-alias expansion for aliases beginning with @. Suggestion by Tassilo Horn:

[ELPA Syncer]

branch: elpa/drupal-mode
commit 213ebf5e65ff2482b17d59ffd09157b7a0781577
Author: Damon Haley <damon.haley@colorado.edu>
Commit: Damon Haley <damon.haley@colorado.edu>

    Fixed eshell site-alias expansion for aliases beginning with @.  Suggestion 
by Tassilo Horn:
    
    http://tsdh.wordpress.com/2013/05/31/eshell-completion-for-git-bzr-and-hg/
---
 drupal/pcomplete.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/drupal/pcomplete.el b/drupal/pcomplete.el
index 2d1f102539..a1ffca21cc 100644
--- a/drupal/pcomplete.el
+++ b/drupal/pcomplete.el
@@ -47,12 +47,14 @@
 (defun drupal/pcomplete-drush-completion ()
   "Completion for `drush'."
   ;; Completion for the command argument.
-  (pcomplete-here* drupal/pcomplete-drush-commands)
+  (let ((pcomplete-try-first-hook (remove 'eshell-complete-host-reference
+                                        pcomplete-try-first-hook)))
+    (pcomplete-here* drupal/pcomplete-drush-commands)
   (cond
    ((pcomplete-match "help" 1)
     (pcomplete-here* drupal/pcomplete-drush-commands))
    (t
-    (while (pcomplete-here (pcomplete-entries))))))
+    (while (pcomplete-here (pcomplete-entries)))))))
 
 (defalias 'pcomplete/drush 'drupal/pcomplete-drush-completion)