Commits

Herbert Breunung committed 408cdc8

save as works in parallel too

Comments (0)

Files changed (4)

lib/Kephra/App/Editor.pm

 	Wx::Event::EVT_STC_SAVEPOINTLEFT
 		($self, -1, sub { Kephra::App::Part::Editor::refresh_doc_label() });
 	Wx::Event::EVT_SET_FOCUS( $self, sub {
-		my ($ed, $event ) = @_; $event->Skip;
+		my ($ed, $event ) = @_;
+		$event->Skip;
 		Kephra::App::Part::Editor::select_docbar( $ed->GetParent->GetParent );
 	});
 

lib/Kephra/App/Frame.pm

 	my $doc = Kephra::API::document();
 	my $title = (ref $doc and $doc->file_name)
 		? $doc->file_name.' ('.$doc->file_path.')'
-		: Kephra::API::docbar()->active_title();
+		: Kephra::API::document()->title();
 	$self->set_title( $title . " - $title_end" );
 }
 

lib/Kephra/App/Part/Editor.pm

 	my $i;
 	for (0 ..  $#passive_bar){ $i = $_ if $bar eq $passive_bar[$_] }
 	return Kephra::Log::warning("$bar is unknown") unless defined $i;
-	@passive_bar = ( splice(@passive_bar, $i+1), $active_bar, splice(@passive_bar, 0, $i) );
+
+	@passive_bar = (splice(@passive_bar, $i+1), $active_bar, splice(@passive_bar, 0, $i));
 	$active_bar = $bar;
 	$active_bar->raise_page( $active_bar->GetSelection );
 }
 	return unless $file;
 	Kephra::File::Local::write($doc, $file);
 	$doc->file_path($file);
-	Kephra::API::docbar()->set_page_title( $doc->file_name);
+	$_->set_page_title( $doc->title, $doc->panel->{$_} ) for Kephra::API::all_docbars();
 	Kephra::API::main_window()->refresh_title();
 }
 sub rename {