/jEdit/tags/jedit-4-2-pre4/macros/Text/Duplicate_Line.bsh
Unknown | 70 lines | 63 code | 7 blank | 0 comment | 0 complexity | 59e6806496f3c3aa8c81b04f01069c56 MD5 | raw file
Possible License(s): BSD-3-Clause, AGPL-1.0, Apache-2.0, LGPL-2.0, LGPL-3.0, GPL-2.0, CC-BY-SA-3.0, LGPL-2.1, GPL-3.0, MPL-2.0-no-copyleft-exception, IPL-1.0
- /*
- * Duplicate_Line.bsh - a BeanShell macro script for the
- * jEdit text editor - duplicates the cursor line.
- * Copyright (C) 2001 Francesc Roses
- * froses@menta.net
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU General Public License
- * as published by the Free Software Foundation; either version 2
- * of the License, or any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with the jEdit program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
- *
- *
- * $Id: Duplicate_Line.bsh 3866 2001-11-06 15:04:21Z jgellene $
- *
- * Checked for jEdit 4.0 API
- *
- */
- void duplicateLine()
- {
- /*
- * Guard for readonly files becuase Buffer.insert()
- * ignores the flag
- *
- */
- if(buffer.isReadOnly())
- {
- Macros.error(view, "This file is read only.");
- return;
- }
- line = textArea.getCaretLine();
- offset = textArea.getLineEndOffset(line);
- // handle last line differently
- if(line == textArea.getLineCount() - 1)
- {
- text = "\n" + textArea.getLineText(line);
- --offset;
- }
- else
- text = textArea.getLineText(line) + "\n";
- buffer.insert(offset, text);
- textArea.goToNextLine(false);
- }
- duplicateLine();
- /*
- Macro index data (in DocBook format)
- <listitem>
- <para><filename>Duplicate_Line.bsh</filename></para>
- <abstract><para>
- Duplicates the line on which the caret lies immediately
- beneath it and moves the caret to the new line.
- </para></abstract>
- </listitem>
- */
- // end Duplicate_Line.bsh