Mercurial > hg > xemacs-beta

comparison src/minibuf.c @ 5178:97eb4942aec8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge
author Ben Wing <ben@xemacs.org>
date Mon, 29 Mar 2010 21:28:13 -0500
parents a48ef26d87ee
children 308d34e9f07d
comparison
equal deleted inserted replaced
5177:b785049378e3 5178:97eb4942aec8
1 /* Minibuffer input and completion. 1 /* Minibuffer input and completion.
2 Copyright (C) 1985, 1986, 1992-1995 Free Software Foundation, Inc. 2 Copyright (C) 1985, 1986, 1992-1995 Free Software Foundation, Inc.
3 Copyright (C) 1995 Sun Microsystems, Inc. 3 Copyright (C) 1995 Sun Microsystems, Inc.
4 Copyright (C) 2002 Ben Wing. 4 Copyright (C) 2002, 2010 Ben Wing.
5 5
6 This file is part of XEmacs. 6 This file is part of XEmacs.
7 7
8 XEmacs is free software; you can redistribute it and/or modify it 8 XEmacs is free software; you can redistribute it and/or modify it
9 under the terms of the GNU General Public License as published by the 9 under the terms of the GNU General Public License as published by the
511 XSTRING_DATA (string), 511 XSTRING_DATA (string),
512 bestmatchsize, 0)) 512 bestmatchsize, 0))
513 return Qt; 513 return Qt;
514 514
515 /* Else extract the part in which all completions agree */ 515 /* Else extract the part in which all completions agree */
516 return Fsubstring (bestmatch, Qzero, make_int (bestmatchsize)); 516 return Fsubseq (bestmatch, Qzero, make_int (bestmatchsize));
517 } 517 }
518 518
519 519
520 DEFUN ("all-completions", Fall_completions, 2, 3, 0, /* 520 DEFUN ("all-completions", Fall_completions, 2, 3, 0, /*
521 Search for partial matches to STRING in COLLECTION. 521 Search for partial matches to STRING in COLLECTION.
989 /* #### This needs to be fixed up so that the gettext() gets called 989 /* #### This needs to be fixed up so that the gettext() gets called
990 at runtime instead of at load time. */ 990 at runtime instead of at load time. */
991 #endif 991 #endif
992 Vminibuffer_zero 992 Vminibuffer_zero
993 = Fget_buffer_create (build_ascstring (" *Minibuf-0*")); 993 = Fget_buffer_create (build_ascstring (" *Minibuf-0*"));
994 staticpro_nodump (&Vminibuffer_zero);
994 Vecho_area_buffer 995 Vecho_area_buffer
995 = Fget_buffer_create (build_ascstring (" *Echo Area*")); 996 = Fget_buffer_create (build_ascstring (" *Echo Area*"));
997 staticpro_nodump (&Vecho_area_buffer);
996 } 998 }
997 999
998 void 1000 void
999 complex_vars_of_minibuf (void) 1001 complex_vars_of_minibuf (void)
1000 { 1002 {