@@ -24,7 +24,7 @@ $ENV{'PERL_UNICODE'} = 'AS'; # A = Expect @AR
2424 # S = Shortcut for I+O+E - Standard input, output and error, will be UTF-8.
2525 # ENV settings are global for current thread and any forked processes.
2626
27- our $VERSION = ' v2.0.5 ' ;
27+ our $VERSION = ' v2.0.6 ' ;
2828
2929=pod LANGUAGES - List of Links to POD Languages - Guidance - try to use symbols and language native terms.
3030
@@ -45,7 +45,7 @@ our $VERSION = 'v2.0.5';
4545=cut
4646LOAD_LANGUAGE_CLASSES_AT_COMPILE_TIME: BEGIN {
4747
48- package ChangeName::Languages::de_de v2.0.5 {
48+ package ChangeName::Languages::de_de v2.0.6 {
4949
5050# Use --lang=de-DE at the commandline to use it.
5151
@@ -1175,7 +1175,7 @@ our %Lexicon = (
11751175
11761176}
11771177
1178- package ChangeName::Languages::en_gb v2.0.5 {
1178+ package ChangeName::Languages::en_gb v2.0.6 {
11791179
11801180# Use --lang=en-GB at the commandline to use it.
11811181
@@ -2051,7 +2051,7 @@ English (United Kingdom).
20512051Package storing useful utilities and functions, used by other packages in this C<ChangeName.pm > file.
20522052
20532053=cut
2054- package ChangeName::Utilities v2.0.5 {
2054+ package ChangeName::Utilities v2.0.6 {
20552055
20562056 # Standard:
20572057 use English qw(
@@ -2095,7 +2095,7 @@ ChangeName::Utilities - a collection of useful utilities and functions.
20952095
20962096=head4 VERSION (ChangeName::Utilities en-GB)
20972097
2098- v2.0.5
2098+ v2.0.6
20992099
21002100=cut
21012101
@@ -3013,7 +3013,7 @@ Package storing YAML formatted default configuration settings.
30133013Used if no external C<.yml > file is provided, or for default values should any external file omit a setting.
30143014
30153015=cut
3016- package ChangeName::Config::YAML v2.0.5 {
3016+ package ChangeName::Config::YAML v2.0.6 {
30173017
30183018=pod Name, Version
30193019
@@ -3025,7 +3025,7 @@ ChangeName::Config::YAML - Class containing default configuration settings for C
30253025
30263026=head4 VERSION (ChangeName::Config::YAML en-GB)
30273027
3028- v2.0.5
3028+ v2.0.6
30293029
30303030=cut
30313031
@@ -3181,7 +3181,7 @@ Search Field Merge Type: ANY
31813181Package that loads configuration.
31823182
31833183=cut
3184- package ChangeName::Config v2.0.5 {
3184+ package ChangeName::Config v2.0.6 {
31853185
31863186 # Standard:
31873187 use English qw(
@@ -3356,7 +3356,7 @@ package ChangeName::Config v2.0.5 {
33563356L<Locale::Maketext> project class for loading language classes.
33573357
33583358=cut
3359- package ChangeName::Languages v2.0.5 {
3359+ package ChangeName::Languages v2.0.6 {
33603360
33613361 # Standard:
33623362 use English qw(
@@ -3606,7 +3606,7 @@ Our own language class for the language we will use.
36063606Its C<language_handle > attribute can be left undefined to use all supported languages.
36073607
36083608=cut
3609- package ChangeName::Language v2.0.5 {
3609+ package ChangeName::Language v2.0.6 {
36103610
36113611 # Standard:
36123612 use English qw(
@@ -3792,7 +3792,7 @@ verbose, debug, stacktrace, and L<Data::Dumper> output
37923792to an C<EPrints::Repository > 's C<log > method, or C<STDERR > .
37933793
37943794=cut
3795- package ChangeName::Log v2.0.5 {
3795+ package ChangeName::Log v2.0.6 {
37963796
37973797 # Standard:
37983798 use English qw(
@@ -4260,7 +4260,7 @@ Runs the script from the commandline,
42604260or starts the operation via a new Modulino class instance.
42614261
42624262=cut
4263- package ChangeName::Modulino v2.0.5 {
4263+ package ChangeName::Modulino v2.0.6 {
42644264
42654265 # Standard:
42664266 use English qw(
@@ -4543,7 +4543,7 @@ package ChangeName::Modulino v2.0.5 {
45434543Performs the change name operation.
45444544
45454545=cut
4546- package ChangeName::Operation v2.0.5 {
4546+ package ChangeName::Operation v2.0.6 {
45474547
45484548 # Standard:
45494549 use English qw(
@@ -4586,7 +4586,7 @@ ChangeName::Operation - changes the name of a dataset record.
45864586
45874587=head4 VERSION (ChangeName::Operation en-GB)
45884588
4589- v2.0.5
4589+ v2.0.6
45904590
45914591=cut
45924592
@@ -4983,6 +4983,8 @@ To do.
49834983 $fresh_result -> commit(@{$self -> {force_or_not }});
49844984 say $self -> language-> localise(' change.done' );
49854985 $self -> {changes_made }++;
4986+ $fresh_result -> queue_all;
4987+ $fresh_result -> save_revision;
49864988 }
49874989 else {
49884990 say $self -> language-> localise(' change.locked' , $fresh_result -> id);
0 commit comments