Mercurial > emacs

comparison lisp/progmodes/cperl-mode.el @ 90737:95d0cdf160ea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 586-614) - Update from CVS - Update from erc--emacs--22 - Merge from gnus--rel--5.10 - Merge from erc--main--0 - Make byte compiler correctly write circular constants * gnus--rel--5.10 (patch 186-196) - Update from CVS - Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-162
author Miles Bader <miles@gnu.org>
date Fri, 26 Jan 2007 06:16:11 +0000
parents f1d13e615070 e3694f1cb928
children 91bf6e05918b
comparison
equal deleted inserted replaced
90736:ef1369583937 90737:95d0cdf160ea
1 ;;; cperl-mode.el --- Perl code editing commands for Emacs 1 ;;; cperl-mode.el --- Perl code editing commands for Emacs
2 2
3 ;; Copyright (C) 1985, 1986, 1987, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 3 ;; Copyright (C) 1985, 1986, 1987, 1991, 1992, 1993, 1994, 1995, 1996, 1997,
4 ;; 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006 4 ;; 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
5 ;; Free Software Foundation, Inc. 5 ;; Free Software Foundation, Inc.
6 6
7 ;; Author: Ilya Zakharevich and Bob Olson 7 ;; Author: Ilya Zakharevich and Bob Olson
8 ;; Maintainer: Ilya Zakharevich <ilyaz@cpan.org> 8 ;; Maintainer: Ilya Zakharevich <ilyaz@cpan.org>
9 ;; Keywords: languages, Perl 9 ;; Keywords: languages, Perl
350 :type '(choice (const null) boolean) 350 :type '(choice (const null) boolean)
351 :group 'cperl-affected-by-hairy) 351 :group 'cperl-affected-by-hairy)
352 352
353 (defcustom cperl-electric-keywords nil 353 (defcustom cperl-electric-keywords nil
354 "*Not-nil (and non-null) means keywords are electric in CPerl. 354 "*Not-nil (and non-null) means keywords are electric in CPerl.
355 Can be overwritten by `cperl-hairy' if nil." 355 Can be overwritten by `cperl-hairy' if nil.
356
357 Uses `abbrev-mode' to do the expansion. If you want to use your
358 own abbrevs in cperl-mode, but do not want keywords to be
359 electric, you must redefine `cperl-mode-abbrev-table': do
360 \\[edit-abbrevs], search for `cperl-mode-abbrev-table', and, in
361 that paragraph, delete the words that appear at the ends of lines and
362 that begin with \"cperl-electric\".
363 "
356 :type '(choice (const null) boolean) 364 :type '(choice (const null) boolean)
357 :group 'cperl-affected-by-hairy) 365 :group 'cperl-affected-by-hairy)
358 366
359 (defcustom cperl-electric-backspace-untabify t 367 (defcustom cperl-electric-backspace-untabify t
360 "*Not-nil means electric-backspace will untabify in CPerl." 368 "*Not-nil means electric-backspace will untabify in CPerl."