Changeset 4173


Ignore:
Timestamp:
04/26/09 12:40:40 (3 years ago)
Author:
therek
Message:

run the original script file if it is saved

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Padre/lib/Padre/Document/Perl.pm

    r4165 r4173  
    279279 
    280280    # Use a temporary file if run_save is set to 'unsaved' 
    281     my $filename = $config->run_save eq 'unsaved' 
     281    my $filename = $config->run_save eq 'unsaved' && !$self->is_saved 
    282282        ? $self->store_in_tempfile 
    283283        : $self->filename; 
Note: See TracChangeset for help on using the changeset viewer.