file_storage::test::delete_current_folder (private)

 file_storage::test::delete_current_folder -last_request last_request

Defined in packages/file-storage/tcl/test/webtest-procs.tcl

Delete the current folder via Web UI.

Switches:

-last_request (required)

Testcases:

fs_create_folder, file-storage, fs_edit_folder

Source code:

        #
        # Delete the current folder
        #
        set d [acs::test::follow_link -last_request $last_request -label {Delete this folder}]
        acs::test::reply_has_status_code $d 200
        set form [acs::test::get_form [dict get $d body] {//form[@id='folder-delete']}]
        aa_true "delete form was returned" {[llength $form] > 2}

        set d [::acs::test::form_reply -last_request $d -form $form  -update [subst {
                       formbutton:ok "OK"
                       __refreshing_p 0
                   }]]

        acs::test::reply_has_status_code $d 302
        return $d

XQL Not present:

Generic, PostgreSQL, Oracle