view release on metacpan or  search on metacpan

lib/App/Codit.pm  view on Meta::CPAN

			},
			LEFT => {
				-in => 'CENTER',
				-column => 0,
				-row => 0,
				-sticky => 'ns',
				-canhide => 1,
				-adjuster => 'left',
			},
			RIGHT => {
				-in => 'CENTER',
				-column => 4,
				-row => 0,
				-sticky => 'ns',
				-canhide => 1,
				-adjuster => 'right',
			},
		],

		#help info
		-aboutinfo => {
			author => 'Hans Jeuken',
			components => [
				'FreeDesktop::Icons',
				'Imager',
				'Syntax::Kamelon',
				'Tk',
				'Tk::AppWindow',
				'Tk::CodeText',
				'Tk::ColorEntry',
				'Tk::DocumentTree',
				'Tk::FileBrowser',
				'Tk::ListBrowser',
				'Tk::ListEntry',
				'Tk::PodViewer',
				'Tk::PopList',
				'Tk::QuickForm',
				'Tk::Terminal',
				'Tk::YADialog',
				'Tk::YANoteBook',
			],
			http => 'https://www.perlgui.org/appcodit/',
		},
		-helpfile => 'http://www.perlgui.org/wp-content/uploads/2025/03/manual-0.19.pdf',

		#configure content manager
		-contentmanagerclass => 'CodeTextManager',
		-contentmanageroptions => [
			'-contentacpopsize',
			'-contentacscansize',
			'-contentactivedelay',
			'-contentautobrackets',
			'-contentautocomplete',
			'-contentautoindent',
			'-contentbackground',
			'-contentbgdspace',
			'-contentbgdtab',
			'-contentbookmarkcolor',
			'-contentfindbg',
			'-contentfindfg',
#			'-contentfont',
			'-contentfontfamily',
			'-contentfontsize',
			'-contentforeground',
			'-contentindent',
			'-contentmatchbg',
			'-contentmatchfg',
			'-contentshowspaces',
			'-contentsyntax',
			'-contenttabs',
			'-contentwrap',
			'-showfolds',
			'-shownumbers',
			'-showstatus',
			'-highlight_themefile',
		],

		#configure the settings panel
		-useroptions => [
			'*page' => 'Editing',
			'*section' => 'Font',
			-contentfontfamily => ['list', 'Family', -filter => 1,	-values => sub { return sort $self->fontFams }
		],
			'*column',
			-contentfontsize => ['spin', 'Size'],
			'*end',
			'*section' => 'Editor settings',
			'*frame',
			-contentautoindent => ['boolean', 'Auto indent'],
			'*column',
			-contentautobrackets => ['boolean', 'Auto brackets'],
			'*column',
			-contentshowspaces => ['boolean', 'Show spaces'],
			'*end',
			'*frame',
			-contenttabs => ['text', 'Tab size', -regex => qr/^\d+\.?\d*[c|i|m|p]$/, -width => 4],
			'*column',
			-contentindent => ['text', 'Indent style', -regex => qr/^\d+|tab$/, -width => 4],
			'*end',
			-contentwrap => ['radio', 'Wrap', -values => [qw[none char word]]],
			'*end',
			'*section' => 'Show indicators',
			-showfolds => ['boolean', 'Fold indicators'],
			'*column',
			-shownumbers => ['boolean', 'Line numbers'],
			'*column',
			-showstatus => ['boolean', 'Doc status'],
			'*end',
			'*section' => 'Auto complete',
			-contentautocomplete => ['boolean', 'Enabled', -enables => ['-contentactivedelay', '-contentacpopsize', '-contentacscansize']],
			-contentactivedelay => ['spin', 'Pop delay', -width => 4],
			'*column',
			-contentacpopsize => ['spin', 'Pop size', -width => 4],
			-contentacscansize => ['spin', 'Scan size', -width => 4],
			'*end',

			'*page' => 'Colors',
			'*section' => 'Editing',
			-contentforeground => ['color', 'Foreground', -width => 8],
			'*column',
			-contentbackground => ['color', 'Background', -width => 8],
			'*end',
			'*section' => 'Find',
			-contentfindfg => ['color', 'Foreground', -width => 8],
			'*column',
			-contentfindbg => ['color', 'Background', -width => 8],
			'*end',
			'*section' => 'Spaces and tabs',
			-contentbgdspace => ['color', 'Space bg', -width => 8],
			'*column',
			-contentbgdtab => ['color', 'Tab bg', -width => 8],
			'*end',
			'*section' => 'Matching {}, [] and ()',
			-contentmatchfg => ['color', 'Foreground', -width => 8],
			'*column',
			-contentmatchbg => ['color', 'Background', -width => 8],
			'*end',
			'*section' => 'Other',
			-errorcolor => ['color', 'Error', -width => 8],
			-warningcolor => ['color', 'Warning', -width => 8],
			'*column',
			-linkcolor => ['color', 'Link', -width => 8],
			-contentbookmarkcolor => ['color', 'Bookmark bg', -width => 8],
			'*end',