16 lines
516 B
Plaintext
16 lines
516 B
Plaintext
(load "@lib/http.l" "@lib/scrape.l")
|
|
|
|
# Connect to the demo app at http://7fach.de/8080
|
|
(scrape "7fach.de" 80 "8080")
|
|
|
|
# Log in
|
|
(expect "'admin' logged in"
|
|
(enter 3 "admin") # Enter user name into 3rd field
|
|
(enter 4 "admin") # Enter password into 4th field
|
|
(press "login") ) # Press the "login" button
|
|
|
|
(click "Items") # Open "Items" dialog
|
|
(click "Spare Part") # Click on "Spare Part" article
|
|
(prinl (value 8)) # Print the price (12.50)
|
|
(click "logout") # Log out
|