diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el
index bcb7fab..680673d 100644
--- a/lisp/emacs-lisp/lisp.el
+++ b/lisp/emacs-lisp/lisp.el
@@ -699,6 +699,7 @@ considered."
 	      :predicate predicate
 	      :annotation-function
 	      (unless (eq predicate 'fboundp)
-		(lambda (str) (if (fboundp (intern-soft str)) " <f>"))))))))
+		(lambda (str) (if (fboundp (intern-soft str)) " <f>")))
+              :exclusive 'no)))))
 
 ;;; lisp.el ends here
diff --git a/lisp/progmodes/octave-mod.el b/lisp/progmodes/octave-mod.el
index ab5a19f..04bad8e 100644
--- a/lisp/progmodes/octave-mod.el
+++ b/lisp/progmodes/octave-mod.el
@@ -975,7 +975,8 @@ otherwise."
         ;; Extend region past point, if applicable.
         (save-excursion (skip-syntax-forward "w_")
                         (setq end (point))))
-    (list beg end octave-completion-alist)))
+    (list beg end octave-completion-alist
+          :exclusive 'no)))
 
 (define-obsolete-function-alias 'octave-complete-symbol
   'completion-at-point "24.1")