diff --git a/CHANGES b/CHANGES
index 4a4167da..040064bf 100644
--- a/CHANGES
+++ b/CHANGES
@@ -11,6 +11,7 @@ bash-completion (1.x)
   * Include profile snippet in tarball, install it.
   * Rename contrib/bluez-utils to contrib/bluez to follow bluez 4.x naming.
   * Apply cardctl completion to pccardctl too.
+  * Apply pine completion to alpine too.
 
  -- David Paleino <d.paleino@gmail.com>  Sun, 11 Oct 2009 11:11:57 +0200
 
diff --git a/contrib/pine b/contrib/pine
index 0c96bedd..cee6587d 100644
--- a/contrib/pine
+++ b/contrib/pine
@@ -1,6 +1,6 @@
 # PINE address-book completion
 
-have pine &&
+have pine || have alpine &&
 _pineaddr()
 {
     local cur
@@ -11,7 +11,7 @@ _pineaddr()
     COMPREPLY=( $( compgen -W '$( awk "{print \$1}" ~/.addressbook \
         2>/dev/null)' -- "$cur" ) )
 } &&
-complete -F _pineaddr $default pine
+complete -F _pineaddr $default pine alpine
 
 # Local variables:
 # mode: shell-script