From 6d4b279746dd4dcce5905c028b56633dd1015e9d Mon Sep 17 00:00:00 2001 From: davidruvolo51 Date: Sun, 6 Sep 2020 18:45:29 +0200 Subject: [PATCH 1/5] rebuilt documentation --- man/academic_cap.Rd | 33 --------------------------------- man/adjustments.Rd | 33 --------------------------------- man/annotation.Rd | 33 --------------------------------- man/archive.Rd | 33 --------------------------------- man/arrow_circle_down.Rd | 33 --------------------------------- man/arrow_circle_left.Rd | 33 --------------------------------- man/arrow_circle_right.Rd | 33 --------------------------------- man/arrow_circle_up.Rd | 33 --------------------------------- man/arrow_down.Rd | 33 --------------------------------- man/arrow_left.Rd | 33 --------------------------------- man/arrow_narrow_down.Rd | 33 --------------------------------- man/arrow_narrow_left.Rd | 33 --------------------------------- man/arrow_narrow_right.Rd | 33 --------------------------------- man/arrow_narrow_up.Rd | 33 --------------------------------- man/arrow_right.Rd | 33 --------------------------------- man/arrow_up.Rd | 33 --------------------------------- man/arrows_expand.Rd | 33 --------------------------------- man/at_symbol.Rd | 33 --------------------------------- man/backspace.Rd | 33 --------------------------------- man/badge_check.Rd | 33 --------------------------------- man/ban.Rd | 33 --------------------------------- man/beaker.Rd | 33 --------------------------------- man/bell.Rd | 33 --------------------------------- man/book_open.Rd | 33 --------------------------------- man/bookmark.Rd | 33 --------------------------------- man/bookmark_alt.Rd | 33 --------------------------------- man/briefcase.Rd | 33 --------------------------------- man/cake.Rd | 33 --------------------------------- man/calculator.Rd | 33 --------------------------------- man/calendar.Rd | 33 --------------------------------- man/camera.Rd | 33 --------------------------------- man/cash.Rd | 33 --------------------------------- man/chart_bar.Rd | 33 --------------------------------- man/chart_pie.Rd | 33 --------------------------------- man/chart_square_bar.Rd | 33 --------------------------------- man/chat.Rd | 33 --------------------------------- man/chat_alt.Rd | 33 --------------------------------- man/chat_alt_2.Rd | 33 --------------------------------- man/check.Rd | 33 --------------------------------- man/check_circle.Rd | 33 --------------------------------- man/chevron_double_down.Rd | 33 --------------------------------- man/chevron_double_left.Rd | 33 --------------------------------- man/chevron_double_right.Rd | 33 --------------------------------- man/chevron_double_up.Rd | 33 --------------------------------- man/chevron_down.Rd | 33 --------------------------------- man/chevron_left.Rd | 33 --------------------------------- man/chevron_right.Rd | 33 --------------------------------- man/chevron_up.Rd | 33 --------------------------------- man/chip.Rd | 33 --------------------------------- man/clipboard.Rd | 33 --------------------------------- man/clipboard_check.Rd | 33 --------------------------------- man/clipboard_copy.Rd | 33 --------------------------------- man/clipboard_list.Rd | 33 --------------------------------- man/clock.Rd | 33 --------------------------------- man/cloud.Rd | 33 --------------------------------- man/cloud_download.Rd | 33 --------------------------------- man/cloud_upload.Rd | 33 --------------------------------- man/code.Rd | 33 --------------------------------- man/cog.Rd | 33 --------------------------------- man/collection.Rd | 33 --------------------------------- man/color_swatch.Rd | 33 --------------------------------- man/credit_card.Rd | 33 --------------------------------- man/cube.Rd | 33 --------------------------------- man/cube_transparent.Rd | 33 --------------------------------- man/currency_bangladeshi.Rd | 33 --------------------------------- man/currency_dollar.Rd | 33 --------------------------------- man/currency_euro.Rd | 33 --------------------------------- man/currency_pound.Rd | 33 --------------------------------- man/currency_rupee.Rd | 33 --------------------------------- man/currency_yen.Rd | 33 --------------------------------- man/cursor_click.Rd | 33 --------------------------------- man/database.Rd | 33 --------------------------------- man/desktop_computer.Rd | 33 --------------------------------- man/device_mobile.Rd | 33 --------------------------------- man/device_tablet.Rd | 33 --------------------------------- man/document.Rd | 33 --------------------------------- man/document_add.Rd | 33 --------------------------------- man/document_download.Rd | 33 --------------------------------- man/document_duplicate.Rd | 33 --------------------------------- man/document_remove.Rd | 33 --------------------------------- man/document_report.Rd | 33 --------------------------------- man/document_search.Rd | 33 --------------------------------- man/document_text.Rd | 33 --------------------------------- man/dots_circle_horizontal.Rd | 33 --------------------------------- man/dots_horizontal.Rd | 33 --------------------------------- man/dots_vertical.Rd | 33 --------------------------------- man/download.Rd | 33 --------------------------------- man/duplicate.Rd | 33 --------------------------------- man/emoji_happy.Rd | 33 --------------------------------- man/emoji_sad.Rd | 33 --------------------------------- man/exclamation.Rd | 33 --------------------------------- man/exclamation_circle.Rd | 33 --------------------------------- man/external_link.Rd | 33 --------------------------------- man/eye.Rd | 33 --------------------------------- man/eye_off.Rd | 33 --------------------------------- man/fast_forward.Rd | 33 --------------------------------- man/film.Rd | 33 --------------------------------- man/filter.Rd | 33 --------------------------------- man/finger_print.Rd | 33 --------------------------------- man/fire.Rd | 33 --------------------------------- man/flag.Rd | 33 --------------------------------- man/folder.Rd | 33 --------------------------------- man/folder_add.Rd | 33 --------------------------------- man/folder_download.Rd | 33 --------------------------------- man/folder_open.Rd | 33 --------------------------------- man/folder_remove.Rd | 33 --------------------------------- man/gift.Rd | 33 --------------------------------- man/globe.Rd | 33 --------------------------------- man/globe_alt.Rd | 33 --------------------------------- man/hand.Rd | 33 --------------------------------- man/hashtag.Rd | 33 --------------------------------- man/heart.Rd | 33 --------------------------------- man/home.Rd | 33 --------------------------------- man/icons.Rd | 30 ------------------------------ man/identification.Rd | 33 --------------------------------- man/inbox.Rd | 33 --------------------------------- man/inbox_in.Rd | 33 --------------------------------- man/information_circle.Rd | 33 --------------------------------- man/key.Rd | 33 --------------------------------- man/launch_gallery.Rd | 14 ++++++-------- man/library.Rd | 33 --------------------------------- man/light_bulb.Rd | 33 --------------------------------- man/lightning_bolt.Rd | 33 --------------------------------- man/link.Rd | 33 --------------------------------- man/location_marker.Rd | 33 --------------------------------- man/lock_closed.Rd | 33 --------------------------------- man/lock_open.Rd | 33 --------------------------------- man/login.Rd | 33 --------------------------------- man/logout.Rd | 33 --------------------------------- man/mail.Rd | 33 --------------------------------- man/mail_open.Rd | 33 --------------------------------- man/map.Rd | 33 --------------------------------- man/menu.Rd | 33 --------------------------------- man/menu_alt_1.Rd | 33 --------------------------------- man/menu_alt_2.Rd | 33 --------------------------------- man/menu_alt_3.Rd | 33 --------------------------------- man/menu_alt_4.Rd | 33 --------------------------------- man/microphone.Rd | 33 --------------------------------- man/minus.Rd | 33 --------------------------------- man/minus_circle.Rd | 33 --------------------------------- man/minus_sm.Rd | 33 --------------------------------- man/moon.Rd | 33 --------------------------------- man/music_note.Rd | 33 --------------------------------- man/newspaper.Rd | 33 --------------------------------- man/office_building.Rd | 33 --------------------------------- man/paper_airplane.Rd | 33 --------------------------------- man/paper_clip.Rd | 33 --------------------------------- man/pause.Rd | 33 --------------------------------- man/pencil.Rd | 33 --------------------------------- man/pencil_alt.Rd | 33 --------------------------------- man/phone.Rd | 33 --------------------------------- man/phone_incoming.Rd | 33 --------------------------------- man/phone_missed_call.Rd | 33 --------------------------------- man/phone_outgoing.Rd | 33 --------------------------------- man/photograph.Rd | 33 --------------------------------- man/play.Rd | 33 --------------------------------- man/plus.Rd | 33 --------------------------------- man/plus_circle.Rd | 33 --------------------------------- man/plus_sm.Rd | 33 --------------------------------- man/presentation_chart_bar.Rd | 33 --------------------------------- man/presentation_chart_line.Rd | 33 --------------------------------- man/printer.Rd | 33 --------------------------------- man/puzzle.Rd | 33 --------------------------------- man/qrcode.Rd | 33 --------------------------------- man/question_mark_circle.Rd | 33 --------------------------------- man/receipt_refund.Rd | 33 --------------------------------- man/receipt_tax.Rd | 33 --------------------------------- man/refresh.Rd | 33 --------------------------------- man/reply.Rd | 33 --------------------------------- man/rewind.Rd | 33 --------------------------------- man/rheroicon.Rd | 34 ++++++++++++++++++++++++++++++++++ man/rss.Rd | 33 --------------------------------- man/save.Rd | 33 --------------------------------- man/save_as.Rd | 33 --------------------------------- man/scale.Rd | 33 --------------------------------- man/scissors.Rd | 33 --------------------------------- man/search.Rd | 33 --------------------------------- man/search_circle.Rd | 33 --------------------------------- man/selector.Rd | 33 --------------------------------- man/server.Rd | 33 --------------------------------- man/share.Rd | 33 --------------------------------- man/shield_check.Rd | 33 --------------------------------- man/shield_exclamation.Rd | 33 --------------------------------- man/shopping_bag.Rd | 33 --------------------------------- man/shopping_cart.Rd | 33 --------------------------------- man/sort_ascending.Rd | 33 --------------------------------- man/sort_descending.Rd | 33 --------------------------------- man/sparkles.Rd | 33 --------------------------------- man/speakerphone.Rd | 33 --------------------------------- man/star.Rd | 33 --------------------------------- man/status_offline.Rd | 33 --------------------------------- man/status_online.Rd | 33 --------------------------------- man/stop.Rd | 33 --------------------------------- man/sun.Rd | 33 --------------------------------- man/support.Rd | 33 --------------------------------- man/switch_horizontal.Rd | 33 --------------------------------- man/switch_vertical.Rd | 33 --------------------------------- man/table.Rd | 33 --------------------------------- man/tag.Rd | 33 --------------------------------- man/template.Rd | 33 --------------------------------- man/terminal.Rd | 33 --------------------------------- man/thumb_down.Rd | 33 --------------------------------- man/thumb_up.Rd | 33 --------------------------------- man/ticket.Rd | 33 --------------------------------- man/translate.Rd | 33 --------------------------------- man/trash.Rd | 33 --------------------------------- man/trending_down.Rd | 33 --------------------------------- man/trending_up.Rd | 33 --------------------------------- man/truck.Rd | 33 --------------------------------- man/upload.Rd | 33 --------------------------------- man/user.Rd | 33 --------------------------------- man/user_add.Rd | 33 --------------------------------- man/user_circle.Rd | 33 --------------------------------- man/user_group.Rd | 33 --------------------------------- man/user_remove.Rd | 33 --------------------------------- man/users.Rd | 33 --------------------------------- man/variable.Rd | 33 --------------------------------- man/video_camera.Rd | 33 --------------------------------- man/view_boards.Rd | 33 --------------------------------- man/view_grid.Rd | 33 --------------------------------- man/view_grid_add.Rd | 33 --------------------------------- man/view_list.Rd | 33 --------------------------------- man/volume_off.Rd | 33 --------------------------------- man/volume_up.Rd | 33 --------------------------------- man/wifi.Rd | 33 --------------------------------- man/x.Rd | 33 --------------------------------- man/x_circle.Rd | 33 --------------------------------- man/zoom_in.Rd | 33 --------------------------------- man/zoom_out.Rd | 33 --------------------------------- 229 files changed, 40 insertions(+), 7496 deletions(-) delete mode 100644 man/academic_cap.Rd delete mode 100644 man/adjustments.Rd delete mode 100644 man/annotation.Rd delete mode 100644 man/archive.Rd delete mode 100644 man/arrow_circle_down.Rd delete mode 100644 man/arrow_circle_left.Rd delete mode 100644 man/arrow_circle_right.Rd delete mode 100644 man/arrow_circle_up.Rd delete mode 100644 man/arrow_down.Rd delete mode 100644 man/arrow_left.Rd delete mode 100644 man/arrow_narrow_down.Rd delete mode 100644 man/arrow_narrow_left.Rd delete mode 100644 man/arrow_narrow_right.Rd delete mode 100644 man/arrow_narrow_up.Rd delete mode 100644 man/arrow_right.Rd delete mode 100644 man/arrow_up.Rd delete mode 100644 man/arrows_expand.Rd delete mode 100644 man/at_symbol.Rd delete mode 100644 man/backspace.Rd delete mode 100644 man/badge_check.Rd delete mode 100644 man/ban.Rd delete mode 100644 man/beaker.Rd delete mode 100644 man/bell.Rd delete mode 100644 man/book_open.Rd delete mode 100644 man/bookmark.Rd delete mode 100644 man/bookmark_alt.Rd delete mode 100644 man/briefcase.Rd delete mode 100644 man/cake.Rd delete mode 100644 man/calculator.Rd delete mode 100644 man/calendar.Rd delete mode 100644 man/camera.Rd delete mode 100644 man/cash.Rd delete mode 100644 man/chart_bar.Rd delete mode 100644 man/chart_pie.Rd delete mode 100644 man/chart_square_bar.Rd delete mode 100644 man/chat.Rd delete mode 100644 man/chat_alt.Rd delete mode 100644 man/chat_alt_2.Rd delete mode 100644 man/check.Rd delete mode 100644 man/check_circle.Rd delete mode 100644 man/chevron_double_down.Rd delete mode 100644 man/chevron_double_left.Rd delete mode 100644 man/chevron_double_right.Rd delete mode 100644 man/chevron_double_up.Rd delete mode 100644 man/chevron_down.Rd delete mode 100644 man/chevron_left.Rd delete mode 100644 man/chevron_right.Rd delete mode 100644 man/chevron_up.Rd delete mode 100644 man/chip.Rd delete mode 100644 man/clipboard.Rd delete mode 100644 man/clipboard_check.Rd delete mode 100644 man/clipboard_copy.Rd delete mode 100644 man/clipboard_list.Rd delete mode 100644 man/clock.Rd delete mode 100644 man/cloud.Rd delete mode 100644 man/cloud_download.Rd delete mode 100644 man/cloud_upload.Rd delete mode 100644 man/code.Rd delete mode 100644 man/cog.Rd delete mode 100644 man/collection.Rd delete mode 100644 man/color_swatch.Rd delete mode 100644 man/credit_card.Rd delete mode 100644 man/cube.Rd delete mode 100644 man/cube_transparent.Rd delete mode 100644 man/currency_bangladeshi.Rd delete mode 100644 man/currency_dollar.Rd delete mode 100644 man/currency_euro.Rd delete mode 100644 man/currency_pound.Rd delete mode 100644 man/currency_rupee.Rd delete mode 100644 man/currency_yen.Rd delete mode 100644 man/cursor_click.Rd delete mode 100644 man/database.Rd delete mode 100644 man/desktop_computer.Rd delete mode 100644 man/device_mobile.Rd delete mode 100644 man/device_tablet.Rd delete mode 100644 man/document.Rd delete mode 100644 man/document_add.Rd delete mode 100644 man/document_download.Rd delete mode 100644 man/document_duplicate.Rd delete mode 100644 man/document_remove.Rd delete mode 100644 man/document_report.Rd delete mode 100644 man/document_search.Rd delete mode 100644 man/document_text.Rd delete mode 100644 man/dots_circle_horizontal.Rd delete mode 100644 man/dots_horizontal.Rd delete mode 100644 man/dots_vertical.Rd delete mode 100644 man/download.Rd delete mode 100644 man/duplicate.Rd delete mode 100644 man/emoji_happy.Rd delete mode 100644 man/emoji_sad.Rd delete mode 100644 man/exclamation.Rd delete mode 100644 man/exclamation_circle.Rd delete mode 100644 man/external_link.Rd delete mode 100644 man/eye.Rd delete mode 100644 man/eye_off.Rd delete mode 100644 man/fast_forward.Rd delete mode 100644 man/film.Rd delete mode 100644 man/filter.Rd delete mode 100644 man/finger_print.Rd delete mode 100644 man/fire.Rd delete mode 100644 man/flag.Rd delete mode 100644 man/folder.Rd delete mode 100644 man/folder_add.Rd delete mode 100644 man/folder_download.Rd delete mode 100644 man/folder_open.Rd delete mode 100644 man/folder_remove.Rd delete mode 100644 man/gift.Rd delete mode 100644 man/globe.Rd delete mode 100644 man/globe_alt.Rd delete mode 100644 man/hand.Rd delete mode 100644 man/hashtag.Rd delete mode 100644 man/heart.Rd delete mode 100644 man/home.Rd delete mode 100644 man/icons.Rd delete mode 100644 man/identification.Rd delete mode 100644 man/inbox.Rd delete mode 100644 man/inbox_in.Rd delete mode 100644 man/information_circle.Rd delete mode 100644 man/key.Rd delete mode 100644 man/library.Rd delete mode 100644 man/light_bulb.Rd delete mode 100644 man/lightning_bolt.Rd delete mode 100644 man/link.Rd delete mode 100644 man/location_marker.Rd delete mode 100644 man/lock_closed.Rd delete mode 100644 man/lock_open.Rd delete mode 100644 man/login.Rd delete mode 100644 man/logout.Rd delete mode 100644 man/mail.Rd delete mode 100644 man/mail_open.Rd delete mode 100644 man/map.Rd delete mode 100644 man/menu.Rd delete mode 100644 man/menu_alt_1.Rd delete mode 100644 man/menu_alt_2.Rd delete mode 100644 man/menu_alt_3.Rd delete mode 100644 man/menu_alt_4.Rd delete mode 100644 man/microphone.Rd delete mode 100644 man/minus.Rd delete mode 100644 man/minus_circle.Rd delete mode 100644 man/minus_sm.Rd delete mode 100644 man/moon.Rd delete mode 100644 man/music_note.Rd delete mode 100644 man/newspaper.Rd delete mode 100644 man/office_building.Rd delete mode 100644 man/paper_airplane.Rd delete mode 100644 man/paper_clip.Rd delete mode 100644 man/pause.Rd delete mode 100644 man/pencil.Rd delete mode 100644 man/pencil_alt.Rd delete mode 100644 man/phone.Rd delete mode 100644 man/phone_incoming.Rd delete mode 100644 man/phone_missed_call.Rd delete mode 100644 man/phone_outgoing.Rd delete mode 100644 man/photograph.Rd delete mode 100644 man/play.Rd delete mode 100644 man/plus.Rd delete mode 100644 man/plus_circle.Rd delete mode 100644 man/plus_sm.Rd delete mode 100644 man/presentation_chart_bar.Rd delete mode 100644 man/presentation_chart_line.Rd delete mode 100644 man/printer.Rd delete mode 100644 man/puzzle.Rd delete mode 100644 man/qrcode.Rd delete mode 100644 man/question_mark_circle.Rd delete mode 100644 man/receipt_refund.Rd delete mode 100644 man/receipt_tax.Rd delete mode 100644 man/refresh.Rd delete mode 100644 man/reply.Rd delete mode 100644 man/rewind.Rd create mode 100644 man/rheroicon.Rd delete mode 100644 man/rss.Rd delete mode 100644 man/save.Rd delete mode 100644 man/save_as.Rd delete mode 100644 man/scale.Rd delete mode 100644 man/scissors.Rd delete mode 100644 man/search.Rd delete mode 100644 man/search_circle.Rd delete mode 100644 man/selector.Rd delete mode 100644 man/server.Rd delete mode 100644 man/share.Rd delete mode 100644 man/shield_check.Rd delete mode 100644 man/shield_exclamation.Rd delete mode 100644 man/shopping_bag.Rd delete mode 100644 man/shopping_cart.Rd delete mode 100644 man/sort_ascending.Rd delete mode 100644 man/sort_descending.Rd delete mode 100644 man/sparkles.Rd delete mode 100644 man/speakerphone.Rd delete mode 100644 man/star.Rd delete mode 100644 man/status_offline.Rd delete mode 100644 man/status_online.Rd delete mode 100644 man/stop.Rd delete mode 100644 man/sun.Rd delete mode 100644 man/support.Rd delete mode 100644 man/switch_horizontal.Rd delete mode 100644 man/switch_vertical.Rd delete mode 100644 man/table.Rd delete mode 100644 man/tag.Rd delete mode 100644 man/template.Rd delete mode 100644 man/terminal.Rd delete mode 100644 man/thumb_down.Rd delete mode 100644 man/thumb_up.Rd delete mode 100644 man/ticket.Rd delete mode 100644 man/translate.Rd delete mode 100644 man/trash.Rd delete mode 100644 man/trending_down.Rd delete mode 100644 man/trending_up.Rd delete mode 100644 man/truck.Rd delete mode 100644 man/upload.Rd delete mode 100644 man/user.Rd delete mode 100644 man/user_add.Rd delete mode 100644 man/user_circle.Rd delete mode 100644 man/user_group.Rd delete mode 100644 man/user_remove.Rd delete mode 100644 man/users.Rd delete mode 100644 man/variable.Rd delete mode 100644 man/video_camera.Rd delete mode 100644 man/view_boards.Rd delete mode 100644 man/view_grid.Rd delete mode 100644 man/view_grid_add.Rd delete mode 100644 man/view_list.Rd delete mode 100644 man/volume_off.Rd delete mode 100644 man/volume_up.Rd delete mode 100644 man/wifi.Rd delete mode 100644 man/x.Rd delete mode 100644 man/x_circle.Rd delete mode 100644 man/zoom_in.Rd delete mode 100644 man/zoom_out.Rd diff --git a/man/academic_cap.Rd b/man/academic_cap.Rd deleted file mode 100644 index 82af14c..0000000 --- a/man/academic_cap.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{academic_cap} -\alias{academic_cap} -\title{academic_cap} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a academic_cap -} -\description{ -Render an svg icon of a academic_cap -} -\examples{ -rheroicons::icons$academic_cap( - type = "solid", - id = "my_academic_cap_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the academic_cap icon" -) -} -\keyword{academic_cap} -\keyword{rheroicons} diff --git a/man/adjustments.Rd b/man/adjustments.Rd deleted file mode 100644 index ec18599..0000000 --- a/man/adjustments.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{adjustments} -\alias{adjustments} -\title{adjustments} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a adjustments -} -\description{ -Render an svg icon of a adjustments -} -\examples{ -rheroicons::icons$adjustments( - type = "solid", - id = "my_adjustments_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the adjustments icon" -) -} -\keyword{adjustments} -\keyword{rheroicons} diff --git a/man/annotation.Rd b/man/annotation.Rd deleted file mode 100644 index bcc5442..0000000 --- a/man/annotation.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{annotation} -\alias{annotation} -\title{annotation} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a annotation -} -\description{ -Render an svg icon of a annotation -} -\examples{ -rheroicons::icons$annotation( - type = "solid", - id = "my_annotation_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the annotation icon" -) -} -\keyword{annotation} -\keyword{rheroicons} diff --git a/man/archive.Rd b/man/archive.Rd deleted file mode 100644 index 971f913..0000000 --- a/man/archive.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{archive} -\alias{archive} -\title{archive} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a archive -} -\description{ -Render an svg icon of a archive -} -\examples{ -rheroicons::icons$archive( - type = "solid", - id = "my_archive_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the archive icon" -) -} -\keyword{archive} -\keyword{rheroicons} diff --git a/man/arrow_circle_down.Rd b/man/arrow_circle_down.Rd deleted file mode 100644 index 00d0aef..0000000 --- a/man/arrow_circle_down.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_circle_down} -\alias{arrow_circle_down} -\title{arrow_circle_down} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_circle_down -} -\description{ -Render an svg icon of a arrow_circle_down -} -\examples{ -rheroicons::icons$arrow_circle_down( - type = "solid", - id = "my_arrow_circle_down_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_circle_down icon" -) -} -\keyword{arrow_circle_down} -\keyword{rheroicons} diff --git a/man/arrow_circle_left.Rd b/man/arrow_circle_left.Rd deleted file mode 100644 index 3e9f168..0000000 --- a/man/arrow_circle_left.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_circle_left} -\alias{arrow_circle_left} -\title{arrow_circle_left} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_circle_left -} -\description{ -Render an svg icon of a arrow_circle_left -} -\examples{ -rheroicons::icons$arrow_circle_left( - type = "solid", - id = "my_arrow_circle_left_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_circle_left icon" -) -} -\keyword{arrow_circle_left} -\keyword{rheroicons} diff --git a/man/arrow_circle_right.Rd b/man/arrow_circle_right.Rd deleted file mode 100644 index 469d38d..0000000 --- a/man/arrow_circle_right.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_circle_right} -\alias{arrow_circle_right} -\title{arrow_circle_right} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_circle_right -} -\description{ -Render an svg icon of a arrow_circle_right -} -\examples{ -rheroicons::icons$arrow_circle_right( - type = "solid", - id = "my_arrow_circle_right_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_circle_right icon" -) -} -\keyword{arrow_circle_right} -\keyword{rheroicons} diff --git a/man/arrow_circle_up.Rd b/man/arrow_circle_up.Rd deleted file mode 100644 index 909896b..0000000 --- a/man/arrow_circle_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_circle_up} -\alias{arrow_circle_up} -\title{arrow_circle_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_circle_up -} -\description{ -Render an svg icon of a arrow_circle_up -} -\examples{ -rheroicons::icons$arrow_circle_up( - type = "solid", - id = "my_arrow_circle_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_circle_up icon" -) -} -\keyword{arrow_circle_up} -\keyword{rheroicons} diff --git a/man/arrow_down.Rd b/man/arrow_down.Rd deleted file mode 100644 index 1557840..0000000 --- a/man/arrow_down.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_down} -\alias{arrow_down} -\title{arrow_down} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_down -} -\description{ -Render an svg icon of a arrow_down -} -\examples{ -rheroicons::icons$arrow_down( - type = "solid", - id = "my_arrow_down_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_down icon" -) -} -\keyword{arrow_down} -\keyword{rheroicons} diff --git a/man/arrow_left.Rd b/man/arrow_left.Rd deleted file mode 100644 index cbc6395..0000000 --- a/man/arrow_left.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_left} -\alias{arrow_left} -\title{arrow_left} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_left -} -\description{ -Render an svg icon of a arrow_left -} -\examples{ -rheroicons::icons$arrow_left( - type = "solid", - id = "my_arrow_left_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_left icon" -) -} -\keyword{arrow_left} -\keyword{rheroicons} diff --git a/man/arrow_narrow_down.Rd b/man/arrow_narrow_down.Rd deleted file mode 100644 index 8496c69..0000000 --- a/man/arrow_narrow_down.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_narrow_down} -\alias{arrow_narrow_down} -\title{arrow_narrow_down} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_narrow_down -} -\description{ -Render an svg icon of a arrow_narrow_down -} -\examples{ -rheroicons::icons$arrow_narrow_down( - type = "solid", - id = "my_arrow_narrow_down_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_narrow_down icon" -) -} -\keyword{arrow_narrow_down} -\keyword{rheroicons} diff --git a/man/arrow_narrow_left.Rd b/man/arrow_narrow_left.Rd deleted file mode 100644 index 33882d5..0000000 --- a/man/arrow_narrow_left.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_narrow_left} -\alias{arrow_narrow_left} -\title{arrow_narrow_left} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_narrow_left -} -\description{ -Render an svg icon of a arrow_narrow_left -} -\examples{ -rheroicons::icons$arrow_narrow_left( - type = "solid", - id = "my_arrow_narrow_left_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_narrow_left icon" -) -} -\keyword{arrow_narrow_left} -\keyword{rheroicons} diff --git a/man/arrow_narrow_right.Rd b/man/arrow_narrow_right.Rd deleted file mode 100644 index 8a20a26..0000000 --- a/man/arrow_narrow_right.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_narrow_right} -\alias{arrow_narrow_right} -\title{arrow_narrow_right} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_narrow_right -} -\description{ -Render an svg icon of a arrow_narrow_right -} -\examples{ -rheroicons::icons$arrow_narrow_right( - type = "solid", - id = "my_arrow_narrow_right_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_narrow_right icon" -) -} -\keyword{arrow_narrow_right} -\keyword{rheroicons} diff --git a/man/arrow_narrow_up.Rd b/man/arrow_narrow_up.Rd deleted file mode 100644 index b8d5326..0000000 --- a/man/arrow_narrow_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_narrow_up} -\alias{arrow_narrow_up} -\title{arrow_narrow_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_narrow_up -} -\description{ -Render an svg icon of a arrow_narrow_up -} -\examples{ -rheroicons::icons$arrow_narrow_up( - type = "solid", - id = "my_arrow_narrow_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_narrow_up icon" -) -} -\keyword{arrow_narrow_up} -\keyword{rheroicons} diff --git a/man/arrow_right.Rd b/man/arrow_right.Rd deleted file mode 100644 index 101c1df..0000000 --- a/man/arrow_right.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_right} -\alias{arrow_right} -\title{arrow_right} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_right -} -\description{ -Render an svg icon of a arrow_right -} -\examples{ -rheroicons::icons$arrow_right( - type = "solid", - id = "my_arrow_right_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_right icon" -) -} -\keyword{arrow_right} -\keyword{rheroicons} diff --git a/man/arrow_up.Rd b/man/arrow_up.Rd deleted file mode 100644 index 3ed8de3..0000000 --- a/man/arrow_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrow_up} -\alias{arrow_up} -\title{arrow_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrow_up -} -\description{ -Render an svg icon of a arrow_up -} -\examples{ -rheroicons::icons$arrow_up( - type = "solid", - id = "my_arrow_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrow_up icon" -) -} -\keyword{arrow_up} -\keyword{rheroicons} diff --git a/man/arrows_expand.Rd b/man/arrows_expand.Rd deleted file mode 100644 index b76e292..0000000 --- a/man/arrows_expand.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{arrows_expand} -\alias{arrows_expand} -\title{arrows_expand} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a arrows_expand -} -\description{ -Render an svg icon of a arrows_expand -} -\examples{ -rheroicons::icons$arrows_expand( - type = "solid", - id = "my_arrows_expand_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the arrows_expand icon" -) -} -\keyword{arrows_expand} -\keyword{rheroicons} diff --git a/man/at_symbol.Rd b/man/at_symbol.Rd deleted file mode 100644 index d342fe2..0000000 --- a/man/at_symbol.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{at_symbol} -\alias{at_symbol} -\title{at_symbol} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a at_symbol -} -\description{ -Render an svg icon of a at_symbol -} -\examples{ -rheroicons::icons$at_symbol( - type = "solid", - id = "my_at_symbol_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the at_symbol icon" -) -} -\keyword{at_symbol} -\keyword{rheroicons} diff --git a/man/backspace.Rd b/man/backspace.Rd deleted file mode 100644 index 0b49b17..0000000 --- a/man/backspace.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{backspace} -\alias{backspace} -\title{backspace} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a backspace -} -\description{ -Render an svg icon of a backspace -} -\examples{ -rheroicons::icons$backspace( - type = "solid", - id = "my_backspace_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the backspace icon" -) -} -\keyword{backspace} -\keyword{rheroicons} diff --git a/man/badge_check.Rd b/man/badge_check.Rd deleted file mode 100644 index e1314fe..0000000 --- a/man/badge_check.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{badge_check} -\alias{badge_check} -\title{badge_check} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a badge_check -} -\description{ -Render an svg icon of a badge_check -} -\examples{ -rheroicons::icons$badge_check( - type = "solid", - id = "my_badge_check_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the badge_check icon" -) -} -\keyword{badge_check} -\keyword{rheroicons} diff --git a/man/ban.Rd b/man/ban.Rd deleted file mode 100644 index 6d0d6c4..0000000 --- a/man/ban.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{ban} -\alias{ban} -\title{ban} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a ban -} -\description{ -Render an svg icon of a ban -} -\examples{ -rheroicons::icons$ban( - type = "solid", - id = "my_ban_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the ban icon" -) -} -\keyword{ban} -\keyword{rheroicons} diff --git a/man/beaker.Rd b/man/beaker.Rd deleted file mode 100644 index 80a1714..0000000 --- a/man/beaker.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{beaker} -\alias{beaker} -\title{beaker} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a beaker -} -\description{ -Render an svg icon of a beaker -} -\examples{ -rheroicons::icons$beaker( - type = "solid", - id = "my_beaker_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the beaker icon" -) -} -\keyword{beaker} -\keyword{rheroicons} diff --git a/man/bell.Rd b/man/bell.Rd deleted file mode 100644 index 3f6d729..0000000 --- a/man/bell.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{bell} -\alias{bell} -\title{bell} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a bell -} -\description{ -Render an svg icon of a bell -} -\examples{ -rheroicons::icons$bell( - type = "solid", - id = "my_bell_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the bell icon" -) -} -\keyword{bell} -\keyword{rheroicons} diff --git a/man/book_open.Rd b/man/book_open.Rd deleted file mode 100644 index a9e1439..0000000 --- a/man/book_open.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{book_open} -\alias{book_open} -\title{book_open} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a book_open -} -\description{ -Render an svg icon of a book_open -} -\examples{ -rheroicons::icons$book_open( - type = "solid", - id = "my_book_open_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the book_open icon" -) -} -\keyword{book_open} -\keyword{rheroicons} diff --git a/man/bookmark.Rd b/man/bookmark.Rd deleted file mode 100644 index c19f66e..0000000 --- a/man/bookmark.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{bookmark} -\alias{bookmark} -\title{bookmark} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a bookmark -} -\description{ -Render an svg icon of a bookmark -} -\examples{ -rheroicons::icons$bookmark( - type = "solid", - id = "my_bookmark_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the bookmark icon" -) -} -\keyword{bookmark} -\keyword{rheroicons} diff --git a/man/bookmark_alt.Rd b/man/bookmark_alt.Rd deleted file mode 100644 index 32070dd..0000000 --- a/man/bookmark_alt.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{bookmark_alt} -\alias{bookmark_alt} -\title{bookmark_alt} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a bookmark_alt -} -\description{ -Render an svg icon of a bookmark_alt -} -\examples{ -rheroicons::icons$bookmark_alt( - type = "solid", - id = "my_bookmark_alt_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the bookmark_alt icon" -) -} -\keyword{bookmark_alt} -\keyword{rheroicons} diff --git a/man/briefcase.Rd b/man/briefcase.Rd deleted file mode 100644 index 1ce4aaf..0000000 --- a/man/briefcase.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{briefcase} -\alias{briefcase} -\title{briefcase} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a briefcase -} -\description{ -Render an svg icon of a briefcase -} -\examples{ -rheroicons::icons$briefcase( - type = "solid", - id = "my_briefcase_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the briefcase icon" -) -} -\keyword{briefcase} -\keyword{rheroicons} diff --git a/man/cake.Rd b/man/cake.Rd deleted file mode 100644 index 752ef81..0000000 --- a/man/cake.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cake} -\alias{cake} -\title{cake} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cake -} -\description{ -Render an svg icon of a cake -} -\examples{ -rheroicons::icons$cake( - type = "solid", - id = "my_cake_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cake icon" -) -} -\keyword{cake} -\keyword{rheroicons} diff --git a/man/calculator.Rd b/man/calculator.Rd deleted file mode 100644 index f541aa2..0000000 --- a/man/calculator.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{calculator} -\alias{calculator} -\title{calculator} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a calculator -} -\description{ -Render an svg icon of a calculator -} -\examples{ -rheroicons::icons$calculator( - type = "solid", - id = "my_calculator_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the calculator icon" -) -} -\keyword{calculator} -\keyword{rheroicons} diff --git a/man/calendar.Rd b/man/calendar.Rd deleted file mode 100644 index b2bf7c9..0000000 --- a/man/calendar.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{calendar} -\alias{calendar} -\title{calendar} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a calendar -} -\description{ -Render an svg icon of a calendar -} -\examples{ -rheroicons::icons$calendar( - type = "solid", - id = "my_calendar_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the calendar icon" -) -} -\keyword{calendar} -\keyword{rheroicons} diff --git a/man/camera.Rd b/man/camera.Rd deleted file mode 100644 index 9c49eca..0000000 --- a/man/camera.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{camera} -\alias{camera} -\title{camera} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a camera -} -\description{ -Render an svg icon of a camera -} -\examples{ -rheroicons::icons$camera( - type = "solid", - id = "my_camera_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the camera icon" -) -} -\keyword{camera} -\keyword{rheroicons} diff --git a/man/cash.Rd b/man/cash.Rd deleted file mode 100644 index 19ec4dc..0000000 --- a/man/cash.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cash} -\alias{cash} -\title{cash} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cash -} -\description{ -Render an svg icon of a cash -} -\examples{ -rheroicons::icons$cash( - type = "solid", - id = "my_cash_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cash icon" -) -} -\keyword{cash} -\keyword{rheroicons} diff --git a/man/chart_bar.Rd b/man/chart_bar.Rd deleted file mode 100644 index 04be88e..0000000 --- a/man/chart_bar.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chart_bar} -\alias{chart_bar} -\title{chart_bar} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chart_bar -} -\description{ -Render an svg icon of a chart_bar -} -\examples{ -rheroicons::icons$chart_bar( - type = "solid", - id = "my_chart_bar_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chart_bar icon" -) -} -\keyword{chart_bar} -\keyword{rheroicons} diff --git a/man/chart_pie.Rd b/man/chart_pie.Rd deleted file mode 100644 index 559eda4..0000000 --- a/man/chart_pie.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chart_pie} -\alias{chart_pie} -\title{chart_pie} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chart_pie -} -\description{ -Render an svg icon of a chart_pie -} -\examples{ -rheroicons::icons$chart_pie( - type = "solid", - id = "my_chart_pie_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chart_pie icon" -) -} -\keyword{chart_pie} -\keyword{rheroicons} diff --git a/man/chart_square_bar.Rd b/man/chart_square_bar.Rd deleted file mode 100644 index a211d52..0000000 --- a/man/chart_square_bar.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chart_square_bar} -\alias{chart_square_bar} -\title{chart_square_bar} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chart_square_bar -} -\description{ -Render an svg icon of a chart_square_bar -} -\examples{ -rheroicons::icons$chart_square_bar( - type = "solid", - id = "my_chart_square_bar_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chart_square_bar icon" -) -} -\keyword{chart_square_bar} -\keyword{rheroicons} diff --git a/man/chat.Rd b/man/chat.Rd deleted file mode 100644 index 1f381a9..0000000 --- a/man/chat.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chat} -\alias{chat} -\title{chat} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chat -} -\description{ -Render an svg icon of a chat -} -\examples{ -rheroicons::icons$chat( - type = "solid", - id = "my_chat_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chat icon" -) -} -\keyword{chat} -\keyword{rheroicons} diff --git a/man/chat_alt.Rd b/man/chat_alt.Rd deleted file mode 100644 index 514822f..0000000 --- a/man/chat_alt.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chat_alt} -\alias{chat_alt} -\title{chat_alt} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chat_alt -} -\description{ -Render an svg icon of a chat_alt -} -\examples{ -rheroicons::icons$chat_alt( - type = "solid", - id = "my_chat_alt_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chat_alt icon" -) -} -\keyword{chat_alt} -\keyword{rheroicons} diff --git a/man/chat_alt_2.Rd b/man/chat_alt_2.Rd deleted file mode 100644 index e5e5d8c..0000000 --- a/man/chat_alt_2.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chat_alt_2} -\alias{chat_alt_2} -\title{chat_alt_2} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chat_alt_2 -} -\description{ -Render an svg icon of a chat_alt_2 -} -\examples{ -rheroicons::icons$chat_alt_2( - type = "solid", - id = "my_chat_alt_2_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chat_alt_2 icon" -) -} -\keyword{chat_alt_2} -\keyword{rheroicons} diff --git a/man/check.Rd b/man/check.Rd deleted file mode 100644 index bcab423..0000000 --- a/man/check.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{check} -\alias{check} -\title{check} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a check -} -\description{ -Render an svg icon of a check -} -\examples{ -rheroicons::icons$check( - type = "solid", - id = "my_check_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the check icon" -) -} -\keyword{check} -\keyword{rheroicons} diff --git a/man/check_circle.Rd b/man/check_circle.Rd deleted file mode 100644 index 2daefa1..0000000 --- a/man/check_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{check_circle} -\alias{check_circle} -\title{check_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a check_circle -} -\description{ -Render an svg icon of a check_circle -} -\examples{ -rheroicons::icons$check_circle( - type = "solid", - id = "my_check_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the check_circle icon" -) -} -\keyword{check_circle} -\keyword{rheroicons} diff --git a/man/chevron_double_down.Rd b/man/chevron_double_down.Rd deleted file mode 100644 index 36bf0bc..0000000 --- a/man/chevron_double_down.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_double_down} -\alias{chevron_double_down} -\title{chevron_double_down} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_double_down -} -\description{ -Render an svg icon of a chevron_double_down -} -\examples{ -rheroicons::icons$chevron_double_down( - type = "solid", - id = "my_chevron_double_down_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_double_down icon" -) -} -\keyword{chevron_double_down} -\keyword{rheroicons} diff --git a/man/chevron_double_left.Rd b/man/chevron_double_left.Rd deleted file mode 100644 index ebaa2f4..0000000 --- a/man/chevron_double_left.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_double_left} -\alias{chevron_double_left} -\title{chevron_double_left} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_double_left -} -\description{ -Render an svg icon of a chevron_double_left -} -\examples{ -rheroicons::icons$chevron_double_left( - type = "solid", - id = "my_chevron_double_left_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_double_left icon" -) -} -\keyword{chevron_double_left} -\keyword{rheroicons} diff --git a/man/chevron_double_right.Rd b/man/chevron_double_right.Rd deleted file mode 100644 index b1a6b3d..0000000 --- a/man/chevron_double_right.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_double_right} -\alias{chevron_double_right} -\title{chevron_double_right} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_double_right -} -\description{ -Render an svg icon of a chevron_double_right -} -\examples{ -rheroicons::icons$chevron_double_right( - type = "solid", - id = "my_chevron_double_right_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_double_right icon" -) -} -\keyword{chevron_double_right} -\keyword{rheroicons} diff --git a/man/chevron_double_up.Rd b/man/chevron_double_up.Rd deleted file mode 100644 index 3877d08..0000000 --- a/man/chevron_double_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_double_up} -\alias{chevron_double_up} -\title{chevron_double_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_double_up -} -\description{ -Render an svg icon of a chevron_double_up -} -\examples{ -rheroicons::icons$chevron_double_up( - type = "solid", - id = "my_chevron_double_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_double_up icon" -) -} -\keyword{chevron_double_up} -\keyword{rheroicons} diff --git a/man/chevron_down.Rd b/man/chevron_down.Rd deleted file mode 100644 index a4ae224..0000000 --- a/man/chevron_down.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_down} -\alias{chevron_down} -\title{chevron_down} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_down -} -\description{ -Render an svg icon of a chevron_down -} -\examples{ -rheroicons::icons$chevron_down( - type = "solid", - id = "my_chevron_down_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_down icon" -) -} -\keyword{chevron_down} -\keyword{rheroicons} diff --git a/man/chevron_left.Rd b/man/chevron_left.Rd deleted file mode 100644 index 6aa7e6b..0000000 --- a/man/chevron_left.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_left} -\alias{chevron_left} -\title{chevron_left} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_left -} -\description{ -Render an svg icon of a chevron_left -} -\examples{ -rheroicons::icons$chevron_left( - type = "solid", - id = "my_chevron_left_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_left icon" -) -} -\keyword{chevron_left} -\keyword{rheroicons} diff --git a/man/chevron_right.Rd b/man/chevron_right.Rd deleted file mode 100644 index 806cc38..0000000 --- a/man/chevron_right.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_right} -\alias{chevron_right} -\title{chevron_right} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_right -} -\description{ -Render an svg icon of a chevron_right -} -\examples{ -rheroicons::icons$chevron_right( - type = "solid", - id = "my_chevron_right_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_right icon" -) -} -\keyword{chevron_right} -\keyword{rheroicons} diff --git a/man/chevron_up.Rd b/man/chevron_up.Rd deleted file mode 100644 index b9bff7a..0000000 --- a/man/chevron_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chevron_up} -\alias{chevron_up} -\title{chevron_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chevron_up -} -\description{ -Render an svg icon of a chevron_up -} -\examples{ -rheroicons::icons$chevron_up( - type = "solid", - id = "my_chevron_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chevron_up icon" -) -} -\keyword{chevron_up} -\keyword{rheroicons} diff --git a/man/chip.Rd b/man/chip.Rd deleted file mode 100644 index cb266c1..0000000 --- a/man/chip.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{chip} -\alias{chip} -\title{chip} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a chip -} -\description{ -Render an svg icon of a chip -} -\examples{ -rheroicons::icons$chip( - type = "solid", - id = "my_chip_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the chip icon" -) -} -\keyword{chip} -\keyword{rheroicons} diff --git a/man/clipboard.Rd b/man/clipboard.Rd deleted file mode 100644 index e4c71b6..0000000 --- a/man/clipboard.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{clipboard} -\alias{clipboard} -\title{clipboard} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a clipboard -} -\description{ -Render an svg icon of a clipboard -} -\examples{ -rheroicons::icons$clipboard( - type = "solid", - id = "my_clipboard_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the clipboard icon" -) -} -\keyword{clipboard} -\keyword{rheroicons} diff --git a/man/clipboard_check.Rd b/man/clipboard_check.Rd deleted file mode 100644 index 55dfcdd..0000000 --- a/man/clipboard_check.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{clipboard_check} -\alias{clipboard_check} -\title{clipboard_check} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a clipboard_check -} -\description{ -Render an svg icon of a clipboard_check -} -\examples{ -rheroicons::icons$clipboard_check( - type = "solid", - id = "my_clipboard_check_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the clipboard_check icon" -) -} -\keyword{clipboard_check} -\keyword{rheroicons} diff --git a/man/clipboard_copy.Rd b/man/clipboard_copy.Rd deleted file mode 100644 index 057629d..0000000 --- a/man/clipboard_copy.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{clipboard_copy} -\alias{clipboard_copy} -\title{clipboard_copy} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a clipboard_copy -} -\description{ -Render an svg icon of a clipboard_copy -} -\examples{ -rheroicons::icons$clipboard_copy( - type = "solid", - id = "my_clipboard_copy_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the clipboard_copy icon" -) -} -\keyword{clipboard_copy} -\keyword{rheroicons} diff --git a/man/clipboard_list.Rd b/man/clipboard_list.Rd deleted file mode 100644 index 96539cd..0000000 --- a/man/clipboard_list.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{clipboard_list} -\alias{clipboard_list} -\title{clipboard_list} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a clipboard_list -} -\description{ -Render an svg icon of a clipboard_list -} -\examples{ -rheroicons::icons$clipboard_list( - type = "solid", - id = "my_clipboard_list_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the clipboard_list icon" -) -} -\keyword{clipboard_list} -\keyword{rheroicons} diff --git a/man/clock.Rd b/man/clock.Rd deleted file mode 100644 index 6c1152d..0000000 --- a/man/clock.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{clock} -\alias{clock} -\title{clock} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a clock -} -\description{ -Render an svg icon of a clock -} -\examples{ -rheroicons::icons$clock( - type = "solid", - id = "my_clock_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the clock icon" -) -} -\keyword{clock} -\keyword{rheroicons} diff --git a/man/cloud.Rd b/man/cloud.Rd deleted file mode 100644 index 4ec6700..0000000 --- a/man/cloud.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cloud} -\alias{cloud} -\title{cloud} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cloud -} -\description{ -Render an svg icon of a cloud -} -\examples{ -rheroicons::icons$cloud( - type = "solid", - id = "my_cloud_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cloud icon" -) -} -\keyword{cloud} -\keyword{rheroicons} diff --git a/man/cloud_download.Rd b/man/cloud_download.Rd deleted file mode 100644 index 0b4d43b..0000000 --- a/man/cloud_download.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cloud_download} -\alias{cloud_download} -\title{cloud_download} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cloud_download -} -\description{ -Render an svg icon of a cloud_download -} -\examples{ -rheroicons::icons$cloud_download( - type = "solid", - id = "my_cloud_download_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cloud_download icon" -) -} -\keyword{cloud_download} -\keyword{rheroicons} diff --git a/man/cloud_upload.Rd b/man/cloud_upload.Rd deleted file mode 100644 index 4d1083e..0000000 --- a/man/cloud_upload.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cloud_upload} -\alias{cloud_upload} -\title{cloud_upload} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cloud_upload -} -\description{ -Render an svg icon of a cloud_upload -} -\examples{ -rheroicons::icons$cloud_upload( - type = "solid", - id = "my_cloud_upload_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cloud_upload icon" -) -} -\keyword{cloud_upload} -\keyword{rheroicons} diff --git a/man/code.Rd b/man/code.Rd deleted file mode 100644 index 32e74a4..0000000 --- a/man/code.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{code} -\alias{code} -\title{code} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a code -} -\description{ -Render an svg icon of a code -} -\examples{ -rheroicons::icons$code( - type = "solid", - id = "my_code_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the code icon" -) -} -\keyword{code} -\keyword{rheroicons} diff --git a/man/cog.Rd b/man/cog.Rd deleted file mode 100644 index a56545f..0000000 --- a/man/cog.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cog} -\alias{cog} -\title{cog} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cog -} -\description{ -Render an svg icon of a cog -} -\examples{ -rheroicons::icons$cog( - type = "solid", - id = "my_cog_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cog icon" -) -} -\keyword{cog} -\keyword{rheroicons} diff --git a/man/collection.Rd b/man/collection.Rd deleted file mode 100644 index 01f5854..0000000 --- a/man/collection.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{collection} -\alias{collection} -\title{collection} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a collection -} -\description{ -Render an svg icon of a collection -} -\examples{ -rheroicons::icons$collection( - type = "solid", - id = "my_collection_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the collection icon" -) -} -\keyword{collection} -\keyword{rheroicons} diff --git a/man/color_swatch.Rd b/man/color_swatch.Rd deleted file mode 100644 index 6aeaa0f..0000000 --- a/man/color_swatch.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{color_swatch} -\alias{color_swatch} -\title{color_swatch} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a color_swatch -} -\description{ -Render an svg icon of a color_swatch -} -\examples{ -rheroicons::icons$color_swatch( - type = "solid", - id = "my_color_swatch_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the color_swatch icon" -) -} -\keyword{color_swatch} -\keyword{rheroicons} diff --git a/man/credit_card.Rd b/man/credit_card.Rd deleted file mode 100644 index f7bf91b..0000000 --- a/man/credit_card.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{credit_card} -\alias{credit_card} -\title{credit_card} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a credit_card -} -\description{ -Render an svg icon of a credit_card -} -\examples{ -rheroicons::icons$credit_card( - type = "solid", - id = "my_credit_card_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the credit_card icon" -) -} -\keyword{credit_card} -\keyword{rheroicons} diff --git a/man/cube.Rd b/man/cube.Rd deleted file mode 100644 index eed383e..0000000 --- a/man/cube.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cube} -\alias{cube} -\title{cube} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cube -} -\description{ -Render an svg icon of a cube -} -\examples{ -rheroicons::icons$cube( - type = "solid", - id = "my_cube_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cube icon" -) -} -\keyword{cube} -\keyword{rheroicons} diff --git a/man/cube_transparent.Rd b/man/cube_transparent.Rd deleted file mode 100644 index b116e4b..0000000 --- a/man/cube_transparent.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cube_transparent} -\alias{cube_transparent} -\title{cube_transparent} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cube_transparent -} -\description{ -Render an svg icon of a cube_transparent -} -\examples{ -rheroicons::icons$cube_transparent( - type = "solid", - id = "my_cube_transparent_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cube_transparent icon" -) -} -\keyword{cube_transparent} -\keyword{rheroicons} diff --git a/man/currency_bangladeshi.Rd b/man/currency_bangladeshi.Rd deleted file mode 100644 index cc8c303..0000000 --- a/man/currency_bangladeshi.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{currency_bangladeshi} -\alias{currency_bangladeshi} -\title{currency_bangladeshi} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a currency_bangladeshi -} -\description{ -Render an svg icon of a currency_bangladeshi -} -\examples{ -rheroicons::icons$currency_bangladeshi( - type = "solid", - id = "my_currency_bangladeshi_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the currency_bangladeshi icon" -) -} -\keyword{currency_bangladeshi} -\keyword{rheroicons} diff --git a/man/currency_dollar.Rd b/man/currency_dollar.Rd deleted file mode 100644 index 948fd98..0000000 --- a/man/currency_dollar.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{currency_dollar} -\alias{currency_dollar} -\title{currency_dollar} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a currency_dollar -} -\description{ -Render an svg icon of a currency_dollar -} -\examples{ -rheroicons::icons$currency_dollar( - type = "solid", - id = "my_currency_dollar_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the currency_dollar icon" -) -} -\keyword{currency_dollar} -\keyword{rheroicons} diff --git a/man/currency_euro.Rd b/man/currency_euro.Rd deleted file mode 100644 index e6c0840..0000000 --- a/man/currency_euro.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{currency_euro} -\alias{currency_euro} -\title{currency_euro} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a currency_euro -} -\description{ -Render an svg icon of a currency_euro -} -\examples{ -rheroicons::icons$currency_euro( - type = "solid", - id = "my_currency_euro_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the currency_euro icon" -) -} -\keyword{currency_euro} -\keyword{rheroicons} diff --git a/man/currency_pound.Rd b/man/currency_pound.Rd deleted file mode 100644 index e777a27..0000000 --- a/man/currency_pound.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{currency_pound} -\alias{currency_pound} -\title{currency_pound} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a currency_pound -} -\description{ -Render an svg icon of a currency_pound -} -\examples{ -rheroicons::icons$currency_pound( - type = "solid", - id = "my_currency_pound_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the currency_pound icon" -) -} -\keyword{currency_pound} -\keyword{rheroicons} diff --git a/man/currency_rupee.Rd b/man/currency_rupee.Rd deleted file mode 100644 index 280ab7a..0000000 --- a/man/currency_rupee.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{currency_rupee} -\alias{currency_rupee} -\title{currency_rupee} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a currency_rupee -} -\description{ -Render an svg icon of a currency_rupee -} -\examples{ -rheroicons::icons$currency_rupee( - type = "solid", - id = "my_currency_rupee_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the currency_rupee icon" -) -} -\keyword{currency_rupee} -\keyword{rheroicons} diff --git a/man/currency_yen.Rd b/man/currency_yen.Rd deleted file mode 100644 index 5615133..0000000 --- a/man/currency_yen.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{currency_yen} -\alias{currency_yen} -\title{currency_yen} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a currency_yen -} -\description{ -Render an svg icon of a currency_yen -} -\examples{ -rheroicons::icons$currency_yen( - type = "solid", - id = "my_currency_yen_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the currency_yen icon" -) -} -\keyword{currency_yen} -\keyword{rheroicons} diff --git a/man/cursor_click.Rd b/man/cursor_click.Rd deleted file mode 100644 index 8a252ce..0000000 --- a/man/cursor_click.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{cursor_click} -\alias{cursor_click} -\title{cursor_click} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a cursor_click -} -\description{ -Render an svg icon of a cursor_click -} -\examples{ -rheroicons::icons$cursor_click( - type = "solid", - id = "my_cursor_click_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the cursor_click icon" -) -} -\keyword{cursor_click} -\keyword{rheroicons} diff --git a/man/database.Rd b/man/database.Rd deleted file mode 100644 index eef37f7..0000000 --- a/man/database.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{database} -\alias{database} -\title{database} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a database -} -\description{ -Render an svg icon of a database -} -\examples{ -rheroicons::icons$database( - type = "solid", - id = "my_database_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the database icon" -) -} -\keyword{database} -\keyword{rheroicons} diff --git a/man/desktop_computer.Rd b/man/desktop_computer.Rd deleted file mode 100644 index 1c0a6f6..0000000 --- a/man/desktop_computer.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{desktop_computer} -\alias{desktop_computer} -\title{desktop_computer} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a desktop_computer -} -\description{ -Render an svg icon of a desktop_computer -} -\examples{ -rheroicons::icons$desktop_computer( - type = "solid", - id = "my_desktop_computer_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the desktop_computer icon" -) -} -\keyword{desktop_computer} -\keyword{rheroicons} diff --git a/man/device_mobile.Rd b/man/device_mobile.Rd deleted file mode 100644 index 02195cf..0000000 --- a/man/device_mobile.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{device_mobile} -\alias{device_mobile} -\title{device_mobile} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a device_mobile -} -\description{ -Render an svg icon of a device_mobile -} -\examples{ -rheroicons::icons$device_mobile( - type = "solid", - id = "my_device_mobile_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the device_mobile icon" -) -} -\keyword{device_mobile} -\keyword{rheroicons} diff --git a/man/device_tablet.Rd b/man/device_tablet.Rd deleted file mode 100644 index a583adb..0000000 --- a/man/device_tablet.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{device_tablet} -\alias{device_tablet} -\title{device_tablet} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a device_tablet -} -\description{ -Render an svg icon of a device_tablet -} -\examples{ -rheroicons::icons$device_tablet( - type = "solid", - id = "my_device_tablet_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the device_tablet icon" -) -} -\keyword{device_tablet} -\keyword{rheroicons} diff --git a/man/document.Rd b/man/document.Rd deleted file mode 100644 index 400cb8f..0000000 --- a/man/document.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document} -\alias{document} -\title{document} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document -} -\description{ -Render an svg icon of a document -} -\examples{ -rheroicons::icons$document( - type = "solid", - id = "my_document_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document icon" -) -} -\keyword{document} -\keyword{rheroicons} diff --git a/man/document_add.Rd b/man/document_add.Rd deleted file mode 100644 index 2c21a61..0000000 --- a/man/document_add.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document_add} -\alias{document_add} -\title{document_add} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document_add -} -\description{ -Render an svg icon of a document_add -} -\examples{ -rheroicons::icons$document_add( - type = "solid", - id = "my_document_add_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document_add icon" -) -} -\keyword{document_add} -\keyword{rheroicons} diff --git a/man/document_download.Rd b/man/document_download.Rd deleted file mode 100644 index 7adb9a4..0000000 --- a/man/document_download.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document_download} -\alias{document_download} -\title{document_download} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document_download -} -\description{ -Render an svg icon of a document_download -} -\examples{ -rheroicons::icons$document_download( - type = "solid", - id = "my_document_download_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document_download icon" -) -} -\keyword{document_download} -\keyword{rheroicons} diff --git a/man/document_duplicate.Rd b/man/document_duplicate.Rd deleted file mode 100644 index 43999f5..0000000 --- a/man/document_duplicate.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document_duplicate} -\alias{document_duplicate} -\title{document_duplicate} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document_duplicate -} -\description{ -Render an svg icon of a document_duplicate -} -\examples{ -rheroicons::icons$document_duplicate( - type = "solid", - id = "my_document_duplicate_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document_duplicate icon" -) -} -\keyword{document_duplicate} -\keyword{rheroicons} diff --git a/man/document_remove.Rd b/man/document_remove.Rd deleted file mode 100644 index ee3a277..0000000 --- a/man/document_remove.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document_remove} -\alias{document_remove} -\title{document_remove} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document_remove -} -\description{ -Render an svg icon of a document_remove -} -\examples{ -rheroicons::icons$document_remove( - type = "solid", - id = "my_document_remove_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document_remove icon" -) -} -\keyword{document_remove} -\keyword{rheroicons} diff --git a/man/document_report.Rd b/man/document_report.Rd deleted file mode 100644 index 1e918c1..0000000 --- a/man/document_report.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document_report} -\alias{document_report} -\title{document_report} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document_report -} -\description{ -Render an svg icon of a document_report -} -\examples{ -rheroicons::icons$document_report( - type = "solid", - id = "my_document_report_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document_report icon" -) -} -\keyword{document_report} -\keyword{rheroicons} diff --git a/man/document_search.Rd b/man/document_search.Rd deleted file mode 100644 index c440cd5..0000000 --- a/man/document_search.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document_search} -\alias{document_search} -\title{document_search} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document_search -} -\description{ -Render an svg icon of a document_search -} -\examples{ -rheroicons::icons$document_search( - type = "solid", - id = "my_document_search_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document_search icon" -) -} -\keyword{document_search} -\keyword{rheroicons} diff --git a/man/document_text.Rd b/man/document_text.Rd deleted file mode 100644 index b5d59bf..0000000 --- a/man/document_text.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{document_text} -\alias{document_text} -\title{document_text} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a document_text -} -\description{ -Render an svg icon of a document_text -} -\examples{ -rheroicons::icons$document_text( - type = "solid", - id = "my_document_text_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the document_text icon" -) -} -\keyword{document_text} -\keyword{rheroicons} diff --git a/man/dots_circle_horizontal.Rd b/man/dots_circle_horizontal.Rd deleted file mode 100644 index 88e99b9..0000000 --- a/man/dots_circle_horizontal.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{dots_circle_horizontal} -\alias{dots_circle_horizontal} -\title{dots_circle_horizontal} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a dots_circle_horizontal -} -\description{ -Render an svg icon of a dots_circle_horizontal -} -\examples{ -rheroicons::icons$dots_circle_horizontal( - type = "solid", - id = "my_dots_circle_horizontal_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the dots_circle_horizontal icon" -) -} -\keyword{dots_circle_horizontal} -\keyword{rheroicons} diff --git a/man/dots_horizontal.Rd b/man/dots_horizontal.Rd deleted file mode 100644 index b3a546e..0000000 --- a/man/dots_horizontal.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{dots_horizontal} -\alias{dots_horizontal} -\title{dots_horizontal} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a dots_horizontal -} -\description{ -Render an svg icon of a dots_horizontal -} -\examples{ -rheroicons::icons$dots_horizontal( - type = "solid", - id = "my_dots_horizontal_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the dots_horizontal icon" -) -} -\keyword{dots_horizontal} -\keyword{rheroicons} diff --git a/man/dots_vertical.Rd b/man/dots_vertical.Rd deleted file mode 100644 index 362eedf..0000000 --- a/man/dots_vertical.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{dots_vertical} -\alias{dots_vertical} -\title{dots_vertical} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a dots_vertical -} -\description{ -Render an svg icon of a dots_vertical -} -\examples{ -rheroicons::icons$dots_vertical( - type = "solid", - id = "my_dots_vertical_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the dots_vertical icon" -) -} -\keyword{dots_vertical} -\keyword{rheroicons} diff --git a/man/download.Rd b/man/download.Rd deleted file mode 100644 index 386ea2c..0000000 --- a/man/download.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{download} -\alias{download} -\title{download} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a download -} -\description{ -Render an svg icon of a download -} -\examples{ -rheroicons::icons$download( - type = "solid", - id = "my_download_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the download icon" -) -} -\keyword{download} -\keyword{rheroicons} diff --git a/man/duplicate.Rd b/man/duplicate.Rd deleted file mode 100644 index 59c24ee..0000000 --- a/man/duplicate.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{duplicate} -\alias{duplicate} -\title{duplicate} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a duplicate -} -\description{ -Render an svg icon of a duplicate -} -\examples{ -rheroicons::icons$duplicate( - type = "solid", - id = "my_duplicate_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the duplicate icon" -) -} -\keyword{duplicate} -\keyword{rheroicons} diff --git a/man/emoji_happy.Rd b/man/emoji_happy.Rd deleted file mode 100644 index d073b26..0000000 --- a/man/emoji_happy.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{emoji_happy} -\alias{emoji_happy} -\title{emoji_happy} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a emoji_happy -} -\description{ -Render an svg icon of a emoji_happy -} -\examples{ -rheroicons::icons$emoji_happy( - type = "solid", - id = "my_emoji_happy_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the emoji_happy icon" -) -} -\keyword{emoji_happy} -\keyword{rheroicons} diff --git a/man/emoji_sad.Rd b/man/emoji_sad.Rd deleted file mode 100644 index 8158feb..0000000 --- a/man/emoji_sad.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{emoji_sad} -\alias{emoji_sad} -\title{emoji_sad} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a emoji_sad -} -\description{ -Render an svg icon of a emoji_sad -} -\examples{ -rheroicons::icons$emoji_sad( - type = "solid", - id = "my_emoji_sad_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the emoji_sad icon" -) -} -\keyword{emoji_sad} -\keyword{rheroicons} diff --git a/man/exclamation.Rd b/man/exclamation.Rd deleted file mode 100644 index fff359f..0000000 --- a/man/exclamation.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{exclamation} -\alias{exclamation} -\title{exclamation} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a exclamation -} -\description{ -Render an svg icon of a exclamation -} -\examples{ -rheroicons::icons$exclamation( - type = "solid", - id = "my_exclamation_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the exclamation icon" -) -} -\keyword{exclamation} -\keyword{rheroicons} diff --git a/man/exclamation_circle.Rd b/man/exclamation_circle.Rd deleted file mode 100644 index 0e3d8dd..0000000 --- a/man/exclamation_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{exclamation_circle} -\alias{exclamation_circle} -\title{exclamation_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a exclamation_circle -} -\description{ -Render an svg icon of a exclamation_circle -} -\examples{ -rheroicons::icons$exclamation_circle( - type = "solid", - id = "my_exclamation_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the exclamation_circle icon" -) -} -\keyword{exclamation_circle} -\keyword{rheroicons} diff --git a/man/external_link.Rd b/man/external_link.Rd deleted file mode 100644 index 38419b5..0000000 --- a/man/external_link.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{external_link} -\alias{external_link} -\title{external_link} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a external_link -} -\description{ -Render an svg icon of a external_link -} -\examples{ -rheroicons::icons$external_link( - type = "solid", - id = "my_external_link_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the external_link icon" -) -} -\keyword{external_link} -\keyword{rheroicons} diff --git a/man/eye.Rd b/man/eye.Rd deleted file mode 100644 index 90b64b7..0000000 --- a/man/eye.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{eye} -\alias{eye} -\title{eye} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a eye -} -\description{ -Render an svg icon of a eye -} -\examples{ -rheroicons::icons$eye( - type = "solid", - id = "my_eye_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the eye icon" -) -} -\keyword{eye} -\keyword{rheroicons} diff --git a/man/eye_off.Rd b/man/eye_off.Rd deleted file mode 100644 index e00e521..0000000 --- a/man/eye_off.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{eye_off} -\alias{eye_off} -\title{eye_off} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a eye_off -} -\description{ -Render an svg icon of a eye_off -} -\examples{ -rheroicons::icons$eye_off( - type = "solid", - id = "my_eye_off_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the eye_off icon" -) -} -\keyword{eye_off} -\keyword{rheroicons} diff --git a/man/fast_forward.Rd b/man/fast_forward.Rd deleted file mode 100644 index 740bba2..0000000 --- a/man/fast_forward.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{fast_forward} -\alias{fast_forward} -\title{fast_forward} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a fast_forward -} -\description{ -Render an svg icon of a fast_forward -} -\examples{ -rheroicons::icons$fast_forward( - type = "solid", - id = "my_fast_forward_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the fast_forward icon" -) -} -\keyword{fast_forward} -\keyword{rheroicons} diff --git a/man/film.Rd b/man/film.Rd deleted file mode 100644 index b35cd4c..0000000 --- a/man/film.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{film} -\alias{film} -\title{film} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a film -} -\description{ -Render an svg icon of a film -} -\examples{ -rheroicons::icons$film( - type = "solid", - id = "my_film_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the film icon" -) -} -\keyword{film} -\keyword{rheroicons} diff --git a/man/filter.Rd b/man/filter.Rd deleted file mode 100644 index 842bb4e..0000000 --- a/man/filter.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{filter} -\alias{filter} -\title{filter} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a filter -} -\description{ -Render an svg icon of a filter -} -\examples{ -rheroicons::icons$filter( - type = "solid", - id = "my_filter_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the filter icon" -) -} -\keyword{filter} -\keyword{rheroicons} diff --git a/man/finger_print.Rd b/man/finger_print.Rd deleted file mode 100644 index 3ef4fd0..0000000 --- a/man/finger_print.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{finger_print} -\alias{finger_print} -\title{finger_print} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a finger_print -} -\description{ -Render an svg icon of a finger_print -} -\examples{ -rheroicons::icons$finger_print( - type = "solid", - id = "my_finger_print_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the finger_print icon" -) -} -\keyword{finger_print} -\keyword{rheroicons} diff --git a/man/fire.Rd b/man/fire.Rd deleted file mode 100644 index ea9b787..0000000 --- a/man/fire.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{fire} -\alias{fire} -\title{fire} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a fire -} -\description{ -Render an svg icon of a fire -} -\examples{ -rheroicons::icons$fire( - type = "solid", - id = "my_fire_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the fire icon" -) -} -\keyword{fire} -\keyword{rheroicons} diff --git a/man/flag.Rd b/man/flag.Rd deleted file mode 100644 index 5cab862..0000000 --- a/man/flag.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{flag} -\alias{flag} -\title{flag} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a flag -} -\description{ -Render an svg icon of a flag -} -\examples{ -rheroicons::icons$flag( - type = "solid", - id = "my_flag_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the flag icon" -) -} -\keyword{flag} -\keyword{rheroicons} diff --git a/man/folder.Rd b/man/folder.Rd deleted file mode 100644 index abcc5fb..0000000 --- a/man/folder.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{folder} -\alias{folder} -\title{folder} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a folder -} -\description{ -Render an svg icon of a folder -} -\examples{ -rheroicons::icons$folder( - type = "solid", - id = "my_folder_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the folder icon" -) -} -\keyword{folder} -\keyword{rheroicons} diff --git a/man/folder_add.Rd b/man/folder_add.Rd deleted file mode 100644 index 7dc7b9d..0000000 --- a/man/folder_add.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{folder_add} -\alias{folder_add} -\title{folder_add} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a folder_add -} -\description{ -Render an svg icon of a folder_add -} -\examples{ -rheroicons::icons$folder_add( - type = "solid", - id = "my_folder_add_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the folder_add icon" -) -} -\keyword{folder_add} -\keyword{rheroicons} diff --git a/man/folder_download.Rd b/man/folder_download.Rd deleted file mode 100644 index 92513fb..0000000 --- a/man/folder_download.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{folder_download} -\alias{folder_download} -\title{folder_download} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a folder_download -} -\description{ -Render an svg icon of a folder_download -} -\examples{ -rheroicons::icons$folder_download( - type = "solid", - id = "my_folder_download_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the folder_download icon" -) -} -\keyword{folder_download} -\keyword{rheroicons} diff --git a/man/folder_open.Rd b/man/folder_open.Rd deleted file mode 100644 index fb76823..0000000 --- a/man/folder_open.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{folder_open} -\alias{folder_open} -\title{folder_open} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a folder_open -} -\description{ -Render an svg icon of a folder_open -} -\examples{ -rheroicons::icons$folder_open( - type = "solid", - id = "my_folder_open_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the folder_open icon" -) -} -\keyword{folder_open} -\keyword{rheroicons} diff --git a/man/folder_remove.Rd b/man/folder_remove.Rd deleted file mode 100644 index a9ea6d0..0000000 --- a/man/folder_remove.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{folder_remove} -\alias{folder_remove} -\title{folder_remove} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a folder_remove -} -\description{ -Render an svg icon of a folder_remove -} -\examples{ -rheroicons::icons$folder_remove( - type = "solid", - id = "my_folder_remove_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the folder_remove icon" -) -} -\keyword{folder_remove} -\keyword{rheroicons} diff --git a/man/gift.Rd b/man/gift.Rd deleted file mode 100644 index 0d65c6b..0000000 --- a/man/gift.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{gift} -\alias{gift} -\title{gift} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a gift -} -\description{ -Render an svg icon of a gift -} -\examples{ -rheroicons::icons$gift( - type = "solid", - id = "my_gift_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the gift icon" -) -} -\keyword{gift} -\keyword{rheroicons} diff --git a/man/globe.Rd b/man/globe.Rd deleted file mode 100644 index 1254cda..0000000 --- a/man/globe.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{globe} -\alias{globe} -\title{globe} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a globe -} -\description{ -Render an svg icon of a globe -} -\examples{ -rheroicons::icons$globe( - type = "solid", - id = "my_globe_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the globe icon" -) -} -\keyword{globe} -\keyword{rheroicons} diff --git a/man/globe_alt.Rd b/man/globe_alt.Rd deleted file mode 100644 index 124d09e..0000000 --- a/man/globe_alt.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{globe_alt} -\alias{globe_alt} -\title{globe_alt} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a globe_alt -} -\description{ -Render an svg icon of a globe_alt -} -\examples{ -rheroicons::icons$globe_alt( - type = "solid", - id = "my_globe_alt_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the globe_alt icon" -) -} -\keyword{globe_alt} -\keyword{rheroicons} diff --git a/man/hand.Rd b/man/hand.Rd deleted file mode 100644 index 5bba6dd..0000000 --- a/man/hand.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{hand} -\alias{hand} -\title{hand} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a hand -} -\description{ -Render an svg icon of a hand -} -\examples{ -rheroicons::icons$hand( - type = "solid", - id = "my_hand_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the hand icon" -) -} -\keyword{hand} -\keyword{rheroicons} diff --git a/man/hashtag.Rd b/man/hashtag.Rd deleted file mode 100644 index b78ed8f..0000000 --- a/man/hashtag.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{hashtag} -\alias{hashtag} -\title{hashtag} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a hashtag -} -\description{ -Render an svg icon of a hashtag -} -\examples{ -rheroicons::icons$hashtag( - type = "solid", - id = "my_hashtag_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the hashtag icon" -) -} -\keyword{hashtag} -\keyword{rheroicons} diff --git a/man/heart.Rd b/man/heart.Rd deleted file mode 100644 index 85d30f1..0000000 --- a/man/heart.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{heart} -\alias{heart} -\title{heart} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a heart -} -\description{ -Render an svg icon of a heart -} -\examples{ -rheroicons::icons$heart( - type = "solid", - id = "my_heart_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the heart icon" -) -} -\keyword{heart} -\keyword{rheroicons} diff --git a/man/home.Rd b/man/home.Rd deleted file mode 100644 index c44c188..0000000 --- a/man/home.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{home} -\alias{home} -\title{home} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a home -} -\description{ -Render an svg icon of a home -} -\examples{ -rheroicons::icons$home( - type = "solid", - id = "my_home_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the home icon" -) -} -\keyword{home} -\keyword{rheroicons} diff --git a/man/icons.Rd b/man/icons.Rd deleted file mode 100644 index 2d01633..0000000 --- a/man/icons.Rd +++ /dev/null @@ -1,30 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\docType{data} -\name{icons} -\alias{icons} -\title{Heroicons for R} -\format{ -An object of class \code{list} of length 226. -} -\usage{ -icons -} -\description{ -Heroicons for R -} -\examples{ -rheroicons::icons$book_open() -rheroicons::icons$book_open(type = "outline") -rheroicons::icons$book_open(type = "solid") -rheroicons::icons$book_open(id = "myBookIcon") -rheroicons::icons$book_open(class = "my-icon-set") -rheroicons::icons$book_open(aria_hidden = FALSE) -rheroicons::icons$book_open(title = "read documentation") - -} -\references{ -\url{https://github.com/refactoringui/heroicons} -\url{https://davidruvolo.shinyapps.io/rheroicons-demo/} -} -\keyword{rheroicons} diff --git a/man/identification.Rd b/man/identification.Rd deleted file mode 100644 index 59a118b..0000000 --- a/man/identification.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{identification} -\alias{identification} -\title{identification} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a identification -} -\description{ -Render an svg icon of a identification -} -\examples{ -rheroicons::icons$identification( - type = "solid", - id = "my_identification_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the identification icon" -) -} -\keyword{identification} -\keyword{rheroicons} diff --git a/man/inbox.Rd b/man/inbox.Rd deleted file mode 100644 index e4de7f6..0000000 --- a/man/inbox.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{inbox} -\alias{inbox} -\title{inbox} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a inbox -} -\description{ -Render an svg icon of a inbox -} -\examples{ -rheroicons::icons$inbox( - type = "solid", - id = "my_inbox_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the inbox icon" -) -} -\keyword{inbox} -\keyword{rheroicons} diff --git a/man/inbox_in.Rd b/man/inbox_in.Rd deleted file mode 100644 index 10de216..0000000 --- a/man/inbox_in.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{inbox_in} -\alias{inbox_in} -\title{inbox_in} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a inbox_in -} -\description{ -Render an svg icon of a inbox_in -} -\examples{ -rheroicons::icons$inbox_in( - type = "solid", - id = "my_inbox_in_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the inbox_in icon" -) -} -\keyword{inbox_in} -\keyword{rheroicons} diff --git a/man/information_circle.Rd b/man/information_circle.Rd deleted file mode 100644 index 071a43d..0000000 --- a/man/information_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{information_circle} -\alias{information_circle} -\title{information_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a information_circle -} -\description{ -Render an svg icon of a information_circle -} -\examples{ -rheroicons::icons$information_circle( - type = "solid", - id = "my_information_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the information_circle icon" -) -} -\keyword{information_circle} -\keyword{rheroicons} diff --git a/man/key.Rd b/man/key.Rd deleted file mode 100644 index dd0f4b4..0000000 --- a/man/key.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{key} -\alias{key} -\title{key} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a key -} -\description{ -Render an svg icon of a key -} -\examples{ -rheroicons::icons$key( - type = "solid", - id = "my_key_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the key icon" -) -} -\keyword{key} -\keyword{rheroicons} diff --git a/man/launch_gallery.Rd b/man/launch_gallery.Rd index 4f6985e..882fed0 100644 --- a/man/launch_gallery.Rd +++ b/man/launch_gallery.Rd @@ -2,15 +2,16 @@ % Please edit documentation in R/launch_gallery.R \name{launch_gallery} \alias{launch_gallery} -\title{\code{launch_gallery}} +\title{rheroicons gallery} \usage{ -launch_gallery() +launch_gallery(...) } -\value{ -This function starts the rheroicons gallery +\arguments{ +\item{...}{additional options passed down to runApp} } \description{ -This function starts the rheroicons gallery +Run the rheroicons gallery and search for icons. Click on an icon +name to copy the function to the clipboard. } \examples{ \dontrun{ @@ -18,6 +19,3 @@ This function starts the rheroicons gallery } } -\keyword{demo} -\keyword{gallery} -\keyword{rheroicons} diff --git a/man/library.Rd b/man/library.Rd deleted file mode 100644 index 8c226bf..0000000 --- a/man/library.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{library} -\alias{library} -\title{library} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a library -} -\description{ -Render an svg icon of a library -} -\examples{ -rheroicons::icons$library( - type = "solid", - id = "my_library_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the library icon" -) -} -\keyword{library} -\keyword{rheroicons} diff --git a/man/light_bulb.Rd b/man/light_bulb.Rd deleted file mode 100644 index f1cf645..0000000 --- a/man/light_bulb.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{light_bulb} -\alias{light_bulb} -\title{light_bulb} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a light_bulb -} -\description{ -Render an svg icon of a light_bulb -} -\examples{ -rheroicons::icons$light_bulb( - type = "solid", - id = "my_light_bulb_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the light_bulb icon" -) -} -\keyword{light_bulb} -\keyword{rheroicons} diff --git a/man/lightning_bolt.Rd b/man/lightning_bolt.Rd deleted file mode 100644 index 36637a6..0000000 --- a/man/lightning_bolt.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{lightning_bolt} -\alias{lightning_bolt} -\title{lightning_bolt} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a lightning_bolt -} -\description{ -Render an svg icon of a lightning_bolt -} -\examples{ -rheroicons::icons$lightning_bolt( - type = "solid", - id = "my_lightning_bolt_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the lightning_bolt icon" -) -} -\keyword{lightning_bolt} -\keyword{rheroicons} diff --git a/man/link.Rd b/man/link.Rd deleted file mode 100644 index f4b8775..0000000 --- a/man/link.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{link} -\alias{link} -\title{link} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a link -} -\description{ -Render an svg icon of a link -} -\examples{ -rheroicons::icons$link( - type = "solid", - id = "my_link_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the link icon" -) -} -\keyword{link} -\keyword{rheroicons} diff --git a/man/location_marker.Rd b/man/location_marker.Rd deleted file mode 100644 index 5b7de00..0000000 --- a/man/location_marker.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{location_marker} -\alias{location_marker} -\title{location_marker} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a location_marker -} -\description{ -Render an svg icon of a location_marker -} -\examples{ -rheroicons::icons$location_marker( - type = "solid", - id = "my_location_marker_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the location_marker icon" -) -} -\keyword{location_marker} -\keyword{rheroicons} diff --git a/man/lock_closed.Rd b/man/lock_closed.Rd deleted file mode 100644 index b59b214..0000000 --- a/man/lock_closed.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{lock_closed} -\alias{lock_closed} -\title{lock_closed} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a lock_closed -} -\description{ -Render an svg icon of a lock_closed -} -\examples{ -rheroicons::icons$lock_closed( - type = "solid", - id = "my_lock_closed_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the lock_closed icon" -) -} -\keyword{lock_closed} -\keyword{rheroicons} diff --git a/man/lock_open.Rd b/man/lock_open.Rd deleted file mode 100644 index 18c49cf..0000000 --- a/man/lock_open.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{lock_open} -\alias{lock_open} -\title{lock_open} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a lock_open -} -\description{ -Render an svg icon of a lock_open -} -\examples{ -rheroicons::icons$lock_open( - type = "solid", - id = "my_lock_open_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the lock_open icon" -) -} -\keyword{lock_open} -\keyword{rheroicons} diff --git a/man/login.Rd b/man/login.Rd deleted file mode 100644 index 5a8e5d7..0000000 --- a/man/login.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{login} -\alias{login} -\title{login} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a login -} -\description{ -Render an svg icon of a login -} -\examples{ -rheroicons::icons$login( - type = "solid", - id = "my_login_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the login icon" -) -} -\keyword{login} -\keyword{rheroicons} diff --git a/man/logout.Rd b/man/logout.Rd deleted file mode 100644 index 27316bf..0000000 --- a/man/logout.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{logout} -\alias{logout} -\title{logout} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a logout -} -\description{ -Render an svg icon of a logout -} -\examples{ -rheroicons::icons$logout( - type = "solid", - id = "my_logout_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the logout icon" -) -} -\keyword{logout} -\keyword{rheroicons} diff --git a/man/mail.Rd b/man/mail.Rd deleted file mode 100644 index 860d9f1..0000000 --- a/man/mail.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{mail} -\alias{mail} -\title{mail} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a mail -} -\description{ -Render an svg icon of a mail -} -\examples{ -rheroicons::icons$mail( - type = "solid", - id = "my_mail_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the mail icon" -) -} -\keyword{mail} -\keyword{rheroicons} diff --git a/man/mail_open.Rd b/man/mail_open.Rd deleted file mode 100644 index 5c87159..0000000 --- a/man/mail_open.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{mail_open} -\alias{mail_open} -\title{mail_open} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a mail_open -} -\description{ -Render an svg icon of a mail_open -} -\examples{ -rheroicons::icons$mail_open( - type = "solid", - id = "my_mail_open_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the mail_open icon" -) -} -\keyword{mail_open} -\keyword{rheroicons} diff --git a/man/map.Rd b/man/map.Rd deleted file mode 100644 index e22826d..0000000 --- a/man/map.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{map} -\alias{map} -\title{map} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a map -} -\description{ -Render an svg icon of a map -} -\examples{ -rheroicons::icons$map( - type = "solid", - id = "my_map_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the map icon" -) -} -\keyword{map} -\keyword{rheroicons} diff --git a/man/menu.Rd b/man/menu.Rd deleted file mode 100644 index a2ad835..0000000 --- a/man/menu.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{menu} -\alias{menu} -\title{menu} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a menu -} -\description{ -Render an svg icon of a menu -} -\examples{ -rheroicons::icons$menu( - type = "solid", - id = "my_menu_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the menu icon" -) -} -\keyword{menu} -\keyword{rheroicons} diff --git a/man/menu_alt_1.Rd b/man/menu_alt_1.Rd deleted file mode 100644 index b52470e..0000000 --- a/man/menu_alt_1.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{menu_alt_1} -\alias{menu_alt_1} -\title{menu_alt_1} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a menu_alt_1 -} -\description{ -Render an svg icon of a menu_alt_1 -} -\examples{ -rheroicons::icons$menu_alt_1( - type = "solid", - id = "my_menu_alt_1_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the menu_alt_1 icon" -) -} -\keyword{menu_alt_1} -\keyword{rheroicons} diff --git a/man/menu_alt_2.Rd b/man/menu_alt_2.Rd deleted file mode 100644 index 27f959a..0000000 --- a/man/menu_alt_2.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{menu_alt_2} -\alias{menu_alt_2} -\title{menu_alt_2} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a menu_alt_2 -} -\description{ -Render an svg icon of a menu_alt_2 -} -\examples{ -rheroicons::icons$menu_alt_2( - type = "solid", - id = "my_menu_alt_2_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the menu_alt_2 icon" -) -} -\keyword{menu_alt_2} -\keyword{rheroicons} diff --git a/man/menu_alt_3.Rd b/man/menu_alt_3.Rd deleted file mode 100644 index 1c0a398..0000000 --- a/man/menu_alt_3.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{menu_alt_3} -\alias{menu_alt_3} -\title{menu_alt_3} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a menu_alt_3 -} -\description{ -Render an svg icon of a menu_alt_3 -} -\examples{ -rheroicons::icons$menu_alt_3( - type = "solid", - id = "my_menu_alt_3_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the menu_alt_3 icon" -) -} -\keyword{menu_alt_3} -\keyword{rheroicons} diff --git a/man/menu_alt_4.Rd b/man/menu_alt_4.Rd deleted file mode 100644 index 785feab..0000000 --- a/man/menu_alt_4.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{menu_alt_4} -\alias{menu_alt_4} -\title{menu_alt_4} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a menu_alt_4 -} -\description{ -Render an svg icon of a menu_alt_4 -} -\examples{ -rheroicons::icons$menu_alt_4( - type = "solid", - id = "my_menu_alt_4_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the menu_alt_4 icon" -) -} -\keyword{menu_alt_4} -\keyword{rheroicons} diff --git a/man/microphone.Rd b/man/microphone.Rd deleted file mode 100644 index fd984fe..0000000 --- a/man/microphone.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{microphone} -\alias{microphone} -\title{microphone} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a microphone -} -\description{ -Render an svg icon of a microphone -} -\examples{ -rheroicons::icons$microphone( - type = "solid", - id = "my_microphone_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the microphone icon" -) -} -\keyword{microphone} -\keyword{rheroicons} diff --git a/man/minus.Rd b/man/minus.Rd deleted file mode 100644 index b9f7320..0000000 --- a/man/minus.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{minus} -\alias{minus} -\title{minus} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a minus -} -\description{ -Render an svg icon of a minus -} -\examples{ -rheroicons::icons$minus( - type = "solid", - id = "my_minus_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the minus icon" -) -} -\keyword{minus} -\keyword{rheroicons} diff --git a/man/minus_circle.Rd b/man/minus_circle.Rd deleted file mode 100644 index 9a17816..0000000 --- a/man/minus_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{minus_circle} -\alias{minus_circle} -\title{minus_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a minus_circle -} -\description{ -Render an svg icon of a minus_circle -} -\examples{ -rheroicons::icons$minus_circle( - type = "solid", - id = "my_minus_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the minus_circle icon" -) -} -\keyword{minus_circle} -\keyword{rheroicons} diff --git a/man/minus_sm.Rd b/man/minus_sm.Rd deleted file mode 100644 index 3057c24..0000000 --- a/man/minus_sm.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{minus_sm} -\alias{minus_sm} -\title{minus_sm} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a minus_sm -} -\description{ -Render an svg icon of a minus_sm -} -\examples{ -rheroicons::icons$minus_sm( - type = "solid", - id = "my_minus_sm_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the minus_sm icon" -) -} -\keyword{minus_sm} -\keyword{rheroicons} diff --git a/man/moon.Rd b/man/moon.Rd deleted file mode 100644 index 6c2a4bc..0000000 --- a/man/moon.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{moon} -\alias{moon} -\title{moon} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a moon -} -\description{ -Render an svg icon of a moon -} -\examples{ -rheroicons::icons$moon( - type = "solid", - id = "my_moon_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the moon icon" -) -} -\keyword{moon} -\keyword{rheroicons} diff --git a/man/music_note.Rd b/man/music_note.Rd deleted file mode 100644 index e01702f..0000000 --- a/man/music_note.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{music_note} -\alias{music_note} -\title{music_note} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a music_note -} -\description{ -Render an svg icon of a music_note -} -\examples{ -rheroicons::icons$music_note( - type = "solid", - id = "my_music_note_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the music_note icon" -) -} -\keyword{music_note} -\keyword{rheroicons} diff --git a/man/newspaper.Rd b/man/newspaper.Rd deleted file mode 100644 index bac3521..0000000 --- a/man/newspaper.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{newspaper} -\alias{newspaper} -\title{newspaper} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a newspaper -} -\description{ -Render an svg icon of a newspaper -} -\examples{ -rheroicons::icons$newspaper( - type = "solid", - id = "my_newspaper_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the newspaper icon" -) -} -\keyword{newspaper} -\keyword{rheroicons} diff --git a/man/office_building.Rd b/man/office_building.Rd deleted file mode 100644 index b6fa6cf..0000000 --- a/man/office_building.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{office_building} -\alias{office_building} -\title{office_building} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a office_building -} -\description{ -Render an svg icon of a office_building -} -\examples{ -rheroicons::icons$office_building( - type = "solid", - id = "my_office_building_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the office_building icon" -) -} -\keyword{office_building} -\keyword{rheroicons} diff --git a/man/paper_airplane.Rd b/man/paper_airplane.Rd deleted file mode 100644 index 7c2e38a..0000000 --- a/man/paper_airplane.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{paper_airplane} -\alias{paper_airplane} -\title{paper_airplane} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a paper_airplane -} -\description{ -Render an svg icon of a paper_airplane -} -\examples{ -rheroicons::icons$paper_airplane( - type = "solid", - id = "my_paper_airplane_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the paper_airplane icon" -) -} -\keyword{paper_airplane} -\keyword{rheroicons} diff --git a/man/paper_clip.Rd b/man/paper_clip.Rd deleted file mode 100644 index f680f11..0000000 --- a/man/paper_clip.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{paper_clip} -\alias{paper_clip} -\title{paper_clip} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a paper_clip -} -\description{ -Render an svg icon of a paper_clip -} -\examples{ -rheroicons::icons$paper_clip( - type = "solid", - id = "my_paper_clip_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the paper_clip icon" -) -} -\keyword{paper_clip} -\keyword{rheroicons} diff --git a/man/pause.Rd b/man/pause.Rd deleted file mode 100644 index 2dabd7d..0000000 --- a/man/pause.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{pause} -\alias{pause} -\title{pause} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a pause -} -\description{ -Render an svg icon of a pause -} -\examples{ -rheroicons::icons$pause( - type = "solid", - id = "my_pause_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the pause icon" -) -} -\keyword{pause} -\keyword{rheroicons} diff --git a/man/pencil.Rd b/man/pencil.Rd deleted file mode 100644 index 4563e0c..0000000 --- a/man/pencil.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{pencil} -\alias{pencil} -\title{pencil} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a pencil -} -\description{ -Render an svg icon of a pencil -} -\examples{ -rheroicons::icons$pencil( - type = "solid", - id = "my_pencil_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the pencil icon" -) -} -\keyword{pencil} -\keyword{rheroicons} diff --git a/man/pencil_alt.Rd b/man/pencil_alt.Rd deleted file mode 100644 index 6b5b20c..0000000 --- a/man/pencil_alt.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{pencil_alt} -\alias{pencil_alt} -\title{pencil_alt} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a pencil_alt -} -\description{ -Render an svg icon of a pencil_alt -} -\examples{ -rheroicons::icons$pencil_alt( - type = "solid", - id = "my_pencil_alt_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the pencil_alt icon" -) -} -\keyword{pencil_alt} -\keyword{rheroicons} diff --git a/man/phone.Rd b/man/phone.Rd deleted file mode 100644 index 7014e93..0000000 --- a/man/phone.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{phone} -\alias{phone} -\title{phone} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a phone -} -\description{ -Render an svg icon of a phone -} -\examples{ -rheroicons::icons$phone( - type = "solid", - id = "my_phone_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the phone icon" -) -} -\keyword{phone} -\keyword{rheroicons} diff --git a/man/phone_incoming.Rd b/man/phone_incoming.Rd deleted file mode 100644 index bc405c4..0000000 --- a/man/phone_incoming.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{phone_incoming} -\alias{phone_incoming} -\title{phone_incoming} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a phone_incoming -} -\description{ -Render an svg icon of a phone_incoming -} -\examples{ -rheroicons::icons$phone_incoming( - type = "solid", - id = "my_phone_incoming_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the phone_incoming icon" -) -} -\keyword{phone_incoming} -\keyword{rheroicons} diff --git a/man/phone_missed_call.Rd b/man/phone_missed_call.Rd deleted file mode 100644 index 44ee48e..0000000 --- a/man/phone_missed_call.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{phone_missed_call} -\alias{phone_missed_call} -\title{phone_missed_call} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a phone_missed_call -} -\description{ -Render an svg icon of a phone_missed_call -} -\examples{ -rheroicons::icons$phone_missed_call( - type = "solid", - id = "my_phone_missed_call_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the phone_missed_call icon" -) -} -\keyword{phone_missed_call} -\keyword{rheroicons} diff --git a/man/phone_outgoing.Rd b/man/phone_outgoing.Rd deleted file mode 100644 index b6560b7..0000000 --- a/man/phone_outgoing.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{phone_outgoing} -\alias{phone_outgoing} -\title{phone_outgoing} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a phone_outgoing -} -\description{ -Render an svg icon of a phone_outgoing -} -\examples{ -rheroicons::icons$phone_outgoing( - type = "solid", - id = "my_phone_outgoing_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the phone_outgoing icon" -) -} -\keyword{phone_outgoing} -\keyword{rheroicons} diff --git a/man/photograph.Rd b/man/photograph.Rd deleted file mode 100644 index abcb8cc..0000000 --- a/man/photograph.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{photograph} -\alias{photograph} -\title{photograph} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a photograph -} -\description{ -Render an svg icon of a photograph -} -\examples{ -rheroicons::icons$photograph( - type = "solid", - id = "my_photograph_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the photograph icon" -) -} -\keyword{photograph} -\keyword{rheroicons} diff --git a/man/play.Rd b/man/play.Rd deleted file mode 100644 index c89a126..0000000 --- a/man/play.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{play} -\alias{play} -\title{play} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a play -} -\description{ -Render an svg icon of a play -} -\examples{ -rheroicons::icons$play( - type = "solid", - id = "my_play_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the play icon" -) -} -\keyword{play} -\keyword{rheroicons} diff --git a/man/plus.Rd b/man/plus.Rd deleted file mode 100644 index cef11ae..0000000 --- a/man/plus.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{plus} -\alias{plus} -\title{plus} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a plus -} -\description{ -Render an svg icon of a plus -} -\examples{ -rheroicons::icons$plus( - type = "solid", - id = "my_plus_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the plus icon" -) -} -\keyword{plus} -\keyword{rheroicons} diff --git a/man/plus_circle.Rd b/man/plus_circle.Rd deleted file mode 100644 index 5a781a6..0000000 --- a/man/plus_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{plus_circle} -\alias{plus_circle} -\title{plus_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a plus_circle -} -\description{ -Render an svg icon of a plus_circle -} -\examples{ -rheroicons::icons$plus_circle( - type = "solid", - id = "my_plus_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the plus_circle icon" -) -} -\keyword{plus_circle} -\keyword{rheroicons} diff --git a/man/plus_sm.Rd b/man/plus_sm.Rd deleted file mode 100644 index 77ae06e..0000000 --- a/man/plus_sm.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{plus_sm} -\alias{plus_sm} -\title{plus_sm} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a plus_sm -} -\description{ -Render an svg icon of a plus_sm -} -\examples{ -rheroicons::icons$plus_sm( - type = "solid", - id = "my_plus_sm_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the plus_sm icon" -) -} -\keyword{plus_sm} -\keyword{rheroicons} diff --git a/man/presentation_chart_bar.Rd b/man/presentation_chart_bar.Rd deleted file mode 100644 index 0c4fbe9..0000000 --- a/man/presentation_chart_bar.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{presentation_chart_bar} -\alias{presentation_chart_bar} -\title{presentation_chart_bar} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a presentation_chart_bar -} -\description{ -Render an svg icon of a presentation_chart_bar -} -\examples{ -rheroicons::icons$presentation_chart_bar( - type = "solid", - id = "my_presentation_chart_bar_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the presentation_chart_bar icon" -) -} -\keyword{presentation_chart_bar} -\keyword{rheroicons} diff --git a/man/presentation_chart_line.Rd b/man/presentation_chart_line.Rd deleted file mode 100644 index aec5487..0000000 --- a/man/presentation_chart_line.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{presentation_chart_line} -\alias{presentation_chart_line} -\title{presentation_chart_line} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a presentation_chart_line -} -\description{ -Render an svg icon of a presentation_chart_line -} -\examples{ -rheroicons::icons$presentation_chart_line( - type = "solid", - id = "my_presentation_chart_line_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the presentation_chart_line icon" -) -} -\keyword{presentation_chart_line} -\keyword{rheroicons} diff --git a/man/printer.Rd b/man/printer.Rd deleted file mode 100644 index 647f207..0000000 --- a/man/printer.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{printer} -\alias{printer} -\title{printer} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a printer -} -\description{ -Render an svg icon of a printer -} -\examples{ -rheroicons::icons$printer( - type = "solid", - id = "my_printer_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the printer icon" -) -} -\keyword{printer} -\keyword{rheroicons} diff --git a/man/puzzle.Rd b/man/puzzle.Rd deleted file mode 100644 index 5a08e02..0000000 --- a/man/puzzle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{puzzle} -\alias{puzzle} -\title{puzzle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a puzzle -} -\description{ -Render an svg icon of a puzzle -} -\examples{ -rheroicons::icons$puzzle( - type = "solid", - id = "my_puzzle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the puzzle icon" -) -} -\keyword{puzzle} -\keyword{rheroicons} diff --git a/man/qrcode.Rd b/man/qrcode.Rd deleted file mode 100644 index a9d9e5b..0000000 --- a/man/qrcode.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{qrcode} -\alias{qrcode} -\title{qrcode} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a qrcode -} -\description{ -Render an svg icon of a qrcode -} -\examples{ -rheroicons::icons$qrcode( - type = "solid", - id = "my_qrcode_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the qrcode icon" -) -} -\keyword{qrcode} -\keyword{rheroicons} diff --git a/man/question_mark_circle.Rd b/man/question_mark_circle.Rd deleted file mode 100644 index f81e2a3..0000000 --- a/man/question_mark_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{question_mark_circle} -\alias{question_mark_circle} -\title{question_mark_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a question_mark_circle -} -\description{ -Render an svg icon of a question_mark_circle -} -\examples{ -rheroicons::icons$question_mark_circle( - type = "solid", - id = "my_question_mark_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the question_mark_circle icon" -) -} -\keyword{question_mark_circle} -\keyword{rheroicons} diff --git a/man/receipt_refund.Rd b/man/receipt_refund.Rd deleted file mode 100644 index 9650b42..0000000 --- a/man/receipt_refund.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{receipt_refund} -\alias{receipt_refund} -\title{receipt_refund} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a receipt_refund -} -\description{ -Render an svg icon of a receipt_refund -} -\examples{ -rheroicons::icons$receipt_refund( - type = "solid", - id = "my_receipt_refund_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the receipt_refund icon" -) -} -\keyword{receipt_refund} -\keyword{rheroicons} diff --git a/man/receipt_tax.Rd b/man/receipt_tax.Rd deleted file mode 100644 index 4764536..0000000 --- a/man/receipt_tax.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{receipt_tax} -\alias{receipt_tax} -\title{receipt_tax} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a receipt_tax -} -\description{ -Render an svg icon of a receipt_tax -} -\examples{ -rheroicons::icons$receipt_tax( - type = "solid", - id = "my_receipt_tax_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the receipt_tax icon" -) -} -\keyword{receipt_tax} -\keyword{rheroicons} diff --git a/man/refresh.Rd b/man/refresh.Rd deleted file mode 100644 index f62f5bd..0000000 --- a/man/refresh.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{refresh} -\alias{refresh} -\title{refresh} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a refresh -} -\description{ -Render an svg icon of a refresh -} -\examples{ -rheroicons::icons$refresh( - type = "solid", - id = "my_refresh_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the refresh icon" -) -} -\keyword{refresh} -\keyword{rheroicons} diff --git a/man/reply.Rd b/man/reply.Rd deleted file mode 100644 index 834d413..0000000 --- a/man/reply.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{reply} -\alias{reply} -\title{reply} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a reply -} -\description{ -Render an svg icon of a reply -} -\examples{ -rheroicons::icons$reply( - type = "solid", - id = "my_reply_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the reply icon" -) -} -\keyword{reply} -\keyword{rheroicons} diff --git a/man/rewind.Rd b/man/rewind.Rd deleted file mode 100644 index 10301e8..0000000 --- a/man/rewind.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{rewind} -\alias{rewind} -\title{rewind} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a rewind -} -\description{ -Render an svg icon of a rewind -} -\examples{ -rheroicons::icons$rewind( - type = "solid", - id = "my_rewind_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the rewind icon" -) -} -\keyword{rewind} -\keyword{rheroicons} diff --git a/man/rheroicon.Rd b/man/rheroicon.Rd new file mode 100644 index 0000000..3c77e96 --- /dev/null +++ b/man/rheroicon.Rd @@ -0,0 +1,34 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/rheroicon.R +\name{rheroicon} +\alias{rheroicon} +\title{rheroicon} +\usage{ +rheroicon(name, type = "outline", classnames = NULL) +} +\arguments{ +\item{name}{an icon name} + +\item{type}{choose icon style "solid" or "outline" (default: "outline")} + +\item{classnames}{a string containing one or more CSS classes} +} +\description{ +Render an rheroicon icon by name. Use \code{launch_gallery} to view the icons +available in this package or visit the gallery on shinyapps.io (see link +below). All icons are rendered with three CSS classes: global ("rheroicons"), +icon style ("rheroicons_outline" or "rheroicons_solid"), and icon name ( +"rheroicons_academic_cap"). Use any of these classes to customize the style +of the icon or define your own classes using the argument \code{class}. +} +\examples{ +rheroicon(name = "academic_cap") +rheroicon(name = "academic_cap", type = "solid") +rheroicon(name = "academic_cap", classnames = "education-icons") + + +} +\references{ +\url{https://github.com/tailwindlabs/heroicons} +\url{https://davidruvolo.shinyapps.io/rheroicons-demo/} +} diff --git a/man/rss.Rd b/man/rss.Rd deleted file mode 100644 index 198f394..0000000 --- a/man/rss.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{rss} -\alias{rss} -\title{rss} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a rss -} -\description{ -Render an svg icon of a rss -} -\examples{ -rheroicons::icons$rss( - type = "solid", - id = "my_rss_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the rss icon" -) -} -\keyword{rheroicons} -\keyword{rss} diff --git a/man/save.Rd b/man/save.Rd deleted file mode 100644 index a67b7b3..0000000 --- a/man/save.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{save} -\alias{save} -\title{save} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a save -} -\description{ -Render an svg icon of a save -} -\examples{ -rheroicons::icons$save( - type = "solid", - id = "my_save_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the save icon" -) -} -\keyword{rheroicons} -\keyword{save} diff --git a/man/save_as.Rd b/man/save_as.Rd deleted file mode 100644 index 3851c7d..0000000 --- a/man/save_as.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{save_as} -\alias{save_as} -\title{save_as} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a save_as -} -\description{ -Render an svg icon of a save_as -} -\examples{ -rheroicons::icons$save_as( - type = "solid", - id = "my_save_as_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the save_as icon" -) -} -\keyword{rheroicons} -\keyword{save_as} diff --git a/man/scale.Rd b/man/scale.Rd deleted file mode 100644 index b42ca7d..0000000 --- a/man/scale.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{scale} -\alias{scale} -\title{scale} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a scale -} -\description{ -Render an svg icon of a scale -} -\examples{ -rheroicons::icons$scale( - type = "solid", - id = "my_scale_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the scale icon" -) -} -\keyword{rheroicons} -\keyword{scale} diff --git a/man/scissors.Rd b/man/scissors.Rd deleted file mode 100644 index b4c54fe..0000000 --- a/man/scissors.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{scissors} -\alias{scissors} -\title{scissors} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a scissors -} -\description{ -Render an svg icon of a scissors -} -\examples{ -rheroicons::icons$scissors( - type = "solid", - id = "my_scissors_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the scissors icon" -) -} -\keyword{rheroicons} -\keyword{scissors} diff --git a/man/search.Rd b/man/search.Rd deleted file mode 100644 index 5f473c0..0000000 --- a/man/search.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{search} -\alias{search} -\title{search} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a search -} -\description{ -Render an svg icon of a search -} -\examples{ -rheroicons::icons$search( - type = "solid", - id = "my_search_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the search icon" -) -} -\keyword{rheroicons} -\keyword{search} diff --git a/man/search_circle.Rd b/man/search_circle.Rd deleted file mode 100644 index 960338d..0000000 --- a/man/search_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{search_circle} -\alias{search_circle} -\title{search_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a search_circle -} -\description{ -Render an svg icon of a search_circle -} -\examples{ -rheroicons::icons$search_circle( - type = "solid", - id = "my_search_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the search_circle icon" -) -} -\keyword{rheroicons} -\keyword{search_circle} diff --git a/man/selector.Rd b/man/selector.Rd deleted file mode 100644 index 25837c4..0000000 --- a/man/selector.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{selector} -\alias{selector} -\title{selector} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a selector -} -\description{ -Render an svg icon of a selector -} -\examples{ -rheroicons::icons$selector( - type = "solid", - id = "my_selector_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the selector icon" -) -} -\keyword{rheroicons} -\keyword{selector} diff --git a/man/server.Rd b/man/server.Rd deleted file mode 100644 index 52ed80a..0000000 --- a/man/server.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{server} -\alias{server} -\title{server} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a server -} -\description{ -Render an svg icon of a server -} -\examples{ -rheroicons::icons$server( - type = "solid", - id = "my_server_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the server icon" -) -} -\keyword{rheroicons} -\keyword{server} diff --git a/man/share.Rd b/man/share.Rd deleted file mode 100644 index ea82ca4..0000000 --- a/man/share.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{share} -\alias{share} -\title{share} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a share -} -\description{ -Render an svg icon of a share -} -\examples{ -rheroicons::icons$share( - type = "solid", - id = "my_share_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the share icon" -) -} -\keyword{rheroicons} -\keyword{share} diff --git a/man/shield_check.Rd b/man/shield_check.Rd deleted file mode 100644 index 43537a6..0000000 --- a/man/shield_check.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{shield_check} -\alias{shield_check} -\title{shield_check} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a shield_check -} -\description{ -Render an svg icon of a shield_check -} -\examples{ -rheroicons::icons$shield_check( - type = "solid", - id = "my_shield_check_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the shield_check icon" -) -} -\keyword{rheroicons} -\keyword{shield_check} diff --git a/man/shield_exclamation.Rd b/man/shield_exclamation.Rd deleted file mode 100644 index bef159f..0000000 --- a/man/shield_exclamation.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{shield_exclamation} -\alias{shield_exclamation} -\title{shield_exclamation} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a shield_exclamation -} -\description{ -Render an svg icon of a shield_exclamation -} -\examples{ -rheroicons::icons$shield_exclamation( - type = "solid", - id = "my_shield_exclamation_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the shield_exclamation icon" -) -} -\keyword{rheroicons} -\keyword{shield_exclamation} diff --git a/man/shopping_bag.Rd b/man/shopping_bag.Rd deleted file mode 100644 index 45d5b2b..0000000 --- a/man/shopping_bag.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{shopping_bag} -\alias{shopping_bag} -\title{shopping_bag} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a shopping_bag -} -\description{ -Render an svg icon of a shopping_bag -} -\examples{ -rheroicons::icons$shopping_bag( - type = "solid", - id = "my_shopping_bag_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the shopping_bag icon" -) -} -\keyword{rheroicons} -\keyword{shopping_bag} diff --git a/man/shopping_cart.Rd b/man/shopping_cart.Rd deleted file mode 100644 index 65b1689..0000000 --- a/man/shopping_cart.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{shopping_cart} -\alias{shopping_cart} -\title{shopping_cart} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a shopping_cart -} -\description{ -Render an svg icon of a shopping_cart -} -\examples{ -rheroicons::icons$shopping_cart( - type = "solid", - id = "my_shopping_cart_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the shopping_cart icon" -) -} -\keyword{rheroicons} -\keyword{shopping_cart} diff --git a/man/sort_ascending.Rd b/man/sort_ascending.Rd deleted file mode 100644 index 29730ae..0000000 --- a/man/sort_ascending.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{sort_ascending} -\alias{sort_ascending} -\title{sort_ascending} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a sort_ascending -} -\description{ -Render an svg icon of a sort_ascending -} -\examples{ -rheroicons::icons$sort_ascending( - type = "solid", - id = "my_sort_ascending_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the sort_ascending icon" -) -} -\keyword{rheroicons} -\keyword{sort_ascending} diff --git a/man/sort_descending.Rd b/man/sort_descending.Rd deleted file mode 100644 index cd9ec55..0000000 --- a/man/sort_descending.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{sort_descending} -\alias{sort_descending} -\title{sort_descending} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a sort_descending -} -\description{ -Render an svg icon of a sort_descending -} -\examples{ -rheroicons::icons$sort_descending( - type = "solid", - id = "my_sort_descending_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the sort_descending icon" -) -} -\keyword{rheroicons} -\keyword{sort_descending} diff --git a/man/sparkles.Rd b/man/sparkles.Rd deleted file mode 100644 index e764d3d..0000000 --- a/man/sparkles.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{sparkles} -\alias{sparkles} -\title{sparkles} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a sparkles -} -\description{ -Render an svg icon of a sparkles -} -\examples{ -rheroicons::icons$sparkles( - type = "solid", - id = "my_sparkles_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the sparkles icon" -) -} -\keyword{rheroicons} -\keyword{sparkles} diff --git a/man/speakerphone.Rd b/man/speakerphone.Rd deleted file mode 100644 index 57ff24b..0000000 --- a/man/speakerphone.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{speakerphone} -\alias{speakerphone} -\title{speakerphone} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a speakerphone -} -\description{ -Render an svg icon of a speakerphone -} -\examples{ -rheroicons::icons$speakerphone( - type = "solid", - id = "my_speakerphone_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the speakerphone icon" -) -} -\keyword{rheroicons} -\keyword{speakerphone} diff --git a/man/star.Rd b/man/star.Rd deleted file mode 100644 index dc64bf6..0000000 --- a/man/star.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{star} -\alias{star} -\title{star} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a star -} -\description{ -Render an svg icon of a star -} -\examples{ -rheroicons::icons$star( - type = "solid", - id = "my_star_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the star icon" -) -} -\keyword{rheroicons} -\keyword{star} diff --git a/man/status_offline.Rd b/man/status_offline.Rd deleted file mode 100644 index 250e2bd..0000000 --- a/man/status_offline.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{status_offline} -\alias{status_offline} -\title{status_offline} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a status_offline -} -\description{ -Render an svg icon of a status_offline -} -\examples{ -rheroicons::icons$status_offline( - type = "solid", - id = "my_status_offline_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the status_offline icon" -) -} -\keyword{rheroicons} -\keyword{status_offline} diff --git a/man/status_online.Rd b/man/status_online.Rd deleted file mode 100644 index 8fd98e4..0000000 --- a/man/status_online.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{status_online} -\alias{status_online} -\title{status_online} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a status_online -} -\description{ -Render an svg icon of a status_online -} -\examples{ -rheroicons::icons$status_online( - type = "solid", - id = "my_status_online_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the status_online icon" -) -} -\keyword{rheroicons} -\keyword{status_online} diff --git a/man/stop.Rd b/man/stop.Rd deleted file mode 100644 index 4c24873..0000000 --- a/man/stop.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{stop} -\alias{stop} -\title{stop} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a stop -} -\description{ -Render an svg icon of a stop -} -\examples{ -rheroicons::icons$stop( - type = "solid", - id = "my_stop_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the stop icon" -) -} -\keyword{rheroicons} -\keyword{stop} diff --git a/man/sun.Rd b/man/sun.Rd deleted file mode 100644 index f05cd2c..0000000 --- a/man/sun.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{sun} -\alias{sun} -\title{sun} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a sun -} -\description{ -Render an svg icon of a sun -} -\examples{ -rheroicons::icons$sun( - type = "solid", - id = "my_sun_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the sun icon" -) -} -\keyword{rheroicons} -\keyword{sun} diff --git a/man/support.Rd b/man/support.Rd deleted file mode 100644 index e93ef3c..0000000 --- a/man/support.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{support} -\alias{support} -\title{support} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a support -} -\description{ -Render an svg icon of a support -} -\examples{ -rheroicons::icons$support( - type = "solid", - id = "my_support_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the support icon" -) -} -\keyword{rheroicons} -\keyword{support} diff --git a/man/switch_horizontal.Rd b/man/switch_horizontal.Rd deleted file mode 100644 index 59eb6b1..0000000 --- a/man/switch_horizontal.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{switch_horizontal} -\alias{switch_horizontal} -\title{switch_horizontal} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a switch_horizontal -} -\description{ -Render an svg icon of a switch_horizontal -} -\examples{ -rheroicons::icons$switch_horizontal( - type = "solid", - id = "my_switch_horizontal_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the switch_horizontal icon" -) -} -\keyword{rheroicons} -\keyword{switch_horizontal} diff --git a/man/switch_vertical.Rd b/man/switch_vertical.Rd deleted file mode 100644 index 4645a5c..0000000 --- a/man/switch_vertical.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{switch_vertical} -\alias{switch_vertical} -\title{switch_vertical} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a switch_vertical -} -\description{ -Render an svg icon of a switch_vertical -} -\examples{ -rheroicons::icons$switch_vertical( - type = "solid", - id = "my_switch_vertical_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the switch_vertical icon" -) -} -\keyword{rheroicons} -\keyword{switch_vertical} diff --git a/man/table.Rd b/man/table.Rd deleted file mode 100644 index c51d41a..0000000 --- a/man/table.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{table} -\alias{table} -\title{table} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a table -} -\description{ -Render an svg icon of a table -} -\examples{ -rheroicons::icons$table( - type = "solid", - id = "my_table_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the table icon" -) -} -\keyword{rheroicons} -\keyword{table} diff --git a/man/tag.Rd b/man/tag.Rd deleted file mode 100644 index ef8b705..0000000 --- a/man/tag.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{tag} -\alias{tag} -\title{tag} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a tag -} -\description{ -Render an svg icon of a tag -} -\examples{ -rheroicons::icons$tag( - type = "solid", - id = "my_tag_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the tag icon" -) -} -\keyword{rheroicons} -\keyword{tag} diff --git a/man/template.Rd b/man/template.Rd deleted file mode 100644 index 5dee5d5..0000000 --- a/man/template.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{template} -\alias{template} -\title{template} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a template -} -\description{ -Render an svg icon of a template -} -\examples{ -rheroicons::icons$template( - type = "solid", - id = "my_template_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the template icon" -) -} -\keyword{rheroicons} -\keyword{template} diff --git a/man/terminal.Rd b/man/terminal.Rd deleted file mode 100644 index 681117d..0000000 --- a/man/terminal.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{terminal} -\alias{terminal} -\title{terminal} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a terminal -} -\description{ -Render an svg icon of a terminal -} -\examples{ -rheroicons::icons$terminal( - type = "solid", - id = "my_terminal_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the terminal icon" -) -} -\keyword{rheroicons} -\keyword{terminal} diff --git a/man/thumb_down.Rd b/man/thumb_down.Rd deleted file mode 100644 index 83904b9..0000000 --- a/man/thumb_down.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{thumb_down} -\alias{thumb_down} -\title{thumb_down} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a thumb_down -} -\description{ -Render an svg icon of a thumb_down -} -\examples{ -rheroicons::icons$thumb_down( - type = "solid", - id = "my_thumb_down_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the thumb_down icon" -) -} -\keyword{rheroicons} -\keyword{thumb_down} diff --git a/man/thumb_up.Rd b/man/thumb_up.Rd deleted file mode 100644 index e5d0655..0000000 --- a/man/thumb_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{thumb_up} -\alias{thumb_up} -\title{thumb_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a thumb_up -} -\description{ -Render an svg icon of a thumb_up -} -\examples{ -rheroicons::icons$thumb_up( - type = "solid", - id = "my_thumb_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the thumb_up icon" -) -} -\keyword{rheroicons} -\keyword{thumb_up} diff --git a/man/ticket.Rd b/man/ticket.Rd deleted file mode 100644 index 7e47482..0000000 --- a/man/ticket.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{ticket} -\alias{ticket} -\title{ticket} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a ticket -} -\description{ -Render an svg icon of a ticket -} -\examples{ -rheroicons::icons$ticket( - type = "solid", - id = "my_ticket_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the ticket icon" -) -} -\keyword{rheroicons} -\keyword{ticket} diff --git a/man/translate.Rd b/man/translate.Rd deleted file mode 100644 index 25ed089..0000000 --- a/man/translate.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{translate} -\alias{translate} -\title{translate} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a translate -} -\description{ -Render an svg icon of a translate -} -\examples{ -rheroicons::icons$translate( - type = "solid", - id = "my_translate_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the translate icon" -) -} -\keyword{rheroicons} -\keyword{translate} diff --git a/man/trash.Rd b/man/trash.Rd deleted file mode 100644 index 27a32c5..0000000 --- a/man/trash.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{trash} -\alias{trash} -\title{trash} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a trash -} -\description{ -Render an svg icon of a trash -} -\examples{ -rheroicons::icons$trash( - type = "solid", - id = "my_trash_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the trash icon" -) -} -\keyword{rheroicons} -\keyword{trash} diff --git a/man/trending_down.Rd b/man/trending_down.Rd deleted file mode 100644 index f83e9f1..0000000 --- a/man/trending_down.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{trending_down} -\alias{trending_down} -\title{trending_down} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a trending_down -} -\description{ -Render an svg icon of a trending_down -} -\examples{ -rheroicons::icons$trending_down( - type = "solid", - id = "my_trending_down_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the trending_down icon" -) -} -\keyword{rheroicons} -\keyword{trending_down} diff --git a/man/trending_up.Rd b/man/trending_up.Rd deleted file mode 100644 index a10ad02..0000000 --- a/man/trending_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{trending_up} -\alias{trending_up} -\title{trending_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a trending_up -} -\description{ -Render an svg icon of a trending_up -} -\examples{ -rheroicons::icons$trending_up( - type = "solid", - id = "my_trending_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the trending_up icon" -) -} -\keyword{rheroicons} -\keyword{trending_up} diff --git a/man/truck.Rd b/man/truck.Rd deleted file mode 100644 index 7429e4f..0000000 --- a/man/truck.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{truck} -\alias{truck} -\title{truck} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a truck -} -\description{ -Render an svg icon of a truck -} -\examples{ -rheroicons::icons$truck( - type = "solid", - id = "my_truck_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the truck icon" -) -} -\keyword{rheroicons} -\keyword{truck} diff --git a/man/upload.Rd b/man/upload.Rd deleted file mode 100644 index ac45853..0000000 --- a/man/upload.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{upload} -\alias{upload} -\title{upload} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a upload -} -\description{ -Render an svg icon of a upload -} -\examples{ -rheroicons::icons$upload( - type = "solid", - id = "my_upload_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the upload icon" -) -} -\keyword{rheroicons} -\keyword{upload} diff --git a/man/user.Rd b/man/user.Rd deleted file mode 100644 index 398ff51..0000000 --- a/man/user.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{user} -\alias{user} -\title{user} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a user -} -\description{ -Render an svg icon of a user -} -\examples{ -rheroicons::icons$user( - type = "solid", - id = "my_user_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the user icon" -) -} -\keyword{rheroicons} -\keyword{user} diff --git a/man/user_add.Rd b/man/user_add.Rd deleted file mode 100644 index 17ec7ee..0000000 --- a/man/user_add.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{user_add} -\alias{user_add} -\title{user_add} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a user_add -} -\description{ -Render an svg icon of a user_add -} -\examples{ -rheroicons::icons$user_add( - type = "solid", - id = "my_user_add_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the user_add icon" -) -} -\keyword{rheroicons} -\keyword{user_add} diff --git a/man/user_circle.Rd b/man/user_circle.Rd deleted file mode 100644 index b841a6b..0000000 --- a/man/user_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{user_circle} -\alias{user_circle} -\title{user_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a user_circle -} -\description{ -Render an svg icon of a user_circle -} -\examples{ -rheroicons::icons$user_circle( - type = "solid", - id = "my_user_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the user_circle icon" -) -} -\keyword{rheroicons} -\keyword{user_circle} diff --git a/man/user_group.Rd b/man/user_group.Rd deleted file mode 100644 index e6e61e9..0000000 --- a/man/user_group.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{user_group} -\alias{user_group} -\title{user_group} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a user_group -} -\description{ -Render an svg icon of a user_group -} -\examples{ -rheroicons::icons$user_group( - type = "solid", - id = "my_user_group_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the user_group icon" -) -} -\keyword{rheroicons} -\keyword{user_group} diff --git a/man/user_remove.Rd b/man/user_remove.Rd deleted file mode 100644 index af70c00..0000000 --- a/man/user_remove.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{user_remove} -\alias{user_remove} -\title{user_remove} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a user_remove -} -\description{ -Render an svg icon of a user_remove -} -\examples{ -rheroicons::icons$user_remove( - type = "solid", - id = "my_user_remove_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the user_remove icon" -) -} -\keyword{rheroicons} -\keyword{user_remove} diff --git a/man/users.Rd b/man/users.Rd deleted file mode 100644 index 2373c2e..0000000 --- a/man/users.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{users} -\alias{users} -\title{users} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a users -} -\description{ -Render an svg icon of a users -} -\examples{ -rheroicons::icons$users( - type = "solid", - id = "my_users_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the users icon" -) -} -\keyword{rheroicons} -\keyword{users} diff --git a/man/variable.Rd b/man/variable.Rd deleted file mode 100644 index f828551..0000000 --- a/man/variable.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{variable} -\alias{variable} -\title{variable} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a variable -} -\description{ -Render an svg icon of a variable -} -\examples{ -rheroicons::icons$variable( - type = "solid", - id = "my_variable_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the variable icon" -) -} -\keyword{rheroicons} -\keyword{variable} diff --git a/man/video_camera.Rd b/man/video_camera.Rd deleted file mode 100644 index 2e12c27..0000000 --- a/man/video_camera.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{video_camera} -\alias{video_camera} -\title{video_camera} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a video_camera -} -\description{ -Render an svg icon of a video_camera -} -\examples{ -rheroicons::icons$video_camera( - type = "solid", - id = "my_video_camera_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the video_camera icon" -) -} -\keyword{rheroicons} -\keyword{video_camera} diff --git a/man/view_boards.Rd b/man/view_boards.Rd deleted file mode 100644 index 0c0962b..0000000 --- a/man/view_boards.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{view_boards} -\alias{view_boards} -\title{view_boards} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a view_boards -} -\description{ -Render an svg icon of a view_boards -} -\examples{ -rheroicons::icons$view_boards( - type = "solid", - id = "my_view_boards_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the view_boards icon" -) -} -\keyword{rheroicons} -\keyword{view_boards} diff --git a/man/view_grid.Rd b/man/view_grid.Rd deleted file mode 100644 index ea804f4..0000000 --- a/man/view_grid.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{view_grid} -\alias{view_grid} -\title{view_grid} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a view_grid -} -\description{ -Render an svg icon of a view_grid -} -\examples{ -rheroicons::icons$view_grid( - type = "solid", - id = "my_view_grid_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the view_grid icon" -) -} -\keyword{rheroicons} -\keyword{view_grid} diff --git a/man/view_grid_add.Rd b/man/view_grid_add.Rd deleted file mode 100644 index 7562884..0000000 --- a/man/view_grid_add.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{view_grid_add} -\alias{view_grid_add} -\title{view_grid_add} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a view_grid_add -} -\description{ -Render an svg icon of a view_grid_add -} -\examples{ -rheroicons::icons$view_grid_add( - type = "solid", - id = "my_view_grid_add_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the view_grid_add icon" -) -} -\keyword{rheroicons} -\keyword{view_grid_add} diff --git a/man/view_list.Rd b/man/view_list.Rd deleted file mode 100644 index 0d978a7..0000000 --- a/man/view_list.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{view_list} -\alias{view_list} -\title{view_list} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a view_list -} -\description{ -Render an svg icon of a view_list -} -\examples{ -rheroicons::icons$view_list( - type = "solid", - id = "my_view_list_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the view_list icon" -) -} -\keyword{rheroicons} -\keyword{view_list} diff --git a/man/volume_off.Rd b/man/volume_off.Rd deleted file mode 100644 index 4ba0f06..0000000 --- a/man/volume_off.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{volume_off} -\alias{volume_off} -\title{volume_off} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a volume_off -} -\description{ -Render an svg icon of a volume_off -} -\examples{ -rheroicons::icons$volume_off( - type = "solid", - id = "my_volume_off_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the volume_off icon" -) -} -\keyword{rheroicons} -\keyword{volume_off} diff --git a/man/volume_up.Rd b/man/volume_up.Rd deleted file mode 100644 index 4f3a4b8..0000000 --- a/man/volume_up.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{volume_up} -\alias{volume_up} -\title{volume_up} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a volume_up -} -\description{ -Render an svg icon of a volume_up -} -\examples{ -rheroicons::icons$volume_up( - type = "solid", - id = "my_volume_up_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the volume_up icon" -) -} -\keyword{rheroicons} -\keyword{volume_up} diff --git a/man/wifi.Rd b/man/wifi.Rd deleted file mode 100644 index 56fbc71..0000000 --- a/man/wifi.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{wifi} -\alias{wifi} -\title{wifi} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a wifi -} -\description{ -Render an svg icon of a wifi -} -\examples{ -rheroicons::icons$wifi( - type = "solid", - id = "my_wifi_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the wifi icon" -) -} -\keyword{rheroicons} -\keyword{wifi} diff --git a/man/x.Rd b/man/x.Rd deleted file mode 100644 index 9b61662..0000000 --- a/man/x.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{x} -\alias{x} -\title{x} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a x -} -\description{ -Render an svg icon of a x -} -\examples{ -rheroicons::icons$x( - type = "solid", - id = "my_x_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the x icon" -) -} -\keyword{rheroicons} -\keyword{x} diff --git a/man/x_circle.Rd b/man/x_circle.Rd deleted file mode 100644 index 8339238..0000000 --- a/man/x_circle.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{x_circle} -\alias{x_circle} -\title{x_circle} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a x_circle -} -\description{ -Render an svg icon of a x_circle -} -\examples{ -rheroicons::icons$x_circle( - type = "solid", - id = "my_x_circle_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the x_circle icon" -) -} -\keyword{rheroicons} -\keyword{x_circle} diff --git a/man/zoom_in.Rd b/man/zoom_in.Rd deleted file mode 100644 index a127240..0000000 --- a/man/zoom_in.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{zoom_in} -\alias{zoom_in} -\title{zoom_in} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a zoom_in -} -\description{ -Render an svg icon of a zoom_in -} -\examples{ -rheroicons::icons$zoom_in( - type = "solid", - id = "my_zoom_in_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the zoom_in icon" -) -} -\keyword{rheroicons} -\keyword{zoom_in} diff --git a/man/zoom_out.Rd b/man/zoom_out.Rd deleted file mode 100644 index c64ad4d..0000000 --- a/man/zoom_out.Rd +++ /dev/null @@ -1,33 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/icons.R -\name{zoom_out} -\alias{zoom_out} -\title{zoom_out} -\arguments{ -\item{type}{render an outline or solid icon (default outline)} - -\item{id}{a unique ID to be applied to the svg icon} - -\item{class}{a css class to be applied to the svg icon} - -\item{aria_hidden}{should the icon be hidden from screen readers (default: TRUE)} - -\item{title}{a string that describes the icon (optional)} -} -\value{ -Render an svg icon of a zoom_out -} -\description{ -Render an svg icon of a zoom_out -} -\examples{ -rheroicons::icons$zoom_out( - type = "solid", - id = "my_zoom_out_icon", - class = "my-icons", - aria_hidden = FALSE, - title = "a title for the zoom_out icon" -) -} -\keyword{rheroicons} -\keyword{zoom_out} From 2048f2fb595b36a419333dfd93fb171573284ece Mon Sep 17 00:00:00 2001 From: davidruvolo51 Date: Sun, 6 Sep 2020 18:46:41 +0200 Subject: [PATCH 2/5] restructured pkg to icon database --- R/icons.R | 12367 --------------------------- R/rheroicon.R | 65 + R/sysdata.rda | Bin 0 -> 23592 bytes R/utils.R | 38 + dev/_utils.R | 352 +- dev/{icons_convert.R => convert.R} | 45 +- dev/dev.R | 26 +- 7 files changed, 224 insertions(+), 12669 deletions(-) delete mode 100644 R/icons.R create mode 100644 R/rheroicon.R create mode 100644 R/sysdata.rda create mode 100644 R/utils.R rename dev/{icons_convert.R => convert.R} (57%) diff --git a/R/icons.R b/R/icons.R deleted file mode 100644 index 9ca252a..0000000 --- a/R/icons.R +++ /dev/null @@ -1,12367 +0,0 @@ -#' Heroicons for R -#' -#' @references -#' \url{https://github.com/refactoringui/heroicons} -#' \url{https://davidruvolo.shinyapps.io/rheroicons-demo/} -#' -#' @examples -#' rheroicons::icons$book_open() -#' rheroicons::icons$book_open(type = "outline") -#' rheroicons::icons$book_open(type = "solid") -#' rheroicons::icons$book_open(id = "myBookIcon") -#' rheroicons::icons$book_open(class = "my-icon-set") -#' rheroicons::icons$book_open(aria_hidden = FALSE) -#' rheroicons::icons$book_open(title = "read documentation") -#' -#' @keywords rheroicons -#' @export -icons <- list() - -#' academic_cap -#' @name academic_cap -#' @description Render an svg icon of a academic_cap -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$academic_cap( -#' type = "solid", -#' id = "my_academic_cap_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the academic_cap icon" -#' ) -#' @return Render an svg icon of a academic_cap -#' @keywords rheroicons academic_cap -icons$academic_cap <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_academic_cap", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(fill = "#fff", d = "M12 14l9-5-9-5-9 5 9 5z")), htmltools::tag(`_tag_name` = "path", - list(fill = "#fff", d = "M12 14l6.16-3.422a12.083 12.083 0 01.665 6.479A11.952 11.952 0 0012 20.055a11.952 11.952 0 00-6.824-2.998 12.078 12.078 0 01.665-6.479L12 14z")), - htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", `stroke-linejoin` = "round", - `stroke-width` = "2", d = "M12 14l9-5-9-5-9 5 9 5zm0 0l6.16-3.422a12.083 12.083 0 01.665 6.479A11.952 11.952 0 0012 20.055a11.952 11.952 0 00-6.824-2.998 12.078 12.078 0 01.665-6.479L12 14zm-4 6v-7.5l4-2.222")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_academic_cap", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10.394 2.08a1 1 0 00-.788 0l-7 3a1 1 0 000 1.84L5.25 8.051a.999.999 0 01.356-.257l4-1.714a1 1 0 11.788 1.838L7.667 9.088l1.94.831a1 1 0 00.787 0l7-3a1 1 0 000-1.838l-7-3zM3.31 9.397L5 10.12v4.102a8.969 8.969 0 00-1.05-.174 1 1 0 01-.89-.89 11.115 11.115 0 01.25-3.762zM9.3 16.573A9.026 9.026 0 007 14.935v-3.957l1.818.78a3 3 0 002.364 0l5.508-2.361a11.026 11.026 0 01.25 3.762 1 1 0 01-.89.89 8.968 8.968 0 00-5.35 2.524 1 1 0 01-1.4 0zM6 18a1 1 0 001-1v-2.065a8.935 8.935 0 00-2-.712V17a1 1 0 001 1z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' adjustments -#' @name adjustments -#' @description Render an svg icon of a adjustments -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$adjustments( -#' type = "solid", -#' id = "my_adjustments_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the adjustments icon" -#' ) -#' @return Render an svg icon of a adjustments -#' @keywords rheroicons adjustments -icons$adjustments <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_adjustments", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 6V4m0 2a2 2 0 100 4m0-4a2 2 0 110 4m-6 8a2 2 0 100-4m0 4a2 2 0 110-4m0 4v2m0-6V4m6 6v10m6-2a2 2 0 100-4m0 4a2 2 0 110-4m0 4v2m0-6V4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_adjustments", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5 4a1 1 0 00-2 0v7.268a2 2 0 000 3.464V16a1 1 0 102 0v-1.268a2 2 0 000-3.464V4zM11 4a1 1 0 10-2 0v1.268a2 2 0 000 3.464V16a1 1 0 102 0V8.732a2 2 0 000-3.464V4zM16 3a1 1 0 011 1v7.268a2 2 0 010 3.464V16a1 1 0 11-2 0v-1.268a2 2 0 010-3.464V4a1 1 0 011-1z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' annotation -#' @name annotation -#' @description Render an svg icon of a annotation -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$annotation( -#' type = "solid", -#' id = "my_annotation_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the annotation icon" -#' ) -#' @return Render an svg icon of a annotation -#' @keywords rheroicons annotation -icons$annotation <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_annotation", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 8h10M7 12h4m1 8l-4-4H5a2 2 0 01-2-2V6a2 2 0 012-2h14a2 2 0 012 2v8a2 2 0 01-2 2h-3l-4 4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_annotation", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 13V5a2 2 0 00-2-2H4a2 2 0 00-2 2v8a2 2 0 002 2h3l3 3 3-3h3a2 2 0 002-2zM5 7a1 1 0 011-1h8a1 1 0 110 2H6a1 1 0 01-1-1zm1 3a1 1 0 100 2h3a1 1 0 100-2H6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' archive -#' @name archive -#' @description Render an svg icon of a archive -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$archive( -#' type = "solid", -#' id = "my_archive_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the archive icon" -#' ) -#' @return Render an svg icon of a archive -#' @keywords rheroicons archive -icons$archive <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_archive", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 8h14M5 8a2 2 0 110-4h14a2 2 0 110 4M5 8v10a2 2 0 002 2h10a2 2 0 002-2V8m-9 4h4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_archive", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M4 3a2 2 0 100 4h12a2 2 0 100-4H4z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M3 8h14v7a2 2 0 01-2 2H5a2 2 0 01-2-2V8zm5 3a1 1 0 011-1h2a1 1 0 110 2H9a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_circle_down -#' @name arrow_circle_down -#' @description Render an svg icon of a arrow_circle_down -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_circle_down( -#' type = "solid", -#' id = "my_arrow_circle_down_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_circle_down icon" -#' ) -#' @return Render an svg icon of a arrow_circle_down -#' @keywords rheroicons arrow_circle_down -icons$arrow_circle_down <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_circle_down", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 13l-3 3m0 0l-3-3m3 3V8m0 13a9 9 0 110-18 9 9 0 010 18z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_circle_down", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm1-11a1 1 0 10-2 0v3.586L7.707 9.293a1 1 0 00-1.414 1.414l3 3a1 1 0 001.414 0l3-3a1 1 0 00-1.414-1.414L11 10.586V7z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_circle_left -#' @name arrow_circle_left -#' @description Render an svg icon of a arrow_circle_left -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_circle_left( -#' type = "solid", -#' id = "my_arrow_circle_left_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_circle_left icon" -#' ) -#' @return Render an svg icon of a arrow_circle_left -#' @keywords rheroicons arrow_circle_left -icons$arrow_circle_left <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_circle_left", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 15l-3-3m0 0l3-3m-3 3h8M3 12a9 9 0 1118 0 9 9 0 01-18 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_circle_left", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm.707-10.293a1 1 0 00-1.414-1.414l-3 3a1 1 0 000 1.414l3 3a1 1 0 001.414-1.414L9.414 11H13a1 1 0 100-2H9.414l1.293-1.293z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_circle_right -#' @name arrow_circle_right -#' @description Render an svg icon of a arrow_circle_right -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_circle_right( -#' type = "solid", -#' id = "my_arrow_circle_right_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_circle_right icon" -#' ) -#' @return Render an svg icon of a arrow_circle_right -#' @keywords rheroicons arrow_circle_right -icons$arrow_circle_right <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_circle_right", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13 9l3 3m0 0l-3 3m3-3H8m13 0a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_circle_right", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm3.707-8.707l-3-3a1 1 0 00-1.414 1.414L10.586 9H7a1 1 0 100 2h3.586l-1.293 1.293a1 1 0 101.414 1.414l3-3a1 1 0 000-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_circle_up -#' @name arrow_circle_up -#' @description Render an svg icon of a arrow_circle_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_circle_up( -#' type = "solid", -#' id = "my_arrow_circle_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_circle_up icon" -#' ) -#' @return Render an svg icon of a arrow_circle_up -#' @keywords rheroicons arrow_circle_up -icons$arrow_circle_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_circle_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 11l3-3m0 0l3 3m-3-3v8m0-13a9 9 0 110 18 9 9 0 010-18z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_circle_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm3.707-8.707l-3-3a1 1 0 00-1.414 0l-3 3a1 1 0 001.414 1.414L9 9.414V13a1 1 0 102 0V9.414l1.293 1.293a1 1 0 001.414-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_down -#' @name arrow_down -#' @description Render an svg icon of a arrow_down -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_down( -#' type = "solid", -#' id = "my_arrow_down_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_down icon" -#' ) -#' @return Render an svg icon of a arrow_down -#' @keywords rheroicons arrow_down -icons$arrow_down <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_down", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 14l-7 7m0 0l-7-7m7 7V3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_down", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M16.707 10.293a1 1 0 010 1.414l-6 6a1 1 0 01-1.414 0l-6-6a1 1 0 111.414-1.414L9 14.586V3a1 1 0 012 0v11.586l4.293-4.293a1 1 0 011.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_left -#' @name arrow_left -#' @description Render an svg icon of a arrow_left -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_left( -#' type = "solid", -#' id = "my_arrow_left_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_left icon" -#' ) -#' @return Render an svg icon of a arrow_left -#' @keywords rheroicons arrow_left -icons$arrow_left <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_left", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 19l-7-7m0 0l7-7m-7 7h18")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_left", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M9.707 16.707a1 1 0 01-1.414 0l-6-6a1 1 0 010-1.414l6-6a1 1 0 011.414 1.414L5.414 9H17a1 1 0 110 2H5.414l4.293 4.293a1 1 0 010 1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_narrow_down -#' @name arrow_narrow_down -#' @description Render an svg icon of a arrow_narrow_down -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_narrow_down( -#' type = "solid", -#' id = "my_arrow_narrow_down_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_narrow_down icon" -#' ) -#' @return Render an svg icon of a arrow_narrow_down -#' @keywords rheroicons arrow_narrow_down -icons$arrow_narrow_down <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_narrow_down", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 17l-4 4m0 0l-4-4m4 4V3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_narrow_down", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M14.707 12.293a1 1 0 010 1.414l-4 4a1 1 0 01-1.414 0l-4-4a1 1 0 111.414-1.414L9 14.586V3a1 1 0 012 0v11.586l2.293-2.293a1 1 0 011.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_narrow_left -#' @name arrow_narrow_left -#' @description Render an svg icon of a arrow_narrow_left -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_narrow_left( -#' type = "solid", -#' id = "my_arrow_narrow_left_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_narrow_left icon" -#' ) -#' @return Render an svg icon of a arrow_narrow_left -#' @keywords rheroicons arrow_narrow_left -icons$arrow_narrow_left <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_narrow_left", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 16l-4-4m0 0l4-4m-4 4h18")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_narrow_left", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M7.707 14.707a1 1 0 01-1.414 0l-4-4a1 1 0 010-1.414l4-4a1 1 0 011.414 1.414L5.414 9H17a1 1 0 110 2H5.414l2.293 2.293a1 1 0 010 1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_narrow_right -#' @name arrow_narrow_right -#' @description Render an svg icon of a arrow_narrow_right -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_narrow_right( -#' type = "solid", -#' id = "my_arrow_narrow_right_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_narrow_right icon" -#' ) -#' @return Render an svg icon of a arrow_narrow_right -#' @keywords rheroicons arrow_narrow_right -icons$arrow_narrow_right <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_narrow_right", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 8l4 4m0 0l-4 4m4-4H3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_narrow_right", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12.293 5.293a1 1 0 011.414 0l4 4a1 1 0 010 1.414l-4 4a1 1 0 01-1.414-1.414L14.586 11H3a1 1 0 110-2h11.586l-2.293-2.293a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_narrow_up -#' @name arrow_narrow_up -#' @description Render an svg icon of a arrow_narrow_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_narrow_up( -#' type = "solid", -#' id = "my_arrow_narrow_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_narrow_up icon" -#' ) -#' @return Render an svg icon of a arrow_narrow_up -#' @keywords rheroicons arrow_narrow_up -icons$arrow_narrow_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_narrow_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 7l4-4m0 0l4 4m-4-4v18")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_narrow_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5.293 7.707a1 1 0 010-1.414l4-4a1 1 0 011.414 0l4 4a1 1 0 01-1.414 1.414L11 5.414V17a1 1 0 11-2 0V5.414L6.707 7.707a1 1 0 01-1.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_right -#' @name arrow_right -#' @description Render an svg icon of a arrow_right -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_right( -#' type = "solid", -#' id = "my_arrow_right_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_right icon" -#' ) -#' @return Render an svg icon of a arrow_right -#' @keywords rheroicons arrow_right -icons$arrow_right <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_right", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M14 5l7 7m0 0l-7 7m7-7H3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_right", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10.293 3.293a1 1 0 011.414 0l6 6a1 1 0 010 1.414l-6 6a1 1 0 01-1.414-1.414L14.586 11H3a1 1 0 110-2h11.586l-4.293-4.293a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrow_up -#' @name arrow_up -#' @description Render an svg icon of a arrow_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrow_up( -#' type = "solid", -#' id = "my_arrow_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrow_up icon" -#' ) -#' @return Render an svg icon of a arrow_up -#' @keywords rheroicons arrow_up -icons$arrow_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrow_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 10l7-7m0 0l7 7m-7-7v18")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrow_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3.293 9.707a1 1 0 010-1.414l6-6a1 1 0 011.414 0l6 6a1 1 0 01-1.414 1.414L11 5.414V17a1 1 0 11-2 0V5.414L4.707 9.707a1 1 0 01-1.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' arrows_expand -#' @name arrows_expand -#' @description Render an svg icon of a arrows_expand -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$arrows_expand( -#' type = "solid", -#' id = "my_arrows_expand_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the arrows_expand icon" -#' ) -#' @return Render an svg icon of a arrows_expand -#' @keywords rheroicons arrows_expand -icons$arrows_expand <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_arrows_expand", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 8V4m0 0h4M4 4l5 5m11-1V4m0 0h-4m4 0l-5 5M4 16v4m0 0h4m-4 0l5-5m11 5l-5-5m5 5v-4m0 4h-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_arrows_expand", - width = "19", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 19 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(stroke = "#374151", - `stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", d = "M3 8V4m0 0h4M3 4l4 4m8 0V4m0 0h-4m4 0l-4 4m-8 4v4m0 0h4m-4 0l4-4m8 4l-4-4m4 4v-4m0 4h-4")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' at_symbol -#' @name at_symbol -#' @description Render an svg icon of a at_symbol -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$at_symbol( -#' type = "solid", -#' id = "my_at_symbol_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the at_symbol icon" -#' ) -#' @return Render an svg icon of a at_symbol -#' @keywords rheroicons at_symbol -icons$at_symbol <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_at_symbol", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 12a4 4 0 10-8 0 4 4 0 008 0zm0 0v1.5a2.5 2.5 0 005 0V12a9 9 0 10-9 9m4.5-1.206a8.959 8.959 0 01-4.5 1.207")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_at_symbol", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M14.243 5.757a6 6 0 10-.986 9.284 1 1 0 111.087 1.678A8 8 0 1118 10a3 3 0 01-4.8 2.401A4 4 0 1114 10a1 1 0 102 0c0-1.537-.586-3.07-1.757-4.243zM12 10a2 2 0 10-4 0 2 2 0 004 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' backspace -#' @name backspace -#' @description Render an svg icon of a backspace -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$backspace( -#' type = "solid", -#' id = "my_backspace_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the backspace icon" -#' ) -#' @return Render an svg icon of a backspace -#' @keywords rheroicons backspace -icons$backspace <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_backspace", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 14l2-2m0 0l2-2m-2 2l-2-2m2 2l2 2M3 12l6.414 6.414a2 2 0 001.414.586H19a2 2 0 002-2V7a2 2 0 00-2-2h-8.172a2 2 0 00-1.414.586L3 12z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_backspace", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6.707 4.879A3 3 0 018.828 4H15a3 3 0 013 3v6a3 3 0 01-3 3H8.828a3 3 0 01-2.12-.879l-4.415-4.414a1 1 0 010-1.414l4.414-4.414zm4 2.414a1 1 0 00-1.414 1.414L10.586 10l-1.293 1.293a1 1 0 101.414 1.414L12 11.414l1.293 1.293a1 1 0 001.414-1.414L13.414 10l1.293-1.293a1 1 0 00-1.414-1.414L12 8.586l-1.293-1.293z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' badge_check -#' @name badge_check -#' @description Render an svg icon of a badge_check -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$badge_check( -#' type = "solid", -#' id = "my_badge_check_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the badge_check icon" -#' ) -#' @return Render an svg icon of a badge_check -#' @keywords rheroicons badge_check -icons$badge_check <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_badge_check", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 12l2 2 4-4M7.835 4.697a3.42 3.42 0 001.946-.806 3.42 3.42 0 014.438 0 3.42 3.42 0 001.946.806 3.42 3.42 0 013.138 3.138 3.42 3.42 0 00.806 1.946 3.42 3.42 0 010 4.438 3.42 3.42 0 00-.806 1.946 3.42 3.42 0 01-3.138 3.138 3.42 3.42 0 00-1.946.806 3.42 3.42 0 01-4.438 0 3.42 3.42 0 00-1.946-.806 3.42 3.42 0 01-3.138-3.138 3.42 3.42 0 00-.806-1.946 3.42 3.42 0 010-4.438 3.42 3.42 0 00.806-1.946 3.42 3.42 0 013.138-3.138z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_badge_check", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6.267 3.455a3.066 3.066 0 001.745-.723 3.066 3.066 0 013.976 0 3.066 3.066 0 001.745.723 3.066 3.066 0 012.812 2.812c.051.643.304 1.254.723 1.745a3.066 3.066 0 010 3.976 3.066 3.066 0 00-.723 1.745 3.066 3.066 0 01-2.812 2.812 3.066 3.066 0 00-1.745.723 3.066 3.066 0 01-3.976 0 3.066 3.066 0 00-1.745-.723 3.066 3.066 0 01-2.812-2.812 3.066 3.066 0 00-.723-1.745 3.066 3.066 0 010-3.976 3.066 3.066 0 00.723-1.745 3.066 3.066 0 012.812-2.812zm7.44 5.252a1 1 0 00-1.414-1.414L9 10.586 7.707 9.293a1 1 0 00-1.414 1.414l2 2a1 1 0 001.414 0l4-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' ban -#' @name ban -#' @description Render an svg icon of a ban -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$ban( -#' type = "solid", -#' id = "my_ban_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the ban icon" -#' ) -#' @return Render an svg icon of a ban -#' @keywords rheroicons ban -icons$ban <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_ban", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M18.364 18.364A9 9 0 005.636 5.636m12.728 12.728A9 9 0 015.636 5.636m12.728 12.728L5.636 5.636")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_ban", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M13.477 14.89A6 6 0 015.11 6.524l8.367 8.368zm1.414-1.414L6.524 5.11a6 6 0 018.367 8.367zM18 10a8 8 0 11-16 0 8 8 0 0116 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' beaker -#' @name beaker -#' @description Render an svg icon of a beaker -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$beaker( -#' type = "solid", -#' id = "my_beaker_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the beaker icon" -#' ) -#' @return Render an svg icon of a beaker -#' @keywords rheroicons beaker -icons$beaker <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_beaker", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19.428 15.428a2 2 0 00-1.022-.547l-2.387-.477a6 6 0 00-3.86.517l-.318.158a6 6 0 01-3.86.517L6.05 15.21a2 2 0 00-1.806.547M8 4h8l-1 1v5.172a2 2 0 00.586 1.414l5 5c1.26 1.26.367 3.414-1.415 3.414H4.828c-1.782 0-2.674-2.154-1.414-3.414l5-5A2 2 0 009 10.172V5L8 4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_beaker", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M7 2a1 1 0 00-.707 1.707L7 4.414v3.758a1 1 0 01-.293.707l-4 4C.817 14.769 2.156 18 4.828 18h10.343c2.673 0 4.012-3.231 2.122-5.121l-4-4A1 1 0 0113 8.172V4.414l.707-.707A1 1 0 0013 2H7zm2 6.172V4h2v4.172a3 3 0 00.879 2.12l1.027 1.028a4 4 0 00-2.171.102l-.47.156a4 4 0 01-2.53 0l-.563-.187a1.993 1.993 0 00-.114-.035l1.063-1.063A3 3 0 009 8.172z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' bell -#' @name bell -#' @description Render an svg icon of a bell -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$bell( -#' type = "solid", -#' id = "my_bell_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the bell icon" -#' ) -#' @return Render an svg icon of a bell -#' @keywords rheroicons bell -icons$bell <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_bell", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 17h5l-1.405-1.405A2.032 2.032 0 0118 14.158V11a6.002 6.002 0 00-4-5.659V5a2 2 0 10-4 0v.341C7.67 6.165 6 8.388 6 11v3.159c0 .538-.214 1.055-.595 1.436L4 17h5m6 0v1a3 3 0 11-6 0v-1m6 0H9")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_bell", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10 2a6 6 0 00-6 6v3.586l-.707.707A1 1 0 004 14h12a1 1 0 00.707-1.707L16 11.586V8a6 6 0 00-6-6zM10 18a3 3 0 01-3-3h6a3 3 0 01-3 3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' book_open -#' @name book_open -#' @description Render an svg icon of a book_open -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$book_open( -#' type = "solid", -#' id = "my_book_open_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the book_open icon" -#' ) -#' @return Render an svg icon of a book_open -#' @keywords rheroicons book_open -icons$book_open <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_book_open", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 6.253v13m0-13C10.832 5.477 9.246 5 7.5 5S4.168 5.477 3 6.253v13C4.168 18.477 5.754 18 7.5 18s3.332.477 4.5 1.253m0-13C13.168 5.477 14.754 5 16.5 5c1.747 0 3.332.477 4.5 1.253v13C19.832 18.477 18.247 18 16.5 18c-1.746 0-3.332.477-4.5 1.253")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_book_open", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9 4.804A7.968 7.968 0 005.5 4c-1.255 0-2.443.29-3.5.804v10A7.969 7.969 0 015.5 14c1.669 0 3.218.51 4.5 1.385A7.962 7.962 0 0114.5 14c1.255 0 2.443.29 3.5.804v-10A7.968 7.968 0 0014.5 4c-1.255 0-2.443.29-3.5.804V12a1 1 0 11-2 0V4.804z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' bookmark_alt -#' @name bookmark_alt -#' @description Render an svg icon of a bookmark_alt -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$bookmark_alt( -#' type = "solid", -#' id = "my_bookmark_alt_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the bookmark_alt icon" -#' ) -#' @return Render an svg icon of a bookmark_alt -#' @keywords rheroicons bookmark_alt -icons$bookmark_alt <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_bookmark_alt", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 4v12l-4-2-4 2V4M6 20h12a2 2 0 002-2V6a2 2 0 00-2-2H6a2 2 0 00-2 2v12a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_bookmark_alt", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 5a2 2 0 012-2h10a2 2 0 012 2v10a2 2 0 01-2 2H5a2 2 0 01-2-2V5zm11 1H6v8l4-2 4 2V6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' bookmark -#' @name bookmark -#' @description Render an svg icon of a bookmark -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$bookmark( -#' type = "solid", -#' id = "my_bookmark_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the bookmark icon" -#' ) -#' @return Render an svg icon of a bookmark -#' @keywords rheroicons bookmark -icons$bookmark <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_bookmark", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 5a2 2 0 012-2h10a2 2 0 012 2v16l-7-3.5L5 21V5z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_bookmark", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5 4a2 2 0 012-2h6a2 2 0 012 2v14l-5-2.5L5 18V4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' briefcase -#' @name briefcase -#' @description Render an svg icon of a briefcase -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$briefcase( -#' type = "solid", -#' id = "my_briefcase_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the briefcase icon" -#' ) -#' @return Render an svg icon of a briefcase -#' @keywords rheroicons briefcase -icons$briefcase <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_briefcase", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 13.255A23.931 23.931 0 0112 15c-3.183 0-6.22-.62-9-1.745M16 6V4a2 2 0 00-2-2h-4a2 2 0 00-2 2v2m4 6h.01M5 20h14a2 2 0 002-2V8a2 2 0 00-2-2H5a2 2 0 00-2 2v10a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_briefcase", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 6V5a3 3 0 013-3h2a3 3 0 013 3v1h2a2 2 0 012 2v3.57A22.952 22.952 0 0110 13a22.95 22.95 0 01-8-1.43V8a2 2 0 012-2h2zm2-1a1 1 0 011-1h2a1 1 0 011 1v1H8V5zm1 5a1 1 0 011-1h.01a1 1 0 110 2H10a1 1 0 01-1-1z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(d = "M2 13.692V16a2 2 0 002 2h12a2 2 0 002-2v-2.308A24.974 24.974 0 0110 15c-2.796 0-5.487-.46-8-1.308z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cake -#' @name cake -#' @description Render an svg icon of a cake -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cake( -#' type = "solid", -#' id = "my_cake_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cake icon" -#' ) -#' @return Render an svg icon of a cake -#' @keywords rheroicons cake -icons$cake <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cake", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 15.546c-.523 0-1.046.151-1.5.454a2.704 2.704 0 01-3 0 2.704 2.704 0 00-3 0 2.704 2.704 0 01-3 0 2.704 2.704 0 00-3 0 2.704 2.704 0 01-3 0 2.701 2.701 0 00-1.5-.454M9 6v2m3-2v2m3-2v2M9 3h.01M12 3h.01M15 3h.01M21 21v-7a2 2 0 00-2-2H5a2 2 0 00-2 2v7h18zm-3-9v-2a2 2 0 00-2-2H8a2 2 0 00-2 2v2h12z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cake", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 3a1 1 0 011-1h.01a1 1 0 010 2H7a1 1 0 01-1-1zm2 3a1 1 0 00-2 0v1a2 2 0 00-2 2v1a2 2 0 00-2 2v.683a3.7 3.7 0 011.055.485 1.704 1.704 0 001.89 0 3.704 3.704 0 014.11 0 1.704 1.704 0 001.89 0 3.704 3.704 0 014.11 0 1.704 1.704 0 001.89 0A3.7 3.7 0 0118 12.683V12a2 2 0 00-2-2V9a2 2 0 00-2-2V6a1 1 0 10-2 0v1h-1V6a1 1 0 10-2 0v1H8V6zm10 8.868a3.704 3.704 0 01-4.055-.036 1.704 1.704 0 00-1.89 0 3.704 3.704 0 01-4.11 0 1.704 1.704 0 00-1.89 0A3.704 3.704 0 012 14.868V17a1 1 0 001 1h14a1 1 0 001-1v-2.132zM9 3a1 1 0 011-1h.01a1 1 0 110 2H10a1 1 0 01-1-1zm3 0a1 1 0 011-1h.01a1 1 0 110 2H13a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' calculator -#' @name calculator -#' @description Render an svg icon of a calculator -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$calculator( -#' type = "solid", -#' id = "my_calculator_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the calculator icon" -#' ) -#' @return Render an svg icon of a calculator -#' @keywords rheroicons calculator -icons$calculator <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_calculator", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 7h6m0 10v-3m-3 3h.01M9 17h.01M9 14h.01M12 14h.01M15 11h.01M12 11h.01M9 11h.01M7 21h10a2 2 0 002-2V5a2 2 0 00-2-2H7a2 2 0 00-2 2v14a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_calculator", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 2a2 2 0 00-2 2v12a2 2 0 002 2h8a2 2 0 002-2V4a2 2 0 00-2-2H6zm1 2a1 1 0 000 2h6a1 1 0 100-2H7zm6 7a1 1 0 011 1v3a1 1 0 11-2 0v-3a1 1 0 011-1zm-3 3a1 1 0 100 2h.01a1 1 0 100-2H10zm-4 1a1 1 0 011-1h.01a1 1 0 110 2H7a1 1 0 01-1-1zm1-4a1 1 0 100 2h.01a1 1 0 100-2H7zm2 1a1 1 0 011-1h.01a1 1 0 110 2H10a1 1 0 01-1-1zm4-4a1 1 0 100 2h.01a1 1 0 100-2H13zM9 9a1 1 0 011-1h.01a1 1 0 110 2H10a1 1 0 01-1-1zM7 8a1 1 0 000 2h.01a1 1 0 000-2H7z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' calendar -#' @name calendar -#' @description Render an svg icon of a calendar -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$calendar( -#' type = "solid", -#' id = "my_calendar_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the calendar icon" -#' ) -#' @return Render an svg icon of a calendar -#' @keywords rheroicons calendar -icons$calendar <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_calendar", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 7V3m8 4V3m-9 8h10M5 21h14a2 2 0 002-2V7a2 2 0 00-2-2H5a2 2 0 00-2 2v12a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_calendar", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 2a1 1 0 00-1 1v1H4a2 2 0 00-2 2v10a2 2 0 002 2h12a2 2 0 002-2V6a2 2 0 00-2-2h-1V3a1 1 0 10-2 0v1H7V3a1 1 0 00-1-1zm0 5a1 1 0 000 2h8a1 1 0 100-2H6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' camera -#' @name camera -#' @description Render an svg icon of a camera -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$camera( -#' type = "solid", -#' id = "my_camera_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the camera icon" -#' ) -#' @return Render an svg icon of a camera -#' @keywords rheroicons camera -icons$camera <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_camera", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 9a2 2 0 012-2h.93a2 2 0 001.664-.89l.812-1.22A2 2 0 0110.07 4h3.86a2 2 0 011.664.89l.812 1.22A2 2 0 0018.07 7H19a2 2 0 012 2v9a2 2 0 01-2 2H5a2 2 0 01-2-2V9z")), - htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", `stroke-linejoin` = "round", - `stroke-width` = "2", d = "M15 13a3 3 0 11-6 0 3 3 0 016 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_camera", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 5a2 2 0 00-2 2v8a2 2 0 002 2h12a2 2 0 002-2V7a2 2 0 00-2-2h-1.586a1 1 0 01-.707-.293l-1.121-1.121A2 2 0 0011.172 3H8.828a2 2 0 00-1.414.586L6.293 4.707A1 1 0 015.586 5H4zm6 9a3 3 0 100-6 3 3 0 000 6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cash -#' @name cash -#' @description Render an svg icon of a cash -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cash( -#' type = "solid", -#' id = "my_cash_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cash icon" -#' ) -#' @return Render an svg icon of a cash -#' @keywords rheroicons cash -icons$cash <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cash", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 9V7a2 2 0 00-2-2H5a2 2 0 00-2 2v6a2 2 0 002 2h2m2 4h10a2 2 0 002-2v-6a2 2 0 00-2-2H9a2 2 0 00-2 2v6a2 2 0 002 2zm7-5a2 2 0 11-4 0 2 2 0 014 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cash", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 4a2 2 0 00-2 2v4a2 2 0 002 2V6h10a2 2 0 00-2-2H4zm2 6a2 2 0 012-2h8a2 2 0 012 2v4a2 2 0 01-2 2H8a2 2 0 01-2-2v-4zm6 4a2 2 0 100-4 2 2 0 000 4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chart_bar -#' @name chart_bar -#' @description Render an svg icon of a chart_bar -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chart_bar( -#' type = "solid", -#' id = "my_chart_bar_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chart_bar icon" -#' ) -#' @return Render an svg icon of a chart_bar -#' @keywords rheroicons chart_bar -icons$chart_bar <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chart_bar", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 19v-6a2 2 0 00-2-2H5a2 2 0 00-2 2v6a2 2 0 002 2h2a2 2 0 002-2zm0 0V9a2 2 0 012-2h2a2 2 0 012 2v10m-6 0a2 2 0 002 2h2a2 2 0 002-2m0 0V5a2 2 0 012-2h2a2 2 0 012 2v14a2 2 0 01-2 2h-2a2 2 0 01-2-2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chart_bar", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 11a1 1 0 011-1h2a1 1 0 011 1v5a1 1 0 01-1 1H3a1 1 0 01-1-1v-5zM8 7a1 1 0 011-1h2a1 1 0 011 1v9a1 1 0 01-1 1H9a1 1 0 01-1-1V7zM14 4a1 1 0 011-1h2a1 1 0 011 1v12a1 1 0 01-1 1h-2a1 1 0 01-1-1V4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chart_pie -#' @name chart_pie -#' @description Render an svg icon of a chart_pie -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chart_pie( -#' type = "solid", -#' id = "my_chart_pie_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chart_pie icon" -#' ) -#' @return Render an svg icon of a chart_pie -#' @keywords rheroicons chart_pie -icons$chart_pie <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chart_pie", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 3.055A9.001 9.001 0 1020.945 13H11V3.055z")), htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M20.488 9H15V3.512A9.025 9.025 0 0120.488 9z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chart_pie", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 10a8 8 0 018-8v8h8a8 8 0 11-16 0z")), - htmltools::tag(`_tag_name` = "path", list(d = "M12 2.252A8.014 8.014 0 0117.748 8H12V2.252z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chart_square_bar -#' @name chart_square_bar -#' @description Render an svg icon of a chart_square_bar -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chart_square_bar( -#' type = "solid", -#' id = "my_chart_square_bar_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chart_square_bar icon" -#' ) -#' @return Render an svg icon of a chart_square_bar -#' @keywords rheroicons chart_square_bar -icons$chart_square_bar <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chart_square_bar", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 8v8m-4-5v5m-4-2v2m-2 4h12a2 2 0 002-2V6a2 2 0 00-2-2H6a2 2 0 00-2 2v12a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chart_square_bar", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 3a2 2 0 00-2 2v10a2 2 0 002 2h10a2 2 0 002-2V5a2 2 0 00-2-2H5zm9 4a1 1 0 10-2 0v6a1 1 0 102 0V7zm-3 2a1 1 0 10-2 0v4a1 1 0 102 0V9zm-3 3a1 1 0 10-2 0v1a1 1 0 102 0v-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chat_alt_2 -#' @name chat_alt_2 -#' @description Render an svg icon of a chat_alt_2 -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chat_alt_2( -#' type = "solid", -#' id = "my_chat_alt_2_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chat_alt_2 icon" -#' ) -#' @return Render an svg icon of a chat_alt_2 -#' @keywords rheroicons chat_alt_2 -icons$chat_alt_2 <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chat_alt_2", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 8h2a2 2 0 012 2v6a2 2 0 01-2 2h-2v4l-4-4H9a1.994 1.994 0 01-1.414-.586m0 0L11 14h4a2 2 0 002-2V6a2 2 0 00-2-2H5a2 2 0 00-2 2v6a2 2 0 002 2h2v4l.586-.586z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chat_alt_2", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 5a2 2 0 012-2h7a2 2 0 012 2v4a2 2 0 01-2 2H9l-3 3v-3H4a2 2 0 01-2-2V5z")), - htmltools::tag(`_tag_name` = "path", list(d = "M15 7v2a4 4 0 01-4 4H9.828l-1.766 1.767c.28.149.599.233.938.233h2l3 3v-3h2a2 2 0 002-2V9a2 2 0 00-2-2h-1z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chat_alt -#' @name chat_alt -#' @description Render an svg icon of a chat_alt -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chat_alt( -#' type = "solid", -#' id = "my_chat_alt_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chat_alt icon" -#' ) -#' @return Render an svg icon of a chat_alt -#' @keywords rheroicons chat_alt -icons$chat_alt <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chat_alt", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 10h.01M12 10h.01M16 10h.01M9 16H5a2 2 0 01-2-2V6a2 2 0 012-2h14a2 2 0 012 2v8a2 2 0 01-2 2h-5l-5 5v-5z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chat_alt", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 5v8a2 2 0 01-2 2h-5l-5 4v-4H4a2 2 0 01-2-2V5a2 2 0 012-2h12a2 2 0 012 2zM7 8H5v2h2V8zm2 0h2v2H9V8zm6 0h-2v2h2V8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chat -#' @name chat -#' @description Render an svg icon of a chat -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chat( -#' type = "solid", -#' id = "my_chat_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chat icon" -#' ) -#' @return Render an svg icon of a chat -#' @keywords rheroicons chat -icons$chat <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chat", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 12h.01M12 12h.01M16 12h.01M21 12c0 4.418-4.03 8-9 8a9.863 9.863 0 01-4.255-.949L3 20l1.395-3.72C3.512 15.042 3 13.574 3 12c0-4.418 4.03-8 9-8s9 3.582 9 8z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chat", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 10c0 3.866-3.582 7-8 7a8.841 8.841 0 01-4.083-.98L2 17l1.338-3.123C2.493 12.767 2 11.434 2 10c0-3.866 3.582-7 8-7s8 3.134 8 7zM7 9H5v2h2V9zm8 0h-2v2h2V9zM9 9h2v2H9V9z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' check_circle -#' @name check_circle -#' @description Render an svg icon of a check_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$check_circle( -#' type = "solid", -#' id = "my_check_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the check_circle icon" -#' ) -#' @return Render an svg icon of a check_circle -#' @keywords rheroicons check_circle -icons$check_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_check_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 12l2 2 4-4m6 2a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_check_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm3.707-9.293a1 1 0 00-1.414-1.414L9 10.586 7.707 9.293a1 1 0 00-1.414 1.414l2 2a1 1 0 001.414 0l4-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' check -#' @name check -#' @description Render an svg icon of a check -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$check( -#' type = "solid", -#' id = "my_check_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the check icon" -#' ) -#' @return Render an svg icon of a check -#' @keywords rheroicons check -icons$check <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_check", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 13l4 4L19 7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_check", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M16.707 5.293a1 1 0 010 1.414l-8 8a1 1 0 01-1.414 0l-4-4a1 1 0 011.414-1.414L8 12.586l7.293-7.293a1 1 0 011.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_double_down -#' @name chevron_double_down -#' @description Render an svg icon of a chevron_double_down -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_double_down( -#' type = "solid", -#' id = "my_chevron_double_down_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_double_down icon" -#' ) -#' @return Render an svg icon of a chevron_double_down -#' @keywords rheroicons chevron_double_down -icons$chevron_double_down <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_double_down", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 13l-7 7-7-7m14-8l-7 7-7-7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_double_down", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M15.707 4.293a1 1 0 010 1.414l-5 5a1 1 0 01-1.414 0l-5-5a1 1 0 011.414-1.414L10 8.586l4.293-4.293a1 1 0 011.414 0zm0 6a1 1 0 010 1.414l-5 5a1 1 0 01-1.414 0l-5-5a1 1 0 111.414-1.414L10 14.586l4.293-4.293a1 1 0 011.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_double_left -#' @name chevron_double_left -#' @description Render an svg icon of a chevron_double_left -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_double_left( -#' type = "solid", -#' id = "my_chevron_double_left_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_double_left icon" -#' ) -#' @return Render an svg icon of a chevron_double_left -#' @keywords rheroicons chevron_double_left -icons$chevron_double_left <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_double_left", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 19l-7-7 7-7m8 14l-7-7 7-7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_double_left", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M15.707 15.707a1 1 0 01-1.414 0l-5-5a1 1 0 010-1.414l5-5a1 1 0 111.414 1.414L11.414 10l4.293 4.293a1 1 0 010 1.414zm-6 0a1 1 0 01-1.414 0l-5-5a1 1 0 010-1.414l5-5a1 1 0 011.414 1.414L5.414 10l4.293 4.293a1 1 0 010 1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_double_right -#' @name chevron_double_right -#' @description Render an svg icon of a chevron_double_right -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_double_right( -#' type = "solid", -#' id = "my_chevron_double_right_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_double_right icon" -#' ) -#' @return Render an svg icon of a chevron_double_right -#' @keywords rheroicons chevron_double_right -icons$chevron_double_right <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_double_right", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13 5l7 7-7 7M5 5l7 7-7 7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_double_right", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10.293 15.707a1 1 0 010-1.414L14.586 10l-4.293-4.293a1 1 0 111.414-1.414l5 5a1 1 0 010 1.414l-5 5a1 1 0 01-1.414 0z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4.293 15.707a1 1 0 010-1.414L8.586 10 4.293 5.707a1 1 0 011.414-1.414l5 5a1 1 0 010 1.414l-5 5a1 1 0 01-1.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_double_up -#' @name chevron_double_up -#' @description Render an svg icon of a chevron_double_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_double_up( -#' type = "solid", -#' id = "my_chevron_double_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_double_up icon" -#' ) -#' @return Render an svg icon of a chevron_double_up -#' @keywords rheroicons chevron_double_up -icons$chevron_double_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_double_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 11l7-7 7 7M5 19l7-7 7 7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_double_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4.293 15.707a1 1 0 010-1.414l5-5a1 1 0 011.414 0l5 5a1 1 0 01-1.414 1.414L10 11.414l-4.293 4.293a1 1 0 01-1.414 0zm0-6a1 1 0 010-1.414l5-5a1 1 0 011.414 0l5 5a1 1 0 01-1.414 1.414L10 5.414 5.707 9.707a1 1 0 01-1.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_down -#' @name chevron_down -#' @description Render an svg icon of a chevron_down -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_down( -#' type = "solid", -#' id = "my_chevron_down_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_down icon" -#' ) -#' @return Render an svg icon of a chevron_down -#' @keywords rheroicons chevron_down -icons$chevron_down <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_down", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 9l-7 7-7-7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_down", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5.293 7.293a1 1 0 011.414 0L10 10.586l3.293-3.293a1 1 0 111.414 1.414l-4 4a1 1 0 01-1.414 0l-4-4a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_left -#' @name chevron_left -#' @description Render an svg icon of a chevron_left -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_left( -#' type = "solid", -#' id = "my_chevron_left_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_left icon" -#' ) -#' @return Render an svg icon of a chevron_left -#' @keywords rheroicons chevron_left -icons$chevron_left <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_left", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 19l-7-7 7-7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_left", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12.707 5.293a1 1 0 010 1.414L9.414 10l3.293 3.293a1 1 0 01-1.414 1.414l-4-4a1 1 0 010-1.414l4-4a1 1 0 011.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_right -#' @name chevron_right -#' @description Render an svg icon of a chevron_right -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_right( -#' type = "solid", -#' id = "my_chevron_right_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_right icon" -#' ) -#' @return Render an svg icon of a chevron_right -#' @keywords rheroicons chevron_right -icons$chevron_right <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_right", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 5l7 7-7 7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_right", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M7.293 14.707a1 1 0 010-1.414L10.586 10 7.293 6.707a1 1 0 011.414-1.414l4 4a1 1 0 010 1.414l-4 4a1 1 0 01-1.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chevron_up -#' @name chevron_up -#' @description Render an svg icon of a chevron_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chevron_up( -#' type = "solid", -#' id = "my_chevron_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chevron_up icon" -#' ) -#' @return Render an svg icon of a chevron_up -#' @keywords rheroicons chevron_up -icons$chevron_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chevron_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 15l7-7 7 7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chevron_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M14.707 12.707a1 1 0 01-1.414 0L10 9.414l-3.293 3.293a1 1 0 01-1.414-1.414l4-4a1 1 0 011.414 0l4 4a1 1 0 010 1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' chip -#' @name chip -#' @description Render an svg icon of a chip -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$chip( -#' type = "solid", -#' id = "my_chip_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the chip icon" -#' ) -#' @return Render an svg icon of a chip -#' @keywords rheroicons chip -icons$chip <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_chip", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 3v2m6-2v2M9 19v2m6-2v2M5 9H3m2 6H3m18-6h-2m2 6h-2M7 19h10a2 2 0 002-2V7a2 2 0 00-2-2H7a2 2 0 00-2 2v10a2 2 0 002 2zM9 9h6v6H9V9z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_chip", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M13 7H7v6h6V7z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M7 2a1 1 0 012 0v1h2V2a1 1 0 112 0v1h2a2 2 0 012 2v2h1a1 1 0 110 2h-1v2h1a1 1 0 110 2h-1v2a2 2 0 01-2 2h-2v1a1 1 0 11-2 0v-1H9v1a1 1 0 11-2 0v-1H5a2 2 0 01-2-2v-2H2a1 1 0 110-2h1V9H2a1 1 0 010-2h1V5a2 2 0 012-2h2V2zM5 5h10v10H5V5z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' clipboard_check -#' @name clipboard_check -#' @description Render an svg icon of a clipboard_check -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$clipboard_check( -#' type = "solid", -#' id = "my_clipboard_check_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the clipboard_check icon" -#' ) -#' @return Render an svg icon of a clipboard_check -#' @keywords rheroicons clipboard_check -icons$clipboard_check <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_clipboard_check", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 5H7a2 2 0 00-2 2v12a2 2 0 002 2h10a2 2 0 002-2V7a2 2 0 00-2-2h-2M9 5a2 2 0 002 2h2a2 2 0 002-2M9 5a2 2 0 012-2h2a2 2 0 012 2m-6 9l2 2 4-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_clipboard_check", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9 2a1 1 0 000 2h2a1 1 0 100-2H9z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M4 5a2 2 0 012-2 3 3 0 003 3h2a3 3 0 003-3 2 2 0 012 2v11a2 2 0 01-2 2H6a2 2 0 01-2-2V5zm9.707 5.707a1 1 0 00-1.414-1.414L9 12.586l-1.293-1.293a1 1 0 00-1.414 1.414l2 2a1 1 0 001.414 0l4-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' clipboard_copy -#' @name clipboard_copy -#' @description Render an svg icon of a clipboard_copy -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$clipboard_copy( -#' type = "solid", -#' id = "my_clipboard_copy_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the clipboard_copy icon" -#' ) -#' @return Render an svg icon of a clipboard_copy -#' @keywords rheroicons clipboard_copy -icons$clipboard_copy <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_clipboard_copy", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 5H6a2 2 0 00-2 2v12a2 2 0 002 2h10a2 2 0 002-2v-1M8 5a2 2 0 002 2h2a2 2 0 002-2M8 5a2 2 0 012-2h2a2 2 0 012 2m0 0h2a2 2 0 012 2v3m2 4H10m0 0l3-3m-3 3l3 3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_clipboard_copy", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8 2a1 1 0 000 2h2a1 1 0 100-2H8z")), - htmltools::tag(`_tag_name` = "path", list(d = "M3 5a2 2 0 012-2 3 3 0 003 3h2a3 3 0 003-3 2 2 0 012 2v6h-4.586l1.293-1.293a1 1 0 00-1.414-1.414l-3 3a1 1 0 000 1.414l3 3a1 1 0 001.414-1.414L10.414 13H15v3a2 2 0 01-2 2H5a2 2 0 01-2-2V5zM15 11h2a1 1 0 110 2h-2v-2z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' clipboard_list -#' @name clipboard_list -#' @description Render an svg icon of a clipboard_list -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$clipboard_list( -#' type = "solid", -#' id = "my_clipboard_list_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the clipboard_list icon" -#' ) -#' @return Render an svg icon of a clipboard_list -#' @keywords rheroicons clipboard_list -icons$clipboard_list <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_clipboard_list", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 5H7a2 2 0 00-2 2v12a2 2 0 002 2h10a2 2 0 002-2V7a2 2 0 00-2-2h-2M9 5a2 2 0 002 2h2a2 2 0 002-2M9 5a2 2 0 012-2h2a2 2 0 012 2m-3 7h3m-3 4h3m-6-4h.01M9 16h.01")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_clipboard_list", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9 2a1 1 0 000 2h2a1 1 0 100-2H9z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M4 5a2 2 0 012-2 3 3 0 003 3h2a3 3 0 003-3 2 2 0 012 2v11a2 2 0 01-2 2H6a2 2 0 01-2-2V5zm3 4a1 1 0 000 2h.01a1 1 0 100-2H7zm3 0a1 1 0 000 2h3a1 1 0 100-2h-3zm-3 4a1 1 0 100 2h.01a1 1 0 100-2H7zm3 0a1 1 0 100 2h3a1 1 0 100-2h-3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' clipboard -#' @name clipboard -#' @description Render an svg icon of a clipboard -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$clipboard( -#' type = "solid", -#' id = "my_clipboard_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the clipboard icon" -#' ) -#' @return Render an svg icon of a clipboard -#' @keywords rheroicons clipboard -icons$clipboard <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_clipboard", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 5H7a2 2 0 00-2 2v12a2 2 0 002 2h10a2 2 0 002-2V7a2 2 0 00-2-2h-2M9 5a2 2 0 002 2h2a2 2 0 002-2M9 5a2 2 0 012-2h2a2 2 0 012 2")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_clipboard", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8 3a1 1 0 011-1h2a1 1 0 110 2H9a1 1 0 01-1-1z")), - htmltools::tag(`_tag_name` = "path", list(d = "M6 3a2 2 0 00-2 2v11a2 2 0 002 2h8a2 2 0 002-2V5a2 2 0 00-2-2 3 3 0 01-3 3H9a3 3 0 01-3-3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' clock -#' @name clock -#' @description Render an svg icon of a clock -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$clock( -#' type = "solid", -#' id = "my_clock_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the clock icon" -#' ) -#' @return Render an svg icon of a clock -#' @keywords rheroicons clock -icons$clock <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_clock", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 8v4l3 3m6-3a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_clock", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm1-12a1 1 0 10-2 0v4a1 1 0 00.293.707l2.828 2.829a1 1 0 101.415-1.415L11 9.586V6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cloud_download -#' @name cloud_download -#' @description Render an svg icon of a cloud_download -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cloud_download( -#' type = "solid", -#' id = "my_cloud_download_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cloud_download icon" -#' ) -#' @return Render an svg icon of a cloud_download -#' @keywords rheroicons cloud_download -icons$cloud_download <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cloud_download", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 16a4 4 0 01-.88-7.903A5 5 0 1115.9 6L16 6a5 5 0 011 9.9M9 19l3 3m0 0l3-3m-3 3V10")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cloud_download", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M2 9.5A3.5 3.5 0 005.5 13H9v2.586l-1.293-1.293a1 1 0 00-1.414 1.414l3 3a1 1 0 001.414 0l3-3a1 1 0 00-1.414-1.414L11 15.586V13h2.5a4.5 4.5 0 10-.616-8.958 4.002 4.002 0 10-7.753 1.977A3.5 3.5 0 002 9.5zm9 3.5H9V8a1 1 0 012 0v5z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cloud_upload -#' @name cloud_upload -#' @description Render an svg icon of a cloud_upload -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cloud_upload( -#' type = "solid", -#' id = "my_cloud_upload_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cloud_upload icon" -#' ) -#' @return Render an svg icon of a cloud_upload -#' @keywords rheroicons cloud_upload -icons$cloud_upload <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cloud_upload", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 16a4 4 0 01-.88-7.903A5 5 0 1115.9 6L16 6a5 5 0 011 9.9M15 13l-3-3m0 0l-3 3m3-3v12")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cloud_upload", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5.5 13a3.5 3.5 0 01-.369-6.98 4 4 0 117.753-1.977A4.5 4.5 0 1113.5 13H11V9.413l1.293 1.293a1 1 0 001.414-1.414l-3-3a1 1 0 00-1.414 0l-3 3a1 1 0 001.414 1.414L9 9.414V13H5.5z")), - htmltools::tag(`_tag_name` = "path", list(d = "M9 13h2v5a1 1 0 11-2 0v-5z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cloud -#' @name cloud -#' @description Render an svg icon of a cloud -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cloud( -#' type = "solid", -#' id = "my_cloud_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cloud icon" -#' ) -#' @return Render an svg icon of a cloud -#' @keywords rheroicons cloud -icons$cloud <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cloud", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 15a4 4 0 004 4h9a5 5 0 10-.1-9.999 5.002 5.002 0 10-9.78 2.096A4.001 4.001 0 003 15z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cloud", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5.5 16a3.5 3.5 0 01-.369-6.98 4 4 0 117.753-1.977A4.5 4.5 0 1113.5 16h-8z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' code -#' @name code -#' @description Render an svg icon of a code -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$code( -#' type = "solid", -#' id = "my_code_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the code icon" -#' ) -#' @return Render an svg icon of a code -#' @keywords rheroicons code -icons$code <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_code", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 20l4-16m4 4l4 4-4 4M6 16l-4-4 4-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_code", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12.316 3.051a1 1 0 01.633 1.265l-4 12a1 1 0 11-1.898-.632l4-12a1 1 0 011.265-.633zM5.707 6.293a1 1 0 010 1.414L3.414 10l2.293 2.293a1 1 0 11-1.414 1.414l-3-3a1 1 0 010-1.414l3-3a1 1 0 011.414 0zm8.586 0a1 1 0 011.414 0l3 3a1 1 0 010 1.414l-3 3a1 1 0 11-1.414-1.414L16.586 10l-2.293-2.293a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cog -#' @name cog -#' @description Render an svg icon of a cog -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cog( -#' type = "solid", -#' id = "my_cog_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cog icon" -#' ) -#' @return Render an svg icon of a cog -#' @keywords rheroicons cog -icons$cog <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cog", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10.325 4.317c.426-1.756 2.924-1.756 3.35 0a1.724 1.724 0 002.573 1.066c1.543-.94 3.31.826 2.37 2.37a1.724 1.724 0 001.065 2.572c1.756.426 1.756 2.924 0 3.35a1.724 1.724 0 00-1.066 2.573c.94 1.543-.826 3.31-2.37 2.37a1.724 1.724 0 00-2.572 1.065c-.426 1.756-2.924 1.756-3.35 0a1.724 1.724 0 00-2.573-1.066c-1.543.94-3.31-.826-2.37-2.37a1.724 1.724 0 00-1.065-2.572c-1.756-.426-1.756-2.924 0-3.35a1.724 1.724 0 001.066-2.573c-.94-1.543.826-3.31 2.37-2.37.996.608 2.296.07 2.572-1.065z")), - htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", `stroke-linejoin` = "round", - `stroke-width` = "2", d = "M15 12a3 3 0 11-6 0 3 3 0 016 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cog", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M11.49 3.17c-.38-1.56-2.6-1.56-2.98 0a1.532 1.532 0 01-2.286.948c-1.372-.836-2.942.734-2.106 2.106.54.886.061 2.042-.947 2.287-1.561.379-1.561 2.6 0 2.978a1.532 1.532 0 01.947 2.287c-.836 1.372.734 2.942 2.106 2.106a1.532 1.532 0 012.287.947c.379 1.561 2.6 1.561 2.978 0a1.533 1.533 0 012.287-.947c1.372.836 2.942-.734 2.106-2.106a1.533 1.533 0 01.947-2.287c1.561-.379 1.561-2.6 0-2.978a1.532 1.532 0 01-.947-2.287c.836-1.372-.734-2.942-2.106-2.106a1.532 1.532 0 01-2.287-.947zM10 13a3 3 0 100-6 3 3 0 000 6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' collection -#' @name collection -#' @description Render an svg icon of a collection -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$collection( -#' type = "solid", -#' id = "my_collection_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the collection icon" -#' ) -#' @return Render an svg icon of a collection -#' @keywords rheroicons collection -icons$collection <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_collection", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 11H5m14 0a2 2 0 012 2v6a2 2 0 01-2 2H5a2 2 0 01-2-2v-6a2 2 0 012-2m14 0V9a2 2 0 00-2-2M5 11V9a2 2 0 012-2m0 0V5a2 2 0 012-2h6a2 2 0 012 2v2M7 7h10")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_collection", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M7 3a1 1 0 000 2h6a1 1 0 100-2H7zM4 7a1 1 0 011-1h10a1 1 0 110 2H5a1 1 0 01-1-1zM2 11a2 2 0 012-2h12a2 2 0 012 2v4a2 2 0 01-2 2H4a2 2 0 01-2-2v-4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' color_swatch -#' @name color_swatch -#' @description Render an svg icon of a color_swatch -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$color_swatch( -#' type = "solid", -#' id = "my_color_swatch_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the color_swatch icon" -#' ) -#' @return Render an svg icon of a color_swatch -#' @keywords rheroicons color_swatch -icons$color_swatch <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_color_swatch", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 21a4 4 0 01-4-4V5a2 2 0 012-2h4a2 2 0 012 2v12a4 4 0 01-4 4zm0 0h12a2 2 0 002-2v-4a2 2 0 00-2-2h-2.343M11 7.343l1.657-1.657a2 2 0 012.828 0l2.829 2.829a2 2 0 010 2.828l-8.486 8.485M7 17h.01")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_color_swatch", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 2a2 2 0 00-2 2v11a3 3 0 106 0V4a2 2 0 00-2-2H4zm1 14a1 1 0 100-2 1 1 0 000 2zm5-1.757l4.9-4.9a2 2 0 000-2.828L13.485 5.1a2 2 0 00-2.828 0L10 5.757v8.486zM16 18H9.071l6-6H16a2 2 0 012 2v2a2 2 0 01-2 2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' credit_card -#' @name credit_card -#' @description Render an svg icon of a credit_card -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$credit_card( -#' type = "solid", -#' id = "my_credit_card_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the credit_card icon" -#' ) -#' @return Render an svg icon of a credit_card -#' @keywords rheroicons credit_card -icons$credit_card <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_credit_card", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 10h18M7 15h1m4 0h1m-7 4h12a3 3 0 003-3V8a3 3 0 00-3-3H6a3 3 0 00-3 3v8a3 3 0 003 3z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_credit_card", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M4 4a2 2 0 00-2 2v1h16V6a2 2 0 00-2-2H4z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M18 9H2v5a2 2 0 002 2h12a2 2 0 002-2V9zM4 13a1 1 0 011-1h1a1 1 0 110 2H5a1 1 0 01-1-1zm5-1a1 1 0 100 2h1a1 1 0 100-2H9z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cube_transparent -#' @name cube_transparent -#' @description Render an svg icon of a cube_transparent -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cube_transparent( -#' type = "solid", -#' id = "my_cube_transparent_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cube_transparent icon" -#' ) -#' @return Render an svg icon of a cube_transparent -#' @keywords rheroicons cube_transparent -icons$cube_transparent <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cube_transparent", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M14 10l-2 1m0 0l-2-1m2 1v2.5M20 7l-2 1m2-1l-2-1m2 1v2.5M14 4l-2-1-2 1M4 7l2-1M4 7l2 1M4 7v2.5M12 21l-2-1m2 1l2-1m-2 1v-2.5M6 18l-2-1v-2.5M18 18l2-1v-2.5")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cube_transparent", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M9.504 1.132a1 1 0 01.992 0l1.75 1a1 1 0 11-.992 1.736L10 3.152l-1.254.716a1 1 0 11-.992-1.736l1.75-1zM5.618 4.504a1 1 0 01-.372 1.364L5.016 6l.23.132a1 1 0 11-.992 1.736L4 7.723V8a1 1 0 01-2 0V6a.996.996 0 01.52-.878l1.734-.99a1 1 0 011.364.372zm8.764 0a1 1 0 011.364-.372l1.733.99A1.002 1.002 0 0118 6v2a1 1 0 11-2 0v-.277l-.254.145a1 1 0 11-.992-1.736l.23-.132-.23-.132a1 1 0 01-.372-1.364zm-7 4a1 1 0 011.364-.372L10 8.848l1.254-.716a1 1 0 11.992 1.736L11 10.58V12a1 1 0 11-2 0v-1.42l-1.246-.712a1 1 0 01-.372-1.364zM3 11a1 1 0 011 1v1.42l1.246.712a1 1 0 11-.992 1.736l-1.75-1A1 1 0 012 14v-2a1 1 0 011-1zm14 0a1 1 0 011 1v2a1 1 0 01-.504.868l-1.75 1a1 1 0 11-.992-1.736L16 13.42V12a1 1 0 011-1zm-9.618 5.504a1 1 0 011.364-.372l.254.145V16a1 1 0 112 0v.277l.254-.145a1 1 0 11.992 1.736l-1.735.992a.995.995 0 01-1.022 0l-1.735-.992a1 1 0 01-.372-1.364z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cube -#' @name cube -#' @description Render an svg icon of a cube -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cube( -#' type = "solid", -#' id = "my_cube_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cube icon" -#' ) -#' @return Render an svg icon of a cube -#' @keywords rheroicons cube -icons$cube <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cube", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M20 7l-8-4-8 4m16 0l-8 4m8-4v10l-8 4m0-10L4 7m8 4v10M4 7v10l8 4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cube", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M11 17a1 1 0 001.447.894l4-2A1 1 0 0017 15V9.236a1 1 0 00-1.447-.894l-4 2a1 1 0 00-.553.894V17zM15.211 6.276a1 1 0 000-1.788l-4.764-2.382a1 1 0 00-.894 0L4.789 4.488a1 1 0 000 1.788l4.764 2.382a1 1 0 00.894 0l4.764-2.382zM4.447 8.342A1 1 0 003 9.236V15a1 1 0 00.553.894l4 2A1 1 0 009 17v-5.764a1 1 0 00-.553-.894l-4-2z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' currency_bangladeshi -#' @name currency_bangladeshi -#' @description Render an svg icon of a currency_bangladeshi -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$currency_bangladeshi( -#' type = "solid", -#' id = "my_currency_bangladeshi_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the currency_bangladeshi icon" -#' ) -#' @return Render an svg icon of a currency_bangladeshi -#' @keywords rheroicons currency_bangladeshi -icons$currency_bangladeshi <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_currency_bangladeshi", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 11V9a2 2 0 00-2-2m2 4v4a2 2 0 104 0v-1m-4-3H9m2 0h4m6 1a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_currency_bangladeshi", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM7 4a1 1 0 000 2 1 1 0 011 1v1H7a1 1 0 000 2h1v3a3 3 0 106 0v-1a1 1 0 10-2 0v1a1 1 0 11-2 0v-3h3a1 1 0 100-2h-3V7a3 3 0 00-3-3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' currency_dollar -#' @name currency_dollar -#' @description Render an svg icon of a currency_dollar -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$currency_dollar( -#' type = "solid", -#' id = "my_currency_dollar_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the currency_dollar icon" -#' ) -#' @return Render an svg icon of a currency_dollar -#' @keywords rheroicons currency_dollar -icons$currency_dollar <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_currency_dollar", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 8c-1.657 0-3 .895-3 2s1.343 2 3 2 3 .895 3 2-1.343 2-3 2m0-8c1.11 0 2.08.402 2.599 1M12 8V7m0 1v8m0 0v1m0-1c-1.11 0-2.08-.402-2.599-1M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_currency_dollar", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8.433 7.418c.155-.103.346-.196.567-.267v1.698a2.305 2.305 0 01-.567-.267C8.07 8.34 8 8.114 8 8c0-.114.07-.34.433-.582zM11 12.849v-1.698c.22.071.412.164.567.267.364.243.433.468.433.582 0 .114-.07.34-.433.582a2.305 2.305 0 01-.567.267z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M10 18a8 8 0 100-16 8 8 0 000 16zm1-13a1 1 0 10-2 0v.092a4.535 4.535 0 00-1.676.662C6.602 6.234 6 7.009 6 8c0 .99.602 1.765 1.324 2.246.48.32 1.054.545 1.676.662v1.941c-.391-.127-.68-.317-.843-.504a1 1 0 10-1.51 1.31c.562.649 1.413 1.076 2.353 1.253V15a1 1 0 102 0v-.092a4.535 4.535 0 001.676-.662C13.398 13.766 14 12.991 14 12c0-.99-.602-1.765-1.324-2.246A4.535 4.535 0 0011 9.092V7.151c.391.127.68.317.843.504a1 1 0 101.511-1.31c-.563-.649-1.413-1.076-2.354-1.253V5z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' currency_euro -#' @name currency_euro -#' @description Render an svg icon of a currency_euro -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$currency_euro( -#' type = "solid", -#' id = "my_currency_euro_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the currency_euro icon" -#' ) -#' @return Render an svg icon of a currency_euro -#' @keywords rheroicons currency_euro -icons$currency_euro <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_currency_euro", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M14.121 15.536c-1.171 1.952-3.07 1.952-4.242 0-1.172-1.953-1.172-5.119 0-7.072 1.171-1.952 3.07-1.952 4.242 0M8 10.5h4m-4 3h4m9-1.5a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_currency_euro", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM8.736 6.979C9.208 6.193 9.696 6 10 6c.304 0 .792.193 1.264.979a1 1 0 001.715-1.029C12.279 4.784 11.232 4 10 4s-2.279.784-2.979 1.95c-.285.475-.507 1-.67 1.55H6a1 1 0 000 2h.013a9.358 9.358 0 000 1H6a1 1 0 100 2h.351c.163.55.385 1.075.67 1.55C7.721 15.216 8.768 16 10 16s2.279-.784 2.979-1.95a1 1 0 10-1.715-1.029c-.472.786-.96.979-1.264.979-.304 0-.792-.193-1.264-.979a4.265 4.265 0 01-.264-.521H10a1 1 0 100-2H8.017a7.36 7.36 0 010-1H10a1 1 0 100-2H8.472c.08-.185.167-.36.264-.521z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' currency_pound -#' @name currency_pound -#' @description Render an svg icon of a currency_pound -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$currency_pound( -#' type = "solid", -#' id = "my_currency_pound_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the currency_pound icon" -#' ) -#' @return Render an svg icon of a currency_pound -#' @keywords rheroicons currency_pound -icons$currency_pound <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_currency_pound", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 9a2 2 0 10-4 0v5a2 2 0 01-2 2h6m-6-4h4m8 0a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_currency_pound", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm1-14a3 3 0 00-3 3v2H7a1 1 0 000 2h1v1a1 1 0 01-1 1 1 1 0 100 2h6a1 1 0 100-2H9.83c.11-.313.17-.65.17-1v-1h1a1 1 0 100-2h-1V7a1 1 0 112 0 1 1 0 102 0 3 3 0 00-3-3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' currency_rupee -#' @name currency_rupee -#' @description Render an svg icon of a currency_rupee -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$currency_rupee( -#' type = "solid", -#' id = "my_currency_rupee_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the currency_rupee icon" -#' ) -#' @return Render an svg icon of a currency_rupee -#' @keywords rheroicons currency_rupee -icons$currency_rupee <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_currency_rupee", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 8h6m-5 0a3 3 0 110 6H9l3 3m-3-6h6m6 1a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_currency_rupee", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM7 5a1 1 0 100 2h1a2 2 0 011.732 1H7a1 1 0 100 2h2.732A2 2 0 018 11H7a1 1 0 00-.707 1.707l3 3a1 1 0 001.414-1.414l-1.483-1.484A4.008 4.008 0 0011.874 10H13a1 1 0 100-2h-1.126a3.976 3.976 0 00-.41-1H13a1 1 0 100-2H7z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' currency_yen -#' @name currency_yen -#' @description Render an svg icon of a currency_yen -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$currency_yen( -#' type = "solid", -#' id = "my_currency_yen_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the currency_yen icon" -#' ) -#' @return Render an svg icon of a currency_yen -#' @keywords rheroicons currency_yen -icons$currency_yen <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_currency_yen", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 8l3 5m0 0l3-5m-3 5v4m-3-5h6m-6 3h6m6-3a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_currency_yen", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM7.858 5.485a1 1 0 00-1.715 1.03L7.633 9H7a1 1 0 100 2h1.834l.166.277V12H7a1 1 0 100 2h2v1a1 1 0 102 0v-1h2a1 1 0 100-2h-2v-.723l.166-.277H13a1 1 0 100-2h-.634l1.492-2.486a1 1 0 10-1.716-1.029L10.034 9h-.068L7.858 5.485z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' cursor_click -#' @name cursor_click -#' @description Render an svg icon of a cursor_click -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$cursor_click( -#' type = "solid", -#' id = "my_cursor_click_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the cursor_click icon" -#' ) -#' @return Render an svg icon of a cursor_click -#' @keywords rheroicons cursor_click -icons$cursor_click <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_cursor_click", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 15l-2 5L9 9l11 4-5 2zm0 0l5 5M7.188 2.239l.777 2.897M5.136 7.965l-2.898-.777M13.95 4.05l-2.122 2.122m-5.657 5.656l-2.12 2.122")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_cursor_click", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6.672 1.911a1 1 0 10-1.932.518l.259.966a1 1 0 001.932-.518l-.26-.966zM2.429 4.74a1 1 0 10-.517 1.932l.966.259a1 1 0 00.517-1.932l-.966-.26zm8.814-.569a1 1 0 00-1.415-1.414l-.707.707a1 1 0 101.415 1.415l.707-.708zm-7.071 7.072l.707-.707A1 1 0 003.465 9.12l-.708.707a1 1 0 001.415 1.415zm3.2-5.171a1 1 0 00-1.3 1.3l4 10a1 1 0 001.823.075l1.38-2.759 3.018 3.02a1 1 0 001.414-1.415l-3.019-3.02 2.76-1.379a1 1 0 00-.076-1.822l-10-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' database -#' @name database -#' @description Render an svg icon of a database -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$database( -#' type = "solid", -#' id = "my_database_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the database icon" -#' ) -#' @return Render an svg icon of a database -#' @keywords rheroicons database -icons$database <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_database", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 7v10c0 2.21 3.582 4 8 4s8-1.79 8-4V7M4 7c0 2.21 3.582 4 8 4s8-1.79 8-4M4 7c0-2.21 3.582-4 8-4s8 1.79 8 4m0 5c0 2.21-3.582 4-8 4s-8-1.79-8-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_database", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M3 12v3c0 1.657 3.134 3 7 3s7-1.343 7-3v-3c0 1.657-3.134 3-7 3s-7-1.343-7-3z")), - htmltools::tag(`_tag_name` = "path", list(d = "M3 7v3c0 1.657 3.134 3 7 3s7-1.343 7-3V7c0 1.657-3.134 3-7 3S3 8.657 3 7z")), - htmltools::tag(`_tag_name` = "path", list(d = "M17 5c0 1.657-3.134 3-7 3S3 6.657 3 5s3.134-3 7-3 7 1.343 7 3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' desktop_computer -#' @name desktop_computer -#' @description Render an svg icon of a desktop_computer -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$desktop_computer( -#' type = "solid", -#' id = "my_desktop_computer_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the desktop_computer icon" -#' ) -#' @return Render an svg icon of a desktop_computer -#' @keywords rheroicons desktop_computer -icons$desktop_computer <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_desktop_computer", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9.75 17L9 20l-1 1h8l-1-1-.75-3M3 13h18M5 17h14a2 2 0 002-2V5a2 2 0 00-2-2H5a2 2 0 00-2 2v10a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_desktop_computer", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 5a2 2 0 012-2h10a2 2 0 012 2v8a2 2 0 01-2 2h-2.22l.123.489.804.804A1 1 0 0113 18H7a1 1 0 01-.707-1.707l.804-.804L7.22 15H5a2 2 0 01-2-2V5zm5.771 7H5V5h10v7H8.771z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' device_mobile -#' @name device_mobile -#' @description Render an svg icon of a device_mobile -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$device_mobile( -#' type = "solid", -#' id = "my_device_mobile_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the device_mobile icon" -#' ) -#' @return Render an svg icon of a device_mobile -#' @keywords rheroicons device_mobile -icons$device_mobile <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_device_mobile", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 18h.01M8 21h8a2 2 0 002-2V5a2 2 0 00-2-2H8a2 2 0 00-2 2v14a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_device_mobile", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M7 2a2 2 0 00-2 2v12a2 2 0 002 2h6a2 2 0 002-2V4a2 2 0 00-2-2H7zm3 14a1 1 0 100-2 1 1 0 000 2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' device_tablet -#' @name device_tablet -#' @description Render an svg icon of a device_tablet -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$device_tablet( -#' type = "solid", -#' id = "my_device_tablet_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the device_tablet icon" -#' ) -#' @return Render an svg icon of a device_tablet -#' @keywords rheroicons device_tablet -icons$device_tablet <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_device_tablet", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 18h.01M7 21h10a2 2 0 002-2V5a2 2 0 00-2-2H7a2 2 0 00-2 2v14a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_device_tablet", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 2a2 2 0 00-2 2v12a2 2 0 002 2h8a2 2 0 002-2V4a2 2 0 00-2-2H6zm4 14a1 1 0 100-2 1 1 0 000 2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document_add -#' @name document_add -#' @description Render an svg icon of a document_add -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document_add( -#' type = "solid", -#' id = "my_document_add_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document_add icon" -#' ) -#' @return Render an svg icon of a document_add -#' @keywords rheroicons document_add -icons$document_add <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document_add", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 13h6m-3-3v6m5 5H7a2 2 0 01-2-2V5a2 2 0 012-2h5.586a1 1 0 01.707.293l5.414 5.414a1 1 0 01.293.707V19a2 2 0 01-2 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document_add", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 2a2 2 0 00-2 2v12a2 2 0 002 2h8a2 2 0 002-2V7.414A2 2 0 0015.414 6L12 2.586A2 2 0 0010.586 2H6zm5 6a1 1 0 10-2 0v2H7a1 1 0 100 2h2v2a1 1 0 102 0v-2h2a1 1 0 100-2h-2V8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document_download -#' @name document_download -#' @description Render an svg icon of a document_download -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document_download( -#' type = "solid", -#' id = "my_document_download_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document_download icon" -#' ) -#' @return Render an svg icon of a document_download -#' @keywords rheroicons document_download -icons$document_download <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document_download", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 10v6m0 0l-3-3m3 3l3-3m2 8H7a2 2 0 01-2-2V5a2 2 0 012-2h5.586a1 1 0 01.707.293l5.414 5.414a1 1 0 01.293.707V19a2 2 0 01-2 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document_download", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 2a2 2 0 00-2 2v12a2 2 0 002 2h8a2 2 0 002-2V7.414A2 2 0 0015.414 6L12 2.586A2 2 0 0010.586 2H6zm5 6a1 1 0 10-2 0v3.586l-1.293-1.293a1 1 0 10-1.414 1.414l3 3a1 1 0 001.414 0l3-3a1 1 0 00-1.414-1.414L11 11.586V8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document_duplicate -#' @name document_duplicate -#' @description Render an svg icon of a document_duplicate -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document_duplicate( -#' type = "solid", -#' id = "my_document_duplicate_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document_duplicate icon" -#' ) -#' @return Render an svg icon of a document_duplicate -#' @keywords rheroicons document_duplicate -icons$document_duplicate <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document_duplicate", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 7v8a2 2 0 002 2h6M8 7V5a2 2 0 012-2h4.586a1 1 0 01.707.293l4.414 4.414a1 1 0 01.293.707V15a2 2 0 01-2 2h-2M8 7H6a2 2 0 00-2 2v10a2 2 0 002 2h8a2 2 0 002-2v-2")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document_duplicate", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9 2a2 2 0 00-2 2v8a2 2 0 002 2h6a2 2 0 002-2V6.414A2 2 0 0016.414 5L14 2.586A2 2 0 0012.586 2H9z")), - htmltools::tag(`_tag_name` = "path", list(d = "M3 8a2 2 0 012-2v10h8a2 2 0 01-2 2H5a2 2 0 01-2-2V8z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document_remove -#' @name document_remove -#' @description Render an svg icon of a document_remove -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document_remove( -#' type = "solid", -#' id = "my_document_remove_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document_remove icon" -#' ) -#' @return Render an svg icon of a document_remove -#' @keywords rheroicons document_remove -icons$document_remove <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document_remove", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 13h6m2 8H7a2 2 0 01-2-2V5a2 2 0 012-2h5.586a1 1 0 01.707.293l5.414 5.414a1 1 0 01.293.707V19a2 2 0 01-2 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document_remove", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 2a2 2 0 00-2 2v12a2 2 0 002 2h8a2 2 0 002-2V7.414A2 2 0 0015.414 6L12 2.586A2 2 0 0010.586 2H6zm1 8a1 1 0 100 2h6a1 1 0 100-2H7z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document_report -#' @name document_report -#' @description Render an svg icon of a document_report -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document_report( -#' type = "solid", -#' id = "my_document_report_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document_report icon" -#' ) -#' @return Render an svg icon of a document_report -#' @keywords rheroicons document_report -icons$document_report <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document_report", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 17v-2m3 2v-4m3 4v-6m2 10H7a2 2 0 01-2-2V5a2 2 0 012-2h5.586a1 1 0 01.707.293l5.414 5.414a1 1 0 01.293.707V19a2 2 0 01-2 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document_report", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6 2a2 2 0 00-2 2v12a2 2 0 002 2h8a2 2 0 002-2V7.414A2 2 0 0015.414 6L12 2.586A2 2 0 0010.586 2H6zm2 10a1 1 0 10-2 0v3a1 1 0 102 0v-3zm2-3a1 1 0 011 1v5a1 1 0 11-2 0v-5a1 1 0 011-1zm4-1a1 1 0 10-2 0v7a1 1 0 102 0V8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document_search -#' @name document_search -#' @description Render an svg icon of a document_search -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document_search( -#' type = "solid", -#' id = "my_document_search_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document_search icon" -#' ) -#' @return Render an svg icon of a document_search -#' @keywords rheroicons document_search -icons$document_search <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document_search", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 21h7a2 2 0 002-2V9.414a1 1 0 00-.293-.707l-5.414-5.414A1 1 0 0012.586 3H7a2 2 0 00-2 2v11m0 5l4.879-4.879m0 0a3 3 0 104.243-4.242 3 3 0 00-4.243 4.242z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document_search", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M4 4a2 2 0 012-2h4.586A2 2 0 0112 2.586L15.414 6A2 2 0 0116 7.414V16a2 2 0 01-2 2h-1.528A6 6 0 004 9.528V4z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M8 10a4 4 0 00-3.446 6.032l-1.261 1.26a1 1 0 101.414 1.415l1.261-1.261A4 4 0 108 10zm-2 4a2 2 0 114 0 2 2 0 01-4 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document_text -#' @name document_text -#' @description Render an svg icon of a document_text -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document_text( -#' type = "solid", -#' id = "my_document_text_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document_text icon" -#' ) -#' @return Render an svg icon of a document_text -#' @keywords rheroicons document_text -icons$document_text <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document_text", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 12h6m-6 4h6m2 5H7a2 2 0 01-2-2V5a2 2 0 012-2h5.586a1 1 0 01.707.293l5.414 5.414a1 1 0 01.293.707V19a2 2 0 01-2 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document_text", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 4a2 2 0 012-2h4.586A2 2 0 0112 2.586L15.414 6A2 2 0 0116 7.414V16a2 2 0 01-2 2H6a2 2 0 01-2-2V4zm2 6a1 1 0 011-1h6a1 1 0 110 2H7a1 1 0 01-1-1zm1 3a1 1 0 100 2h6a1 1 0 100-2H7z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' document -#' @name document -#' @description Render an svg icon of a document -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$document( -#' type = "solid", -#' id = "my_document_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the document icon" -#' ) -#' @return Render an svg icon of a document -#' @keywords rheroicons document -icons$document <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_document", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 21h10a2 2 0 002-2V9.414a1 1 0 00-.293-.707l-5.414-5.414A1 1 0 0012.586 3H7a2 2 0 00-2 2v14a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_document", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 4a2 2 0 012-2h4.586A2 2 0 0112 2.586L15.414 6A2 2 0 0116 7.414V16a2 2 0 01-2 2H6a2 2 0 01-2-2V4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' dots_circle_horizontal -#' @name dots_circle_horizontal -#' @description Render an svg icon of a dots_circle_horizontal -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$dots_circle_horizontal( -#' type = "solid", -#' id = "my_dots_circle_horizontal_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the dots_circle_horizontal icon" -#' ) -#' @return Render an svg icon of a dots_circle_horizontal -#' @keywords rheroicons dots_circle_horizontal -icons$dots_circle_horizontal <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_dots_circle_horizontal", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 12h.01M12 12h.01M16 12h.01M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_dots_circle_horizontal", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM7 9H5v2h2V9zm8 0h-2v2h2V9zM9 9h2v2H9V9z", `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' dots_horizontal -#' @name dots_horizontal -#' @description Render an svg icon of a dots_horizontal -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$dots_horizontal( -#' type = "solid", -#' id = "my_dots_horizontal_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the dots_horizontal icon" -#' ) -#' @return Render an svg icon of a dots_horizontal -#' @keywords rheroicons dots_horizontal -icons$dots_horizontal <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_dots_horizontal", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 12h.01M12 12h.01M19 12h.01M6 12a1 1 0 11-2 0 1 1 0 012 0zm7 0a1 1 0 11-2 0 1 1 0 012 0zm7 0a1 1 0 11-2 0 1 1 0 012 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_dots_horizontal", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M6 10a2 2 0 11-4 0 2 2 0 014 0zM12 10a2 2 0 11-4 0 2 2 0 014 0zM16 12a2 2 0 100-4 2 2 0 000 4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' dots_vertical -#' @name dots_vertical -#' @description Render an svg icon of a dots_vertical -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$dots_vertical( -#' type = "solid", -#' id = "my_dots_vertical_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the dots_vertical icon" -#' ) -#' @return Render an svg icon of a dots_vertical -#' @keywords rheroicons dots_vertical -icons$dots_vertical <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_dots_vertical", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 5v.01M12 12v.01M12 19v.01M12 6a1 1 0 110-2 1 1 0 010 2zm0 7a1 1 0 110-2 1 1 0 010 2zm0 7a1 1 0 110-2 1 1 0 010 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_dots_vertical", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10 6a2 2 0 110-4 2 2 0 010 4zM10 12a2 2 0 110-4 2 2 0 010 4zM10 18a2 2 0 110-4 2 2 0 010 4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' download -#' @name download -#' @description Render an svg icon of a download -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$download( -#' type = "solid", -#' id = "my_download_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the download icon" -#' ) -#' @return Render an svg icon of a download -#' @keywords rheroicons download -icons$download <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_download", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 16v1a3 3 0 003 3h10a3 3 0 003-3v-1m-4-4l-4 4m0 0l-4-4m4 4V4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_download", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 17a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zm3.293-7.707a1 1 0 011.414 0L9 10.586V3a1 1 0 112 0v7.586l1.293-1.293a1 1 0 111.414 1.414l-3 3a1 1 0 01-1.414 0l-3-3a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' duplicate -#' @name duplicate -#' @description Render an svg icon of a duplicate -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$duplicate( -#' type = "solid", -#' id = "my_duplicate_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the duplicate icon" -#' ) -#' @return Render an svg icon of a duplicate -#' @keywords rheroicons duplicate -icons$duplicate <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_duplicate", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 16H6a2 2 0 01-2-2V6a2 2 0 012-2h8a2 2 0 012 2v2m-6 12h8a2 2 0 002-2v-8a2 2 0 00-2-2h-8a2 2 0 00-2 2v8a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_duplicate", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M7 9a2 2 0 012-2h6a2 2 0 012 2v6a2 2 0 01-2 2H9a2 2 0 01-2-2V9z")), - htmltools::tag(`_tag_name` = "path", list(d = "M5 3a2 2 0 00-2 2v6a2 2 0 002 2V5h8a2 2 0 00-2-2H5z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' emoji_happy -#' @name emoji_happy -#' @description Render an svg icon of a emoji_happy -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$emoji_happy( -#' type = "solid", -#' id = "my_emoji_happy_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the emoji_happy icon" -#' ) -#' @return Render an svg icon of a emoji_happy -#' @keywords rheroicons emoji_happy -icons$emoji_happy <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_emoji_happy", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M14.828 14.828a4 4 0 01-5.656 0M9 10h.01M15 10h.01M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_emoji_happy", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM7 9a1 1 0 100-2 1 1 0 000 2zm7-1a1 1 0 11-2 0 1 1 0 012 0zm-.464 5.535a1 1 0 10-1.415-1.414 3 3 0 01-4.242 0 1 1 0 00-1.415 1.414 5 5 0 007.072 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' emoji_sad -#' @name emoji_sad -#' @description Render an svg icon of a emoji_sad -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$emoji_sad( -#' type = "solid", -#' id = "my_emoji_sad_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the emoji_sad icon" -#' ) -#' @return Render an svg icon of a emoji_sad -#' @keywords rheroicons emoji_sad -icons$emoji_sad <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_emoji_sad", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9.172 16.172a4 4 0 015.656 0M9 10h.01M15 10h.01M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_emoji_sad", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM7 9a1 1 0 100-2 1 1 0 000 2zm7-1a1 1 0 11-2 0 1 1 0 012 0zm-7.536 5.879a1 1 0 001.415 0 3 3 0 014.242 0 1 1 0 001.415-1.415 5 5 0 00-7.072 0 1 1 0 000 1.415z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' exclamation_circle -#' @name exclamation_circle -#' @description Render an svg icon of a exclamation_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$exclamation_circle( -#' type = "solid", -#' id = "my_exclamation_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the exclamation_circle icon" -#' ) -#' @return Render an svg icon of a exclamation_circle -#' @keywords rheroicons exclamation_circle -icons$exclamation_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_exclamation_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 8v4m0 4h.01M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_exclamation_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 10a8 8 0 11-16 0 8 8 0 0116 0zm-7 4a1 1 0 11-2 0 1 1 0 012 0zm-1-9a1 1 0 00-1 1v4a1 1 0 102 0V6a1 1 0 00-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' exclamation -#' @name exclamation -#' @description Render an svg icon of a exclamation -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$exclamation( -#' type = "solid", -#' id = "my_exclamation_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the exclamation icon" -#' ) -#' @return Render an svg icon of a exclamation -#' @keywords rheroicons exclamation -icons$exclamation <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_exclamation", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 9v2m0 4h.01m-6.938 4h13.856c1.54 0 2.502-1.667 1.732-3L13.732 4c-.77-1.333-2.694-1.333-3.464 0L3.34 16c-.77 1.333.192 3 1.732 3z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_exclamation", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M8.257 3.099c.765-1.36 2.722-1.36 3.486 0l5.58 9.92c.75 1.334-.213 2.98-1.742 2.98H4.42c-1.53 0-2.493-1.646-1.743-2.98l5.58-9.92zM11 13a1 1 0 11-2 0 1 1 0 012 0zm-1-8a1 1 0 00-1 1v3a1 1 0 002 0V6a1 1 0 00-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' external_link -#' @name external_link -#' @description Render an svg icon of a external_link -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$external_link( -#' type = "solid", -#' id = "my_external_link_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the external_link icon" -#' ) -#' @return Render an svg icon of a external_link -#' @keywords rheroicons external_link -icons$external_link <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_external_link", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 6H6a2 2 0 00-2 2v10a2 2 0 002 2h10a2 2 0 002-2v-4M14 4h6m0 0v6m0-6L10 14")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_external_link", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M11 3a1 1 0 100 2h2.586l-6.293 6.293a1 1 0 101.414 1.414L15 6.414V9a1 1 0 102 0V4a1 1 0 00-1-1h-5z")), - htmltools::tag(`_tag_name` = "path", list(d = "M5 5a2 2 0 00-2 2v8a2 2 0 002 2h8a2 2 0 002-2v-3a1 1 0 10-2 0v3H5V7h3a1 1 0 000-2H5z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' eye_off -#' @name eye_off -#' @description Render an svg icon of a eye_off -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$eye_off( -#' type = "solid", -#' id = "my_eye_off_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the eye_off icon" -#' ) -#' @return Render an svg icon of a eye_off -#' @keywords rheroicons eye_off -icons$eye_off <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_eye_off", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13.875 18.825A10.05 10.05 0 0112 19c-4.478 0-8.268-2.943-9.543-7a9.97 9.97 0 011.563-3.029m5.858.908a3 3 0 114.243 4.243M9.878 9.878l4.242 4.242M9.88 9.88l-3.29-3.29m7.532 7.532l3.29 3.29M3 3l3.59 3.59m0 0A9.953 9.953 0 0112 5c4.478 0 8.268 2.943 9.543 7a10.025 10.025 0 01-4.132 5.411m0 0L21 21")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_eye_off", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3.707 2.293a1 1 0 00-1.414 1.414l14 14a1 1 0 001.414-1.414l-1.473-1.473A10.014 10.014 0 0019.542 10C18.268 5.943 14.478 3 10 3a9.958 9.958 0 00-4.512 1.074l-1.78-1.781zm4.261 4.26l1.514 1.515a2.003 2.003 0 012.45 2.45l1.514 1.514a4 4 0 00-5.478-5.478z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(d = "M12.454 16.697L9.75 13.992a4 4 0 01-3.742-3.741L2.335 6.578A9.98 9.98 0 00.458 10c1.274 4.057 5.065 7 9.542 7 .847 0 1.669-.105 2.454-.303z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' eye -#' @name eye -#' @description Render an svg icon of a eye -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$eye( -#' type = "solid", -#' id = "my_eye_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the eye icon" -#' ) -#' @return Render an svg icon of a eye -#' @keywords rheroicons eye -icons$eye <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_eye", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 12a3 3 0 11-6 0 3 3 0 016 0z")), htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M2.458 12C3.732 7.943 7.523 5 12 5c4.478 0 8.268 2.943 9.542 7-1.274 4.057-5.064 7-9.542 7-4.477 0-8.268-2.943-9.542-7z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_eye", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10 12a2 2 0 100-4 2 2 0 000 4z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M.458 10C1.732 5.943 5.522 3 10 3s8.268 2.943 9.542 7c-1.274 4.057-5.064 7-9.542 7S1.732 14.057.458 10zM14 10a4 4 0 11-8 0 4 4 0 018 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' fast_forward -#' @name fast_forward -#' @description Render an svg icon of a fast_forward -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$fast_forward( -#' type = "solid", -#' id = "my_fast_forward_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the fast_forward icon" -#' ) -#' @return Render an svg icon of a fast_forward -#' @keywords rheroicons fast_forward -icons$fast_forward <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_fast_forward", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11.933 12.8a1 1 0 000-1.6L6.6 7.2A1 1 0 005 8v8a1 1 0 001.6.8l5.333-4zM19.933 12.8a1 1 0 000-1.6l-5.333-4A1 1 0 0013 8v8a1 1 0 001.6.8l5.333-4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_fast_forward", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M4.555 5.168A1 1 0 003 6v8a1 1 0 001.555.832L10 11.202V14a1 1 0 001.555.832l6-4a1 1 0 000-1.664l-6-4A1 1 0 0010 6v2.798l-5.445-3.63z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' film -#' @name film -#' @description Render an svg icon of a film -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$film( -#' type = "solid", -#' id = "my_film_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the film icon" -#' ) -#' @return Render an svg icon of a film -#' @keywords rheroicons film -icons$film <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_film", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 4v16M17 4v16M3 8h4m10 0h4M3 12h18M3 16h4m10 0h4M4 20h16a1 1 0 001-1V5a1 1 0 00-1-1H4a1 1 0 00-1 1v14a1 1 0 001 1z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_film", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 3a2 2 0 00-2 2v10a2 2 0 002 2h12a2 2 0 002-2V5a2 2 0 00-2-2H4zm3 2h6v4H7V5zm8 8v2h1v-2h-1zm-2-2H7v4h6v-4zm2 0h1V9h-1v2zm1-4V5h-1v2h1zM5 5v2H4V5h1zm0 4H4v2h1V9zm-1 4h1v2H4v-2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' filter -#' @name filter -#' @description Render an svg icon of a filter -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$filter( -#' type = "solid", -#' id = "my_filter_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the filter icon" -#' ) -#' @return Render an svg icon of a filter -#' @keywords rheroicons filter -icons$filter <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_filter", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 4a1 1 0 011-1h16a1 1 0 011 1v2.586a1 1 0 01-.293.707l-6.414 6.414a1 1 0 00-.293.707V17l-4 4v-6.586a1 1 0 00-.293-.707L3.293 7.293A1 1 0 013 6.586V4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_filter", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 3a1 1 0 011-1h12a1 1 0 011 1v3a1 1 0 01-.293.707L12 11.414V15a1 1 0 01-.293.707l-2 2A1 1 0 018 17v-5.586L3.293 6.707A1 1 0 013 6V3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' finger_print -#' @name finger_print -#' @description Render an svg icon of a finger_print -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$finger_print( -#' type = "solid", -#' id = "my_finger_print_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the finger_print icon" -#' ) -#' @return Render an svg icon of a finger_print -#' @keywords rheroicons finger_print -icons$finger_print <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_finger_print", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 11c0 3.517-1.009 6.799-2.753 9.571m-3.44-2.04l.054-.09A13.916 13.916 0 008 11a4 4 0 118 0c0 1.017-.07 2.019-.203 3m-2.118 6.844A21.88 21.88 0 0015.171 17m3.839 1.132c.645-2.266.99-4.659.99-7.132A8 8 0 008 4.07M3 15.364c.64-1.319 1-2.8 1-4.364 0-1.457.39-2.823 1.07-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_finger_print", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M6.625 2.655A9 9 0 0119 11a1 1 0 11-2 0 7 7 0 00-9.625-6.492 1 1 0 11-.75-1.853zM4.662 4.959A1 1 0 014.75 6.37 6.97 6.97 0 003 11a1 1 0 11-2 0 8.97 8.97 0 012.25-5.953 1 1 0 011.412-.088z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 11a5 5 0 1110 0 1 1 0 11-2 0 3 3 0 10-6 0c0 1.677-.345 3.276-.968 4.729a1 1 0 11-1.838-.789A9.964 9.964 0 005 11zm8.921 2.012a1 1 0 01.831 1.145 19.86 19.86 0 01-.545 2.436 1 1 0 11-1.92-.558c.207-.713.371-1.445.49-2.192a1 1 0 011.144-.83z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 10a1 1 0 011 1c0 2.236-.46 4.368-1.29 6.304a1 1 0 01-1.838-.789A13.952 13.952 0 009 11a1 1 0 011-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' fire -#' @name fire -#' @description Render an svg icon of a fire -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$fire( -#' type = "solid", -#' id = "my_fire_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the fire icon" -#' ) -#' @return Render an svg icon of a fire -#' @keywords rheroicons fire -icons$fire <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_fire", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17.657 18.657A8 8 0 016.343 7.343S7 9 9 10c0-2 .5-5 2.986-7C14 5 16.09 5.777 17.656 7.343A7.975 7.975 0 0120 13a7.975 7.975 0 01-2.343 5.657z")), - htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", `stroke-linejoin` = "round", - `stroke-width` = "2", d = "M9.879 16.121A3 3 0 1012.015 11L11 14H9c0 .768.293 1.536.879 2.121z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_fire", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12.395 2.553a1 1 0 00-1.45-.385c-.345.23-.614.558-.822.88-.214.33-.403.713-.57 1.116-.334.804-.614 1.768-.84 2.734a31.365 31.365 0 00-.613 3.58 2.64 2.64 0 01-.945-1.067c-.328-.68-.398-1.534-.398-2.654A1 1 0 005.05 6.05 6.981 6.981 0 003 11a7 7 0 1011.95-4.95c-.592-.591-.98-.985-1.348-1.467-.363-.476-.724-1.063-1.207-2.03zM12.12 15.12A3 3 0 017 13s.879.5 2.5.5c0-1 .5-4 1.25-4.5.5 1 .786 1.293 1.371 1.879A2.99 2.99 0 0113 13a2.99 2.99 0 01-.879 2.121z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' flag -#' @name flag -#' @description Render an svg icon of a flag -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$flag( -#' type = "solid", -#' id = "my_flag_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the flag icon" -#' ) -#' @return Render an svg icon of a flag -#' @keywords rheroicons flag -icons$flag <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_flag", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 21v-4m0 0V5a2 2 0 012-2h6.5l1 1H21l-3 6 3 6h-8.5l-1-1H5a2 2 0 00-2 2zm9-13.5V9")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_flag", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 6a3 3 0 013-3h10a1 1 0 01.8 1.6L14.25 8l2.55 3.4A1 1 0 0116 13H6a1 1 0 00-1 1v3a1 1 0 11-2 0V6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' folder_add -#' @name folder_add -#' @description Render an svg icon of a folder_add -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$folder_add( -#' type = "solid", -#' id = "my_folder_add_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the folder_add icon" -#' ) -#' @return Render an svg icon of a folder_add -#' @keywords rheroicons folder_add -icons$folder_add <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_folder_add", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 13h6m-3-3v6m-9 1V7a2 2 0 012-2h6l2 2h6a2 2 0 012 2v8a2 2 0 01-2 2H5a2 2 0 01-2-2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_folder_add", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 6a2 2 0 012-2h5l2 2h5a2 2 0 012 2v6a2 2 0 01-2 2H4a2 2 0 01-2-2V6z")), - htmltools::tag(`_tag_name` = "path", list(stroke = "#fff", `stroke-linecap` = "round", - `stroke-linejoin` = "round", `stroke-width` = "2", d = "M8 11h4m-2-2v4")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' folder_download -#' @name folder_download -#' @description Render an svg icon of a folder_download -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$folder_download( -#' type = "solid", -#' id = "my_folder_download_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the folder_download icon" -#' ) -#' @return Render an svg icon of a folder_download -#' @keywords rheroicons folder_download -icons$folder_download <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_folder_download", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 10v6m0 0l-3-3m3 3l3-3M3 17V7a2 2 0 012-2h6l2 2h6a2 2 0 012 2v8a2 2 0 01-2 2H5a2 2 0 01-2-2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_folder_download", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 6a2 2 0 012-2h5l2 2h5a2 2 0 012 2v6a2 2 0 01-2 2H4a2 2 0 01-2-2V6z")), - htmltools::tag(`_tag_name` = "path", list(stroke = "#fff", `stroke-linecap` = "round", - `stroke-linejoin` = "round", `stroke-width` = "2", d = "M10 9v4m0 0l-2-2m2 2l2-2")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' folder_open -#' @name folder_open -#' @description Render an svg icon of a folder_open -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$folder_open( -#' type = "solid", -#' id = "my_folder_open_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the folder_open icon" -#' ) -#' @return Render an svg icon of a folder_open -#' @keywords rheroicons folder_open -icons$folder_open <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_folder_open", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 19a2 2 0 01-2-2V7a2 2 0 012-2h4l2 2h4a2 2 0 012 2v1M5 19h14a2 2 0 002-2v-5a2 2 0 00-2-2H9a2 2 0 00-2 2v5a2 2 0 01-2 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_folder_open", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M2 6a2 2 0 012-2h4l2 2h4a2 2 0 012 2v1H8a3 3 0 00-3 3v1.5a1.5 1.5 0 01-3 0V6z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(d = "M6 12a2 2 0 012-2h8a2 2 0 012 2v2a2 2 0 01-2 2H2h2a2 2 0 002-2v-2z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' folder_remove -#' @name folder_remove -#' @description Render an svg icon of a folder_remove -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$folder_remove( -#' type = "solid", -#' id = "my_folder_remove_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the folder_remove icon" -#' ) -#' @return Render an svg icon of a folder_remove -#' @keywords rheroicons folder_remove -icons$folder_remove <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_folder_remove", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 13h6M3 17V7a2 2 0 012-2h6l2 2h6a2 2 0 012 2v8a2 2 0 01-2 2H5a2 2 0 01-2-2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_folder_remove", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 6a2 2 0 012-2h5l2 2h5a2 2 0 012 2v6a2 2 0 01-2 2H4a2 2 0 01-2-2V6z")), - htmltools::tag(`_tag_name` = "path", list(stroke = "#fff", `stroke-linecap` = "round", - `stroke-linejoin` = "round", `stroke-width` = "2", d = "M8 11h4")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' folder -#' @name folder -#' @description Render an svg icon of a folder -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$folder( -#' type = "solid", -#' id = "my_folder_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the folder icon" -#' ) -#' @return Render an svg icon of a folder -#' @keywords rheroicons folder -icons$folder <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_folder", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 7v10a2 2 0 002 2h14a2 2 0 002-2V9a2 2 0 00-2-2h-6l-2-2H5a2 2 0 00-2 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_folder", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 6a2 2 0 012-2h5l2 2h5a2 2 0 012 2v6a2 2 0 01-2 2H4a2 2 0 01-2-2V6z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' gift -#' @name gift -#' @description Render an svg icon of a gift -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$gift( -#' type = "solid", -#' id = "my_gift_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the gift icon" -#' ) -#' @return Render an svg icon of a gift -#' @keywords rheroicons gift -icons$gift <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_gift", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 8v13m0-13V6a2 2 0 112 2h-2zm0 0V5.5A2.5 2.5 0 109.5 8H12zm-7 4h14M5 12a2 2 0 110-4h14a2 2 0 110 4M5 12v7a2 2 0 002 2h10a2 2 0 002-2v-7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_gift", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 5a3 3 0 015-2.236A3 3 0 0114.83 6H16a2 2 0 110 4h-5V9a1 1 0 10-2 0v1H4a2 2 0 110-4h1.17C5.06 5.687 5 5.35 5 5zm4 1V5a1 1 0 10-1 1h1zm3 0a1 1 0 10-1-1v1h1z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(d = "M9 11H3v5a2 2 0 002 2h4v-7zM11 18h4a2 2 0 002-2v-5h-6v7z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' globe_alt -#' @name globe_alt -#' @description Render an svg icon of a globe_alt -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$globe_alt( -#' type = "solid", -#' id = "my_globe_alt_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the globe_alt icon" -#' ) -#' @return Render an svg icon of a globe_alt -#' @keywords rheroicons globe_alt -icons$globe_alt <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_globe_alt", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 12a9 9 0 01-9 9m9-9a9 9 0 00-9-9m9 9H3m9 9a9 9 0 01-9-9m9 9c1.657 0 3-4.03 3-9s-1.343-9-3-9m0 18c-1.657 0-3-4.03-3-9s1.343-9 3-9m-9 9a9 9 0 019-9")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_globe_alt", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4.083 9h1.946c.089-1.546.383-2.97.837-4.118A6.004 6.004 0 004.083 9zM10 2a8 8 0 100 16 8 8 0 000-16zm0 2c-.076 0-.232.032-.465.262-.238.234-.497.623-.737 1.182-.389.907-.673 2.142-.766 3.556h3.936c-.093-1.414-.377-2.649-.766-3.556-.24-.56-.5-.948-.737-1.182C10.232 4.032 10.076 4 10 4zm3.971 5c-.089-1.546-.383-2.97-.837-4.118A6.004 6.004 0 0115.917 9h-1.946zm-2.003 2H8.032c.093 1.414.377 2.649.766 3.556.24.56.5.948.737 1.182.233.23.389.262.465.262.076 0 .232-.032.465-.262.238-.234.498-.623.737-1.182.389-.907.673-2.142.766-3.556zm1.166 4.118c.454-1.147.748-2.572.837-4.118h1.946a6.004 6.004 0 01-2.783 4.118zm-6.268 0C6.412 13.97 6.118 12.546 6.03 11H4.083a6.004 6.004 0 002.783 4.118z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' globe -#' @name globe -#' @description Render an svg icon of a globe -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$globe( -#' type = "solid", -#' id = "my_globe_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the globe icon" -#' ) -#' @return Render an svg icon of a globe -#' @keywords rheroicons globe -icons$globe <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_globe", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3.055 11H5a2 2 0 012 2v1a2 2 0 002 2 2 2 0 012 2v2.945M8 3.935V5.5A2.5 2.5 0 0010.5 8h.5a2 2 0 012 2 2 2 0 104 0 2 2 0 012-2h1.064M15 20.488V18a2 2 0 012-2h3.064M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_globe", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM4.332 8.027a6.012 6.012 0 011.912-2.706C6.512 5.73 6.974 6 7.5 6A1.5 1.5 0 019 7.5V8a2 2 0 004 0 2 2 0 011.523-1.943A5.977 5.977 0 0116 10c0 .34-.028.675-.083 1H15a2 2 0 00-2 2v2.197A5.973 5.973 0 0110 16v-2a2 2 0 00-2-2 2 2 0 01-2-2 2 2 0 00-1.668-1.973z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' hand -#' @name hand -#' @description Render an svg icon of a hand -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$hand( -#' type = "solid", -#' id = "my_hand_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the hand icon" -#' ) -#' @return Render an svg icon of a hand -#' @keywords rheroicons hand -icons$hand <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_hand", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 11.5V14m0-2.5v-6a1.5 1.5 0 113 0m-3 6a1.5 1.5 0 00-3 0v2a7.5 7.5 0 0015 0v-5a1.5 1.5 0 00-3 0m-6-3V11m0-5.5v-1a1.5 1.5 0 013 0v1m0 0V11m0-5.5a1.5 1.5 0 013 0v3m0 0V11")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_hand", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M9 3a1 1 0 012 0v5.5a.5.5 0 001 0V4a1 1 0 112 0v4.5a.5.5 0 001 0V6a1 1 0 112 0v5a7 7 0 11-14 0V9a1 1 0 012 0v2.5a.5.5 0 001 0V4a1 1 0 012 0v4.5a.5.5 0 001 0V3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' hashtag -#' @name hashtag -#' @description Render an svg icon of a hashtag -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$hashtag( -#' type = "solid", -#' id = "my_hashtag_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the hashtag icon" -#' ) -#' @return Render an svg icon of a hashtag -#' @keywords rheroicons hashtag -icons$hashtag <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_hashtag", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 20l4-16m2 16l4-16M6 9h14M4 15h14")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_hashtag", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M9.243 3.03a1 1 0 01.727 1.213L9.53 6h2.94l.56-2.243a1 1 0 111.94.486L14.53 6H17a1 1 0 110 2h-2.97l-1 4H15a1 1 0 110 2h-2.47l-.56 2.242a1 1 0 11-1.94-.485L10.47 14H7.53l-.56 2.242a1 1 0 11-1.94-.485L5.47 14H3a1 1 0 110-2h2.97l1-4H5a1 1 0 110-2h2.47l.56-2.243a1 1 0 011.213-.727zM9.03 8l-1 4h2.938l1-4H9.031z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' heart -#' @name heart -#' @description Render an svg icon of a heart -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$heart( -#' type = "solid", -#' id = "my_heart_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the heart icon" -#' ) -#' @return Render an svg icon of a heart -#' @keywords rheroicons heart -icons$heart <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_heart", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4.318 6.318a4.5 4.5 0 000 6.364L12 20.364l7.682-7.682a4.5 4.5 0 00-6.364-6.364L12 7.636l-1.318-1.318a4.5 4.5 0 00-6.364 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_heart", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3.172 5.172a4 4 0 015.656 0L10 6.343l1.172-1.171a4 4 0 115.656 5.656L10 17.657l-6.828-6.829a4 4 0 010-5.656z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' home -#' @name home -#' @description Render an svg icon of a home -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$home( -#' type = "solid", -#' id = "my_home_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the home icon" -#' ) -#' @return Render an svg icon of a home -#' @keywords rheroicons home -icons$home <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_home", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 12l2-2m0 0l7-7 7 7M5 10v10a1 1 0 001 1h3m10-11l2 2m-2-2v10a1 1 0 01-1 1h-3m-6 0a1 1 0 001-1v-4a1 1 0 011-1h2a1 1 0 011 1v4a1 1 0 001 1m-6 0h6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_home", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10.707 2.293a1 1 0 00-1.414 0l-7 7a1 1 0 001.414 1.414L4 10.414V17a1 1 0 001 1h2a1 1 0 001-1v-2a1 1 0 011-1h2a1 1 0 011 1v2a1 1 0 001 1h2a1 1 0 001-1v-6.586l.293.293a1 1 0 001.414-1.414l-7-7z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' identification -#' @name identification -#' @description Render an svg icon of a identification -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$identification( -#' type = "solid", -#' id = "my_identification_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the identification icon" -#' ) -#' @return Render an svg icon of a identification -#' @keywords rheroicons identification -icons$identification <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_identification", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 6H5a2 2 0 00-2 2v9a2 2 0 002 2h14a2 2 0 002-2V8a2 2 0 00-2-2h-5m-4 0V5a2 2 0 114 0v1m-4 0a2 2 0 104 0m-5 8a2 2 0 100-4 2 2 0 000 4zm0 0c1.306 0 2.417.835 2.83 2M9 14a3.001 3.001 0 00-2.83 2M15 11h3m-3 4h2")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_identification", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 2a1 1 0 00-1 1v1a1 1 0 002 0V3a1 1 0 00-1-1zM4 4h3a3 3 0 006 0h3a2 2 0 012 2v9a2 2 0 01-2 2H4a2 2 0 01-2-2V6a2 2 0 012-2zm2.5 7a1.5 1.5 0 100-3 1.5 1.5 0 000 3zm2.45 4a2.5 2.5 0 10-4.9 0h4.9zM12 9a1 1 0 100 2h3a1 1 0 100-2h-3zm-1 4a1 1 0 011-1h2a1 1 0 110 2h-2a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' inbox_in -#' @name inbox_in -#' @description Render an svg icon of a inbox_in -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$inbox_in( -#' type = "solid", -#' id = "my_inbox_in_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the inbox_in icon" -#' ) -#' @return Render an svg icon of a inbox_in -#' @keywords rheroicons inbox_in -icons$inbox_in <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_inbox_in", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 4H6a2 2 0 00-2 2v12a2 2 0 002 2h12a2 2 0 002-2V6a2 2 0 00-2-2h-2m-4-1v8m0 0l3-3m-3 3L9 8m-5 5h2.586a1 1 0 01.707.293l2.414 2.414a1 1 0 00.707.293h3.172a1 1 0 00.707-.293l2.414-2.414a1 1 0 01.707-.293H20")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_inbox_in", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8.707 7.293a1 1 0 00-1.414 1.414l2 2a1 1 0 001.414 0l2-2a1 1 0 00-1.414-1.414L11 7.586V3a1 1 0 10-2 0v4.586l-.293-.293z")), - htmltools::tag(`_tag_name` = "path", list(d = "M3 5a2 2 0 012-2h1a1 1 0 010 2H5v7h2l1 2h4l1-2h2V5h-1a1 1 0 110-2h1a2 2 0 012 2v10a2 2 0 01-2 2H5a2 2 0 01-2-2V5z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' inbox -#' @name inbox -#' @description Render an svg icon of a inbox -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$inbox( -#' type = "solid", -#' id = "my_inbox_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the inbox icon" -#' ) -#' @return Render an svg icon of a inbox -#' @keywords rheroicons inbox -icons$inbox <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_inbox", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M20 13V6a2 2 0 00-2-2H6a2 2 0 00-2 2v7m16 0v5a2 2 0 01-2 2H6a2 2 0 01-2-2v-5m16 0h-2.586a1 1 0 00-.707.293l-2.414 2.414a1 1 0 01-.707.293h-3.172a1 1 0 01-.707-.293l-2.414-2.414A1 1 0 006.586 13H4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_inbox", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 3a2 2 0 00-2 2v10a2 2 0 002 2h10a2 2 0 002-2V5a2 2 0 00-2-2H5zm0 2h10v7h-2l-1 2H8l-1-2H5V5z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' information_circle -#' @name information_circle -#' @description Render an svg icon of a information_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$information_circle( -#' type = "solid", -#' id = "my_information_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the information_circle icon" -#' ) -#' @return Render an svg icon of a information_circle -#' @keywords rheroicons information_circle -icons$information_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_information_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13 16h-1v-4h-1m1-4h.01M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_information_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 10a8 8 0 11-16 0 8 8 0 0116 0zm-7-4a1 1 0 11-2 0 1 1 0 012 0zM9 9a1 1 0 000 2v3a1 1 0 001 1h1a1 1 0 100-2v-3a1 1 0 00-1-1H9z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' key -#' @name key -#' @description Render an svg icon of a key -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$key( -#' type = "solid", -#' id = "my_key_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the key icon" -#' ) -#' @return Render an svg icon of a key -#' @keywords rheroicons key -icons$key <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_key", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 7a2 2 0 012 2m4 0a6 6 0 01-7.743 5.743L11 17H9v2H7v2H4a1 1 0 01-1-1v-2.586a1 1 0 01.293-.707l5.964-5.964A6 6 0 1121 9z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_key", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 8a6 6 0 01-7.743 5.743L10 14l-1 1-1 1H6v2H2v-4l4.257-4.257A6 6 0 1118 8zm-6-4a1 1 0 100 2 2 2 0 012 2 1 1 0 102 0 4 4 0 00-4-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' library -#' @name library -#' @description Render an svg icon of a library -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$library( -#' type = "solid", -#' id = "my_library_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the library icon" -#' ) -#' @return Render an svg icon of a library -#' @keywords rheroicons library -icons$library <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_library", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 14v3m4-3v3m4-3v3M3 21h18M3 10h18M3 7l9-4 9 4M4 10h16v11H4V10z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_library", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10.496 2.132a1 1 0 00-.992 0l-7 4A1 1 0 003 8v7a1 1 0 100 2h14a1 1 0 100-2V8a1 1 0 00.496-1.868l-7-4zM6 9a1 1 0 00-1 1v3a1 1 0 102 0v-3a1 1 0 00-1-1zm3 1a1 1 0 012 0v3a1 1 0 11-2 0v-3zm5-1a1 1 0 00-1 1v3a1 1 0 102 0v-3a1 1 0 00-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' light_bulb -#' @name light_bulb -#' @description Render an svg icon of a light_bulb -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$light_bulb( -#' type = "solid", -#' id = "my_light_bulb_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the light_bulb icon" -#' ) -#' @return Render an svg icon of a light_bulb -#' @keywords rheroicons light_bulb -icons$light_bulb <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_light_bulb", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9.663 17h4.673M12 3v1m6.364 1.636l-.707.707M21 12h-1M4 12H3m3.343-5.657l-.707-.707m2.828 9.9a5 5 0 117.072 0l-.548.547A3.374 3.374 0 0014 18.469V19a2 2 0 11-4 0v-.531c0-.895-.356-1.754-.988-2.386l-.548-.547z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_light_bulb", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M11 3a1 1 0 10-2 0v1a1 1 0 102 0V3zM15.657 5.757a1 1 0 00-1.414-1.414l-.707.707a1 1 0 001.414 1.414l.707-.707zM18 10a1 1 0 01-1 1h-1a1 1 0 110-2h1a1 1 0 011 1zM5.05 6.464A1 1 0 106.464 5.05l-.707-.707a1 1 0 00-1.414 1.414l.707.707zM5 10a1 1 0 01-1 1H3a1 1 0 110-2h1a1 1 0 011 1zM8 16v-1h4v1a2 2 0 11-4 0zM12 14c.015-.34.208-.646.477-.859a4 4 0 10-4.954 0c.27.213.462.519.476.859h4.002z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' lightning_bolt -#' @name lightning_bolt -#' @description Render an svg icon of a lightning_bolt -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$lightning_bolt( -#' type = "solid", -#' id = "my_lightning_bolt_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the lightning_bolt icon" -#' ) -#' @return Render an svg icon of a lightning_bolt -#' @keywords rheroicons lightning_bolt -icons$lightning_bolt <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_lightning_bolt", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13 10V3L4 14h7v7l9-11h-7z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_lightning_bolt", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M11.3 1.046A1 1 0 0112 2v5h4a1 1 0 01.82 1.573l-7 10A1 1 0 018 18v-5H4a1 1 0 01-.82-1.573l7-10a1 1 0 011.12-.38z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' link -#' @name link -#' @description Render an svg icon of a link -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$link( -#' type = "solid", -#' id = "my_link_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the link icon" -#' ) -#' @return Render an svg icon of a link -#' @keywords rheroicons link -icons$link <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_link", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13.828 10.172a4 4 0 00-5.656 0l-4 4a4 4 0 105.656 5.656l1.102-1.101m-.758-4.899a4 4 0 005.656 0l4-4a4 4 0 00-5.656-5.656l-1.1 1.1")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_link", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12.586 4.586a2 2 0 112.828 2.828l-3 3a2 2 0 01-2.828 0 1 1 0 00-1.414 1.414 4 4 0 005.656 0l3-3a4 4 0 00-5.656-5.656l-1.5 1.5a1 1 0 101.414 1.414l1.5-1.5zm-5 5a2 2 0 012.828 0 1 1 0 101.414-1.414 4 4 0 00-5.656 0l-3 3a4 4 0 105.656 5.656l1.5-1.5a1 1 0 10-1.414-1.414l-1.5 1.5a2 2 0 11-2.828-2.828l3-3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' location_marker -#' @name location_marker -#' @description Render an svg icon of a location_marker -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$location_marker( -#' type = "solid", -#' id = "my_location_marker_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the location_marker icon" -#' ) -#' @return Render an svg icon of a location_marker -#' @keywords rheroicons location_marker -icons$location_marker <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_location_marker", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17.657 16.657L13.414 20.9a1.998 1.998 0 01-2.827 0l-4.244-4.243a8 8 0 1111.314 0z")), - htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", `stroke-linejoin` = "round", - `stroke-width` = "2", d = "M15 11a3 3 0 11-6 0 3 3 0 016 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_location_marker", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5.05 4.05a7 7 0 119.9 9.9L10 18.9l-4.95-4.95a7 7 0 010-9.9zM10 11a2 2 0 100-4 2 2 0 000 4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' lock_closed -#' @name lock_closed -#' @description Render an svg icon of a lock_closed -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$lock_closed( -#' type = "solid", -#' id = "my_lock_closed_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the lock_closed icon" -#' ) -#' @return Render an svg icon of a lock_closed -#' @keywords rheroicons lock_closed -icons$lock_closed <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_lock_closed", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 15v2m-6 4h12a2 2 0 002-2v-6a2 2 0 00-2-2H6a2 2 0 00-2 2v6a2 2 0 002 2zm10-10V7a4 4 0 00-8 0v4h8z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_lock_closed", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 9V7a5 5 0 0110 0v2a2 2 0 012 2v5a2 2 0 01-2 2H5a2 2 0 01-2-2v-5a2 2 0 012-2zm8-2v2H7V7a3 3 0 016 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' lock_open -#' @name lock_open -#' @description Render an svg icon of a lock_open -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$lock_open( -#' type = "solid", -#' id = "my_lock_open_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the lock_open icon" -#' ) -#' @return Render an svg icon of a lock_open -#' @keywords rheroicons lock_open -icons$lock_open <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_lock_open", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 11V7a4 4 0 118 0m-4 8v2m-6 4h12a2 2 0 002-2v-6a2 2 0 00-2-2H6a2 2 0 00-2 2v6a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_lock_open", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10 2a5 5 0 00-5 5v2a2 2 0 00-2 2v5a2 2 0 002 2h10a2 2 0 002-2v-5a2 2 0 00-2-2H7V7a3 3 0 015.905-.75 1 1 0 001.937-.5A5.002 5.002 0 0010 2z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' login -#' @name login -#' @description Render an svg icon of a login -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$login( -#' type = "solid", -#' id = "my_login_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the login icon" -#' ) -#' @return Render an svg icon of a login -#' @keywords rheroicons login -icons$login <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_login", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 16l-4-4m0 0l4-4m-4 4h14m-5 4v1a3 3 0 01-3 3H6a3 3 0 01-3-3V7a3 3 0 013-3h7a3 3 0 013 3v1")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_login", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 3a1 1 0 011 1v12a1 1 0 11-2 0V4a1 1 0 011-1zm7.707 3.293a1 1 0 010 1.414L9.414 9H17a1 1 0 110 2H9.414l1.293 1.293a1 1 0 01-1.414 1.414l-3-3a1 1 0 010-1.414l3-3a1 1 0 011.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' logout -#' @name logout -#' @description Render an svg icon of a logout -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$logout( -#' type = "solid", -#' id = "my_logout_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the logout icon" -#' ) -#' @return Render an svg icon of a logout -#' @keywords rheroicons logout -icons$logout <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_logout", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 16l4-4m0 0l-4-4m4 4H7m6 4v1a3 3 0 01-3 3H6a3 3 0 01-3-3V7a3 3 0 013-3h4a3 3 0 013 3v1")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_logout", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 3a1 1 0 00-1 1v12a1 1 0 102 0V4a1 1 0 00-1-1zm10.293 9.293a1 1 0 001.414 1.414l3-3a1 1 0 000-1.414l-3-3a1 1 0 10-1.414 1.414L14.586 9H7a1 1 0 100 2h7.586l-1.293 1.293z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' mail_open -#' @name mail_open -#' @description Render an svg icon of a mail_open -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$mail_open( -#' type = "solid", -#' id = "my_mail_open_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the mail_open icon" -#' ) -#' @return Render an svg icon of a mail_open -#' @keywords rheroicons mail_open -icons$mail_open <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_mail_open", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 19v-8.93a2 2 0 01.89-1.664l7-4.666a2 2 0 012.22 0l7 4.666A2 2 0 0121 10.07V19M3 19a2 2 0 002 2h14a2 2 0 002-2M3 19l6.75-4.5M21 19l-6.75-4.5M3 10l6.75 4.5M21 10l-6.75 4.5m0 0l-1.14.76a2 2 0 01-2.22 0l-1.14-.76")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_mail_open", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M2.94 6.412A2 2 0 002 8.108V16a2 2 0 002 2h12a2 2 0 002-2V8.108a2 2 0 00-.94-1.696l-6-3.75a2 2 0 00-2.12 0l-6 3.75zm2.615 2.423a1 1 0 10-1.11 1.664l5 3.333a1 1 0 001.11 0l5-3.333a1 1 0 00-1.11-1.664L10 11.798 5.555 8.835z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' mail -#' @name mail -#' @description Render an svg icon of a mail -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$mail( -#' type = "solid", -#' id = "my_mail_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the mail icon" -#' ) -#' @return Render an svg icon of a mail -#' @keywords rheroicons mail -icons$mail <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_mail", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 8l7.89 5.26a2 2 0 002.22 0L21 8M5 19h14a2 2 0 002-2V7a2 2 0 00-2-2H5a2 2 0 00-2 2v10a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_mail", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2.003 5.884L10 9.882l7.997-3.998A2 2 0 0016 4H4a2 2 0 00-1.997 1.884z")), - htmltools::tag(`_tag_name` = "path", list(d = "M18 8.118l-8 4-8-4V14a2 2 0 002 2h12a2 2 0 002-2V8.118z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' map -#' @name map -#' @description Render an svg icon of a map -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$map( -#' type = "solid", -#' id = "my_map_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the map icon" -#' ) -#' @return Render an svg icon of a map -#' @keywords rheroicons map -icons$map <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_map", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 20l-5.447-2.724A1 1 0 013 16.382V5.618a1 1 0 011.447-.894L9 7m0 13l6-3m-6 3V7m6 10l4.553 2.276A1 1 0 0021 18.382V7.618a1 1 0 00-.553-.894L15 4m0 13V4m0 0L9 7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_map", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12 1.586l-4 4v12.828l4-4V1.586zM3.707 3.293A1 1 0 002 4v10a1 1 0 00.293.707L6 18.414V5.586L3.707 3.293zM17.707 5.293L14 1.586v12.828l2.293 2.293A1 1 0 0018 16V6a1 1 0 00-.293-.707z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' menu_alt_1 -#' @name menu_alt_1 -#' @description Render an svg icon of a menu_alt_1 -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$menu_alt_1( -#' type = "solid", -#' id = "my_menu_alt_1_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the menu_alt_1 icon" -#' ) -#' @return Render an svg icon of a menu_alt_1 -#' @keywords rheroicons menu_alt_1 -icons$menu_alt_1 <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_menu_alt_1", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 6h16M4 12h8m-8 6h16")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_menu_alt_1", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 5a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM3 10a1 1 0 011-1h6a1 1 0 110 2H4a1 1 0 01-1-1zM3 15a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' menu_alt_2 -#' @name menu_alt_2 -#' @description Render an svg icon of a menu_alt_2 -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$menu_alt_2( -#' type = "solid", -#' id = "my_menu_alt_2_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the menu_alt_2 icon" -#' ) -#' @return Render an svg icon of a menu_alt_2 -#' @keywords rheroicons menu_alt_2 -icons$menu_alt_2 <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_menu_alt_2", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 6h16M4 12h16M4 18h7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_menu_alt_2", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 5a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM3 10a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM3 15a1 1 0 011-1h6a1 1 0 110 2H4a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' menu_alt_3 -#' @name menu_alt_3 -#' @description Render an svg icon of a menu_alt_3 -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$menu_alt_3( -#' type = "solid", -#' id = "my_menu_alt_3_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the menu_alt_3 icon" -#' ) -#' @return Render an svg icon of a menu_alt_3 -#' @keywords rheroicons menu_alt_3 -icons$menu_alt_3 <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_menu_alt_3", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 6h16M4 12h16m-7 6h7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_menu_alt_3", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 5a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM3 10a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM9 15a1 1 0 011-1h6a1 1 0 110 2h-6a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' menu_alt_4 -#' @name menu_alt_4 -#' @description Render an svg icon of a menu_alt_4 -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$menu_alt_4( -#' type = "solid", -#' id = "my_menu_alt_4_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the menu_alt_4 icon" -#' ) -#' @return Render an svg icon of a menu_alt_4 -#' @keywords rheroicons menu_alt_4 -icons$menu_alt_4 <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_menu_alt_4", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 8h16M4 16h16")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_menu_alt_4", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 7a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM3 13a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' menu -#' @name menu -#' @description Render an svg icon of a menu -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$menu( -#' type = "solid", -#' id = "my_menu_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the menu icon" -#' ) -#' @return Render an svg icon of a menu -#' @keywords rheroicons menu -icons$menu <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_menu", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 6h16M4 12h16M4 18h16")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_menu", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 5a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM3 10a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM3 15a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' microphone -#' @name microphone -#' @description Render an svg icon of a microphone -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$microphone( -#' type = "solid", -#' id = "my_microphone_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the microphone icon" -#' ) -#' @return Render an svg icon of a microphone -#' @keywords rheroicons microphone -icons$microphone <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_microphone", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 11a7 7 0 01-7 7m0 0a7 7 0 01-7-7m7 7v4m0 0H8m4 0h4m-4-8a3 3 0 01-3-3V5a3 3 0 116 0v6a3 3 0 01-3 3z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_microphone", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M7 4a3 3 0 016 0v4a3 3 0 11-6 0V4zm4 10.93A7.001 7.001 0 0017 8a1 1 0 10-2 0A5 5 0 015 8a1 1 0 00-2 0 7.001 7.001 0 006 6.93V17H6a1 1 0 100 2h8a1 1 0 100-2h-3v-2.07z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' minus_circle -#' @name minus_circle -#' @description Render an svg icon of a minus_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$minus_circle( -#' type = "solid", -#' id = "my_minus_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the minus_circle icon" -#' ) -#' @return Render an svg icon of a minus_circle -#' @keywords rheroicons minus_circle -icons$minus_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_minus_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 12H9m12 0a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_minus_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM7 9a1 1 0 000 2h6a1 1 0 100-2H7z", `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' minus_sm -#' @name minus_sm -#' @description Render an svg icon of a minus_sm -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$minus_sm( -#' type = "solid", -#' id = "my_minus_sm_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the minus_sm icon" -#' ) -#' @return Render an svg icon of a minus_sm -#' @keywords rheroicons minus_sm -icons$minus_sm <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_minus_sm", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M18 12H6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_minus_sm", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 10a1 1 0 011-1h8a1 1 0 110 2H6a1 1 0 01-1-1z", `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' minus -#' @name minus -#' @description Render an svg icon of a minus -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$minus( -#' type = "solid", -#' id = "my_minus_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the minus icon" -#' ) -#' @return Render an svg icon of a minus -#' @keywords rheroicons minus -icons$minus <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_minus", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M20 12H4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_minus", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 10a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1z", `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' moon -#' @name moon -#' @description Render an svg icon of a moon -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$moon( -#' type = "solid", -#' id = "my_moon_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the moon icon" -#' ) -#' @return Render an svg icon of a moon -#' @keywords rheroicons moon -icons$moon <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_moon", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M20.354 15.354A9 9 0 018.646 3.646 9.003 9.003 0 0012 21a9.003 9.003 0 008.354-5.646z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_moon", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M17.293 13.293A8 8 0 016.707 2.707a8.001 8.001 0 1010.586 10.586z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' music_note -#' @name music_note -#' @description Render an svg icon of a music_note -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$music_note( -#' type = "solid", -#' id = "my_music_note_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the music_note icon" -#' ) -#' @return Render an svg icon of a music_note -#' @keywords rheroicons music_note -icons$music_note <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_music_note", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 19V6l12-3v13M9 19c0 1.105-1.343 2-3 2s-3-.895-3-2 1.343-2 3-2 3 .895 3 2zm12-3c0 1.105-1.343 2-3 2s-3-.895-3-2 1.343-2 3-2 3 .895 3 2zM9 10l12-3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_music_note", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M18 3a1 1 0 00-1.196-.98l-10 2A1 1 0 006 5v9.114A4.369 4.369 0 005 14c-1.657 0-3 .895-3 2s1.343 2 3 2 3-.895 3-2V7.82l8-1.6v5.894A4.37 4.37 0 0015 12c-1.657 0-3 .895-3 2s1.343 2 3 2 3-.895 3-2V3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' newspaper -#' @name newspaper -#' @description Render an svg icon of a newspaper -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$newspaper( -#' type = "solid", -#' id = "my_newspaper_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the newspaper icon" -#' ) -#' @return Render an svg icon of a newspaper -#' @keywords rheroicons newspaper -icons$newspaper <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_newspaper", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 20H5a2 2 0 01-2-2V6a2 2 0 012-2h10a2 2 0 012 2v1m2 13a2 2 0 01-2-2V7m2 13a2 2 0 002-2V9a2 2 0 00-2-2h-2m-4-3H9M7 16h6M7 8h6v4H7V8z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_newspaper", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M2 5a2 2 0 012-2h8a2 2 0 012 2v10a2 2 0 002 2H4a2 2 0 01-2-2V5zm3 1h6v4H5V6zm6 6H5v2h6v-2z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(d = "M15 7h1a2 2 0 012 2v5.5a1.5 1.5 0 01-3 0V7z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' office_building -#' @name office_building -#' @description Render an svg icon of a office_building -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$office_building( -#' type = "solid", -#' id = "my_office_building_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the office_building icon" -#' ) -#' @return Render an svg icon of a office_building -#' @keywords rheroicons office_building -icons$office_building <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_office_building", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 21V5a2 2 0 00-2-2H7a2 2 0 00-2 2v16m14 0h2m-2 0h-5m-9 0H3m2 0h5M9 7h1m-1 4h1m4-4h1m-1 4h1m-5 10v-5a1 1 0 011-1h2a1 1 0 011 1v5m-4 0h4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_office_building", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 4a2 2 0 012-2h8a2 2 0 012 2v12a1 1 0 110 2h-3a1 1 0 01-1-1v-2a1 1 0 00-1-1H9a1 1 0 00-1 1v2a1 1 0 01-1 1H4a1 1 0 110-2V4zm3 1h2v2H7V5zm2 4H7v2h2V9zm2-4h2v2h-2V5zm2 4h-2v2h2V9z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' paper_airplane -#' @name paper_airplane -#' @description Render an svg icon of a paper_airplane -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$paper_airplane( -#' type = "solid", -#' id = "my_paper_airplane_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the paper_airplane icon" -#' ) -#' @return Render an svg icon of a paper_airplane -#' @keywords rheroicons paper_airplane -icons$paper_airplane <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_paper_airplane", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 19l9 2-9-18-9 18 9-2zm0 0v-8")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_paper_airplane", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10.894 2.553a1 1 0 00-1.788 0l-7 14a1 1 0 001.169 1.409l5-1.429A1 1 0 009 15.571V11a1 1 0 112 0v4.571a1 1 0 00.725.962l5 1.428a1 1 0 001.17-1.408l-7-14z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' paper_clip -#' @name paper_clip -#' @description Render an svg icon of a paper_clip -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$paper_clip( -#' type = "solid", -#' id = "my_paper_clip_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the paper_clip icon" -#' ) -#' @return Render an svg icon of a paper_clip -#' @keywords rheroicons paper_clip -icons$paper_clip <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_paper_clip", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15.172 7l-6.586 6.586a2 2 0 102.828 2.828l6.414-6.586a4 4 0 00-5.656-5.656l-6.415 6.585a6 6 0 108.486 8.486L20.5 13")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_paper_clip", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M8 4a3 3 0 00-3 3v4a5 5 0 0010 0V7a1 1 0 112 0v4a7 7 0 11-14 0V7a5 5 0 0110 0v4a3 3 0 11-6 0V7a1 1 0 012 0v4a1 1 0 102 0V7a3 3 0 00-3-3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' pause -#' @name pause -#' @description Render an svg icon of a pause -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$pause( -#' type = "solid", -#' id = "my_pause_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the pause icon" -#' ) -#' @return Render an svg icon of a pause -#' @keywords rheroicons pause -icons$pause <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_pause", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 9v6m4-6v6m7-3a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_pause", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 10a8 8 0 11-16 0 8 8 0 0116 0zM7 8a1 1 0 012 0v4a1 1 0 11-2 0V8zm5-1a1 1 0 00-1 1v4a1 1 0 102 0V8a1 1 0 00-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' pencil_alt -#' @name pencil_alt -#' @description Render an svg icon of a pencil_alt -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$pencil_alt( -#' type = "solid", -#' id = "my_pencil_alt_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the pencil_alt icon" -#' ) -#' @return Render an svg icon of a pencil_alt -#' @keywords rheroicons pencil_alt -icons$pencil_alt <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_pencil_alt", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 5H6a2 2 0 00-2 2v11a2 2 0 002 2h11a2 2 0 002-2v-5m-1.414-9.414a2 2 0 112.828 2.828L11.828 15H9v-2.828l8.586-8.586z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_pencil_alt", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M17.414 2.586a2 2 0 00-2.828 0L7 10.172V13h2.828l7.586-7.586a2 2 0 000-2.828z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M2 6a2 2 0 012-2h4a1 1 0 010 2H4v10h10v-4a1 1 0 112 0v4a2 2 0 01-2 2H4a2 2 0 01-2-2V6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' pencil -#' @name pencil -#' @description Render an svg icon of a pencil -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$pencil( -#' type = "solid", -#' id = "my_pencil_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the pencil icon" -#' ) -#' @return Render an svg icon of a pencil -#' @keywords rheroicons pencil -icons$pencil <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_pencil", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15.232 5.232l3.536 3.536m-2.036-5.036a2.5 2.5 0 113.536 3.536L6.5 21.036H3v-3.572L16.732 3.732z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_pencil", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M13.586 3.586a2 2 0 112.828 2.828l-.793.793-2.828-2.828.793-.793zM11.379 5.793L3 14.172V17h2.828l8.38-8.379-2.83-2.828z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' phone_incoming -#' @name phone_incoming -#' @description Render an svg icon of a phone_incoming -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$phone_incoming( -#' type = "solid", -#' id = "my_phone_incoming_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the phone_incoming icon" -#' ) -#' @return Render an svg icon of a phone_incoming -#' @keywords rheroicons phone_incoming -icons$phone_incoming <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_phone_incoming", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 3l-6 6m0 0V4m0 5h5M5 3a2 2 0 00-2 2v1c0 8.284 6.716 15 15 15h1a2 2 0 002-2v-3.28a1 1 0 00-.684-.948l-4.493-1.498a1 1 0 00-1.21.502l-1.13 2.257a11.042 11.042 0 01-5.516-5.517l2.257-1.128a1 1 0 00.502-1.21L9.228 3.683A1 1 0 008.279 3H5z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_phone_incoming", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M14.414 7l3.293-3.293a1 1 0 00-1.414-1.414L13 5.586V4a1 1 0 10-2 0v4.003a.996.996 0 00.617.921A.997.997 0 0012 9h4a1 1 0 100-2h-1.586z")), - htmltools::tag(`_tag_name` = "path", list(d = "M2 3a1 1 0 011-1h2.153a1 1 0 01.986.836l.74 4.435a1 1 0 01-.54 1.06l-1.548.773a11.037 11.037 0 006.105 6.105l.774-1.548a1 1 0 011.059-.54l4.435.74a1 1 0 01.836.986V17a1 1 0 01-1 1h-2C7.82 18 2 12.18 2 5V3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' phone_missed_call -#' @name phone_missed_call -#' @description Render an svg icon of a phone_missed_call -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$phone_missed_call( -#' type = "solid", -#' id = "my_phone_missed_call_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the phone_missed_call icon" -#' ) -#' @return Render an svg icon of a phone_missed_call -#' @keywords rheroicons phone_missed_call -icons$phone_missed_call <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_phone_missed_call", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 8l2-2m0 0l2-2m-2 2l-2-2m2 2l2 2M5 3a2 2 0 00-2 2v1c0 8.284 6.716 15 15 15h1a2 2 0 002-2v-3.28a1 1 0 00-.684-.948l-4.493-1.498a1 1 0 00-1.21.502l-1.13 2.257a11.042 11.042 0 01-5.516-5.517l2.257-1.128a1 1 0 00.502-1.21L9.228 3.683A1 1 0 008.279 3H5z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_phone_missed_call", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 3a1 1 0 011-1h2.153a1 1 0 01.986.836l.74 4.435a1 1 0 01-.54 1.06l-1.548.773a11.037 11.037 0 006.105 6.105l.774-1.548a1 1 0 011.059-.54l4.435.74a1 1 0 01.836.986V17a1 1 0 01-1 1h-2C7.82 18 2 12.18 2 5V3z")), - htmltools::tag(`_tag_name` = "path", list(d = "M16.707 3.293a1 1 0 010 1.414L15.414 6l1.293 1.293a1 1 0 01-1.414 1.414L14 7.414l-1.293 1.293a1 1 0 11-1.414-1.414L12.586 6l-1.293-1.293a1 1 0 011.414-1.414L14 4.586l1.293-1.293a1 1 0 011.414 0z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' phone_outgoing -#' @name phone_outgoing -#' @description Render an svg icon of a phone_outgoing -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$phone_outgoing( -#' type = "solid", -#' id = "my_phone_outgoing_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the phone_outgoing icon" -#' ) -#' @return Render an svg icon of a phone_outgoing -#' @keywords rheroicons phone_outgoing -icons$phone_outgoing <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_phone_outgoing", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 3h5m0 0v5m0-5l-6 6M5 3a2 2 0 00-2 2v1c0 8.284 6.716 15 15 15h1a2 2 0 002-2v-3.28a1 1 0 00-.684-.948l-4.493-1.498a1 1 0 00-1.21.502l-1.13 2.257a11.042 11.042 0 01-5.516-5.517l2.257-1.128a1 1 0 00.502-1.21L9.228 3.683A1 1 0 008.279 3H5z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_phone_outgoing", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M17.924 2.617a.997.997 0 00-.215-.322l-.004-.004A.997.997 0 0017 2h-4a1 1 0 100 2h1.586l-3.293 3.293a1 1 0 001.414 1.414L16 5.414V7a1 1 0 102 0V3a.997.997 0 00-.076-.383z")), - htmltools::tag(`_tag_name` = "path", list(d = "M2 3a1 1 0 011-1h2.153a1 1 0 01.986.836l.74 4.435a1 1 0 01-.54 1.06l-1.548.773a11.037 11.037 0 006.105 6.105l.774-1.548a1 1 0 011.059-.54l4.435.74a1 1 0 01.836.986V17a1 1 0 01-1 1h-2C7.82 18 2 12.18 2 5V3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' phone -#' @name phone -#' @description Render an svg icon of a phone -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$phone( -#' type = "solid", -#' id = "my_phone_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the phone icon" -#' ) -#' @return Render an svg icon of a phone -#' @keywords rheroicons phone -icons$phone <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_phone", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 5a2 2 0 012-2h3.28a1 1 0 01.948.684l1.498 4.493a1 1 0 01-.502 1.21l-2.257 1.13a11.042 11.042 0 005.516 5.516l1.13-2.257a1 1 0 011.21-.502l4.493 1.498a1 1 0 01.684.949V19a2 2 0 01-2 2h-1C9.716 21 3 14.284 3 6V5z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_phone", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 3a1 1 0 011-1h2.153a1 1 0 01.986.836l.74 4.435a1 1 0 01-.54 1.06l-1.548.773a11.037 11.037 0 006.105 6.105l.774-1.548a1 1 0 011.059-.54l4.435.74a1 1 0 01.836.986V17a1 1 0 01-1 1h-2C7.82 18 2 12.18 2 5V3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' photograph -#' @name photograph -#' @description Render an svg icon of a photograph -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$photograph( -#' type = "solid", -#' id = "my_photograph_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the photograph icon" -#' ) -#' @return Render an svg icon of a photograph -#' @keywords rheroicons photograph -icons$photograph <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_photograph", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 16l4.586-4.586a2 2 0 012.828 0L16 16m-2-2l1.586-1.586a2 2 0 012.828 0L20 14m-6-6h.01M6 20h12a2 2 0 002-2V6a2 2 0 00-2-2H6a2 2 0 00-2 2v12a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_photograph", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 3a2 2 0 00-2 2v10a2 2 0 002 2h12a2 2 0 002-2V5a2 2 0 00-2-2H4zm12 12H4l4-8 3 6 2-4 3 6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' play -#' @name play -#' @description Render an svg icon of a play -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$play( -#' type = "solid", -#' id = "my_play_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the play icon" -#' ) -#' @return Render an svg icon of a play -#' @keywords rheroicons play -icons$play <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_play", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M14.752 11.168l-3.197-2.132A1 1 0 0010 9.87v4.263a1 1 0 001.555.832l3.197-2.132a1 1 0 000-1.664z")), - htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", `stroke-linejoin` = "round", - `stroke-width` = "2", d = "M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_play", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM9.555 7.168A1 1 0 008 8v4a1 1 0 001.555.832l3-2a1 1 0 000-1.664l-3-2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' plus_circle -#' @name plus_circle -#' @description Render an svg icon of a plus_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$plus_circle( -#' type = "solid", -#' id = "my_plus_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the plus_circle icon" -#' ) -#' @return Render an svg icon of a plus_circle -#' @keywords rheroicons plus_circle -icons$plus_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_plus_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 9v3m0 0v3m0-3h3m-3 0H9m12 0a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_plus_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zm1-11a1 1 0 10-2 0v2H7a1 1 0 100 2h2v2a1 1 0 102 0v-2h2a1 1 0 100-2h-2V7z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' plus_sm -#' @name plus_sm -#' @description Render an svg icon of a plus_sm -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$plus_sm( -#' type = "solid", -#' id = "my_plus_sm_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the plus_sm icon" -#' ) -#' @return Render an svg icon of a plus_sm -#' @keywords rheroicons plus_sm -icons$plus_sm <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_plus_sm", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 6v6m0 0v6m0-6h6m-6 0H6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_plus_sm", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 5a1 1 0 011 1v3h3a1 1 0 110 2h-3v3a1 1 0 11-2 0v-3H6a1 1 0 110-2h3V6a1 1 0 011-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' plus -#' @name plus -#' @description Render an svg icon of a plus -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$plus( -#' type = "solid", -#' id = "my_plus_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the plus icon" -#' ) -#' @return Render an svg icon of a plus -#' @keywords rheroicons plus -icons$plus <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_plus", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 6v6m0 0v6m0-6h6m-6 0H6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_plus", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 5a1 1 0 011 1v3h3a1 1 0 110 2h-3v3a1 1 0 11-2 0v-3H6a1 1 0 110-2h3V6a1 1 0 011-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' presentation_chart_bar -#' @name presentation_chart_bar -#' @description Render an svg icon of a presentation_chart_bar -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$presentation_chart_bar( -#' type = "solid", -#' id = "my_presentation_chart_bar_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the presentation_chart_bar icon" -#' ) -#' @return Render an svg icon of a presentation_chart_bar -#' @keywords rheroicons presentation_chart_bar -icons$presentation_chart_bar <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_presentation_chart_bar", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 13v-1m4 1v-3m4 3V8M8 21l4-4 4 4M3 4h18M4 4h16v12a1 1 0 01-1 1H5a1 1 0 01-1-1V4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_presentation_chart_bar", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 3a1 1 0 000 2v8a2 2 0 002 2h2.586l-1.293 1.293a1 1 0 101.414 1.414L10 15.414l2.293 2.293a1 1 0 001.414-1.414L12.414 15H15a2 2 0 002-2V5a1 1 0 100-2H3zm11 4a1 1 0 10-2 0v4a1 1 0 102 0V7zm-3 1a1 1 0 10-2 0v3a1 1 0 102 0V8zM8 9a1 1 0 00-2 0v2a1 1 0 102 0V9z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' presentation_chart_line -#' @name presentation_chart_line -#' @description Render an svg icon of a presentation_chart_line -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$presentation_chart_line( -#' type = "solid", -#' id = "my_presentation_chart_line_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the presentation_chart_line icon" -#' ) -#' @return Render an svg icon of a presentation_chart_line -#' @keywords rheroicons presentation_chart_line -icons$presentation_chart_line <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_presentation_chart_line", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 12l3-3 3 3 4-4M8 21l4-4 4 4M3 4h18M4 4h16v12a1 1 0 01-1 1H5a1 1 0 01-1-1V4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_presentation_chart_line", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 3a1 1 0 000 2v8a2 2 0 002 2h2.586l-1.293 1.293a1 1 0 101.414 1.414L10 15.414l2.293 2.293a1 1 0 001.414-1.414L12.414 15H15a2 2 0 002-2V5a1 1 0 100-2H3zm11.707 4.707a1 1 0 00-1.414-1.414L10 9.586 8.707 8.293a1 1 0 00-1.414 0l-2 2a1 1 0 101.414 1.414L8 10.414l1.293 1.293a1 1 0 001.414 0l4-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' printer -#' @name printer -#' @description Render an svg icon of a printer -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$printer( -#' type = "solid", -#' id = "my_printer_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the printer icon" -#' ) -#' @return Render an svg icon of a printer -#' @keywords rheroicons printer -icons$printer <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_printer", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 17h2a2 2 0 002-2v-4a2 2 0 00-2-2H5a2 2 0 00-2 2v4a2 2 0 002 2h2m2 4h6a2 2 0 002-2v-4a2 2 0 00-2-2H9a2 2 0 00-2 2v4a2 2 0 002 2zm8-12V5a2 2 0 00-2-2H9a2 2 0 00-2 2v4h10z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_printer", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 4v3H4a2 2 0 00-2 2v3a2 2 0 002 2h1v2a2 2 0 002 2h6a2 2 0 002-2v-2h1a2 2 0 002-2V9a2 2 0 00-2-2h-1V4a2 2 0 00-2-2H7a2 2 0 00-2 2zm8 0H7v3h6V4zm0 8H7v4h6v-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' puzzle -#' @name puzzle -#' @description Render an svg icon of a puzzle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$puzzle( -#' type = "solid", -#' id = "my_puzzle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the puzzle icon" -#' ) -#' @return Render an svg icon of a puzzle -#' @keywords rheroicons puzzle -icons$puzzle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_puzzle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 4a2 2 0 114 0v1a1 1 0 001 1h3a1 1 0 011 1v3a1 1 0 01-1 1h-1a2 2 0 100 4h1a1 1 0 011 1v3a1 1 0 01-1 1h-3a1 1 0 01-1-1v-1a2 2 0 10-4 0v1a1 1 0 01-1 1H7a1 1 0 01-1-1v-3a1 1 0 00-1-1H4a2 2 0 110-4h1a1 1 0 001-1V7a1 1 0 011-1h3a1 1 0 001-1V4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_puzzle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M10 3.5a1.5 1.5 0 013 0V4a1 1 0 001 1h3a1 1 0 011 1v3a1 1 0 01-1 1h-.5a1.5 1.5 0 000 3h.5a1 1 0 011 1v3a1 1 0 01-1 1h-3a1 1 0 01-1-1v-.5a1.5 1.5 0 00-3 0v.5a1 1 0 01-1 1H6a1 1 0 01-1-1v-3a1 1 0 00-1-1h-.5a1.5 1.5 0 010-3H4a1 1 0 001-1V6a1 1 0 011-1h3a1 1 0 001-1v-.5z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' qrcode -#' @name qrcode -#' @description Render an svg icon of a qrcode -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$qrcode( -#' type = "solid", -#' id = "my_qrcode_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the qrcode icon" -#' ) -#' @return Render an svg icon of a qrcode -#' @keywords rheroicons qrcode -icons$qrcode <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_qrcode", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 4v1m6 11h2m-6 0h-2v4m0-11v3m0 0h.01M12 12h4.01M16 20h4M4 12h4m12 0h.01M5 8h2a1 1 0 001-1V5a1 1 0 00-1-1H5a1 1 0 00-1 1v2a1 1 0 001 1zm12 0h2a1 1 0 001-1V5a1 1 0 00-1-1h-2a1 1 0 00-1 1v2a1 1 0 001 1zM5 20h2a1 1 0 001-1v-2a1 1 0 00-1-1H5a1 1 0 00-1 1v2a1 1 0 001 1z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_qrcode", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 4a1 1 0 011-1h3a1 1 0 011 1v3a1 1 0 01-1 1H4a1 1 0 01-1-1V4zm2 2V5h1v1H5zM3 13a1 1 0 011-1h3a1 1 0 011 1v3a1 1 0 01-1 1H4a1 1 0 01-1-1v-3zm2 2v-1h1v1H5zM13 3a1 1 0 00-1 1v3a1 1 0 001 1h3a1 1 0 001-1V4a1 1 0 00-1-1h-3zm1 2v1h1V5h-1z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(d = "M11 4a1 1 0 10-2 0v1a1 1 0 002 0V4zM10 7a1 1 0 011 1v1h2a1 1 0 110 2h-3a1 1 0 01-1-1V8a1 1 0 011-1zM16 9a1 1 0 100 2 1 1 0 000-2zM9 13a1 1 0 011-1h1a1 1 0 110 2v2a1 1 0 11-2 0v-3zM7 11a1 1 0 100-2H4a1 1 0 100 2h3zM17 13a1 1 0 01-1 1h-2a1 1 0 110-2h2a1 1 0 011 1zM16 17a1 1 0 100-2h-3a1 1 0 100 2h3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' question_mark_circle -#' @name question_mark_circle -#' @description Render an svg icon of a question_mark_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$question_mark_circle( -#' type = "solid", -#' id = "my_question_mark_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the question_mark_circle icon" -#' ) -#' @return Render an svg icon of a question_mark_circle -#' @keywords rheroicons question_mark_circle -icons$question_mark_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_question_mark_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8.228 9c.549-1.165 2.03-2 3.772-2 2.21 0 4 1.343 4 3 0 1.4-1.278 2.575-3.006 2.907-.542.104-.994.54-.994 1.093m0 3h.01M21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_question_mark_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 10a8 8 0 11-16 0 8 8 0 0116 0zm-8-3a1 1 0 00-.867.5 1 1 0 11-1.731-1A3 3 0 0113 8a3.001 3.001 0 01-2 2.83V11a1 1 0 11-2 0v-1a1 1 0 011-1 1 1 0 100-2zm0 8a1 1 0 100-2 1 1 0 000 2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' receipt_refund -#' @name receipt_refund -#' @description Render an svg icon of a receipt_refund -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$receipt_refund( -#' type = "solid", -#' id = "my_receipt_refund_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the receipt_refund icon" -#' ) -#' @return Render an svg icon of a receipt_refund -#' @keywords rheroicons receipt_refund -icons$receipt_refund <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_receipt_refund", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 15v-1a4 4 0 00-4-4H8m0 0l3 3m-3-3l3-3m9 14V5a2 2 0 00-2-2H6a2 2 0 00-2 2v16l4-2 4 2 4-2 4 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_receipt_refund", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 2a2 2 0 00-2 2v14l3.5-2 3.5 2 3.5-2 3.5 2V4a2 2 0 00-2-2H5zm4.707 3.707a1 1 0 00-1.414-1.414l-3 3a1 1 0 000 1.414l3 3a1 1 0 001.414-1.414L8.414 9H10a3 3 0 013 3v1a1 1 0 102 0v-1a5 5 0 00-5-5H8.414l1.293-1.293z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' receipt_tax -#' @name receipt_tax -#' @description Render an svg icon of a receipt_tax -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$receipt_tax( -#' type = "solid", -#' id = "my_receipt_tax_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the receipt_tax icon" -#' ) -#' @return Render an svg icon of a receipt_tax -#' @keywords rheroicons receipt_tax -icons$receipt_tax <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_receipt_tax", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 14l6-6m-5.5.5h.01m4.99 5h.01M19 21V5a2 2 0 00-2-2H7a2 2 0 00-2 2v16l3.5-2 3.5 2 3.5-2 3.5 2zM10 8.5a.5.5 0 11-1 0 .5.5 0 011 0zm5 5a.5.5 0 11-1 0 .5.5 0 011 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_receipt_tax", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 2a2 2 0 00-2 2v14l3.5-2 3.5 2 3.5-2 3.5 2V4a2 2 0 00-2-2H5zm2.5 3a1.5 1.5 0 100 3 1.5 1.5 0 000-3zm6.207.293a1 1 0 00-1.414 0l-6 6a1 1 0 101.414 1.414l6-6a1 1 0 000-1.414zM12.5 10a1.5 1.5 0 100 3 1.5 1.5 0 000-3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' refresh -#' @name refresh -#' @description Render an svg icon of a refresh -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$refresh( -#' type = "solid", -#' id = "my_refresh_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the refresh icon" -#' ) -#' @return Render an svg icon of a refresh -#' @keywords rheroicons refresh -icons$refresh <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_refresh", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 4v5h.582m15.356 2A8.001 8.001 0 004.582 9m0 0H9m11 11v-5h-.581m0 0a8.003 8.003 0 01-15.357-2m15.357 2H15")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_refresh", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4 2a1 1 0 011 1v2.101a7.002 7.002 0 0111.601 2.566 1 1 0 11-1.885.666A5.002 5.002 0 005.999 7H9a1 1 0 010 2H4a1 1 0 01-1-1V3a1 1 0 011-1zm.008 9.057a1 1 0 011.276.61A5.002 5.002 0 0014.001 13H11a1 1 0 110-2h5a1 1 0 011 1v5a1 1 0 11-2 0v-2.101a7.002 7.002 0 01-11.601-2.566 1 1 0 01.61-1.276z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' reply -#' @name reply -#' @description Render an svg icon of a reply -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$reply( -#' type = "solid", -#' id = "my_reply_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the reply icon" -#' ) -#' @return Render an svg icon of a reply -#' @keywords rheroicons reply -icons$reply <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_reply", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 10h10a8 8 0 018 8v2M3 10l6 6m-6-6l6-6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_reply", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M7.707 3.293a1 1 0 010 1.414L5.414 7H11a7 7 0 017 7v2a1 1 0 11-2 0v-2a5 5 0 00-5-5H5.414l2.293 2.293a1 1 0 11-1.414 1.414l-4-4a1 1 0 010-1.414l4-4a1 1 0 011.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' rewind -#' @name rewind -#' @description Render an svg icon of a rewind -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$rewind( -#' type = "solid", -#' id = "my_rewind_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the rewind icon" -#' ) -#' @return Render an svg icon of a rewind -#' @keywords rheroicons rewind -icons$rewind <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_rewind", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12.066 11.2a1 1 0 000 1.6l5.334 4A1 1 0 0019 16V8a1 1 0 00-1.6-.8l-5.333 4zM4.066 11.2a1 1 0 000 1.6l5.334 4A1 1 0 0011 16V8a1 1 0 00-1.6-.8l-5.334 4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_rewind", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8.445 14.832A1 1 0 0010 14v-2.798l5.445 3.63A1 1 0 0017 14V6a1 1 0 00-1.555-.832L10 8.798V6a1 1 0 00-1.555-.832l-6 4a1 1 0 000 1.664l6 4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' rss -#' @name rss -#' @description Render an svg icon of a rss -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$rss( -#' type = "solid", -#' id = "my_rss_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the rss icon" -#' ) -#' @return Render an svg icon of a rss -#' @keywords rheroicons rss -icons$rss <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_rss", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M6 5c7.18 0 13 5.82 13 13M6 11a7 7 0 017 7m-6 0a1 1 0 11-2 0 1 1 0 012 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_rss", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5 3a1 1 0 000 2c5.523 0 10 4.477 10 10a1 1 0 102 0C17 8.373 11.627 3 5 3z")), - htmltools::tag(`_tag_name` = "path", list(d = "M4 9a1 1 0 011-1 7 7 0 017 7 1 1 0 11-2 0 5 5 0 00-5-5 1 1 0 01-1-1zM3 15a2 2 0 114 0 2 2 0 01-4 0z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' save_as -#' @name save_as -#' @description Render an svg icon of a save_as -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$save_as( -#' type = "solid", -#' id = "my_save_as_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the save_as icon" -#' ) -#' @return Render an svg icon of a save_as -#' @keywords rheroicons save_as -icons$save_as <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_save_as", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 16v2a2 2 0 01-2 2H5a2 2 0 01-2-2v-7a2 2 0 012-2h2m3-4H9a2 2 0 00-2 2v7a2 2 0 002 2h10a2 2 0 002-2V7a2 2 0 00-2-2h-1m-1 4l-3 3m0 0l-3-3m3 3V3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_save_as", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9.707 7.293a1 1 0 00-1.414 1.414l3 3a1 1 0 001.414 0l3-3a1 1 0 00-1.414-1.414L13 8.586V5h3a2 2 0 012 2v5a2 2 0 01-2 2H8a2 2 0 01-2-2V7a2 2 0 012-2h3v3.586L9.707 7.293zM11 3a1 1 0 112 0v2h-2V3z")), - htmltools::tag(`_tag_name` = "path", list(d = "M4 9a2 2 0 00-2 2v5a2 2 0 002 2h8a2 2 0 002-2H4V9z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' save -#' @name save -#' @description Render an svg icon of a save -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$save( -#' type = "solid", -#' id = "my_save_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the save icon" -#' ) -#' @return Render an svg icon of a save -#' @keywords rheroicons save -icons$save <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_save", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 7H5a2 2 0 00-2 2v9a2 2 0 002 2h14a2 2 0 002-2V9a2 2 0 00-2-2h-3m-1 4l-3 3m0 0l-3-3m3 3V4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_save", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M7.707 10.293a1 1 0 10-1.414 1.414l3 3a1 1 0 001.414 0l3-3a1 1 0 00-1.414-1.414L11 11.586V6h5a2 2 0 012 2v7a2 2 0 01-2 2H4a2 2 0 01-2-2V8a2 2 0 012-2h5v5.586l-1.293-1.293zM9 4a1 1 0 012 0v2H9V4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' scale -#' @name scale -#' @description Render an svg icon of a scale -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$scale( -#' type = "solid", -#' id = "my_scale_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the scale icon" -#' ) -#' @return Render an svg icon of a scale -#' @keywords rheroicons scale -icons$scale <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_scale", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 6l3 1m0 0l-3 9a5.002 5.002 0 006.001 0M6 7l3 9M6 7l6-2m6 2l3-1m-3 1l-3 9a5.002 5.002 0 006.001 0M18 7l3 9m-3-9l-6-2m0-2v2m0 16V5m0 16H9m3 0h3")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_scale", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 2a1 1 0 011 1v1.323l3.954 1.582 1.599-.8a1 1 0 01.894 1.79l-1.233.616 1.738 5.42a1 1 0 01-.285 1.05A3.989 3.989 0 0115 15a3.989 3.989 0 01-2.667-1.019 1 1 0 01-.285-1.05l1.715-5.349L11 6.477V16h2a1 1 0 110 2H7a1 1 0 110-2h2V6.477L6.237 7.582l1.715 5.349a1 1 0 01-.285 1.05A3.989 3.989 0 015 15a3.989 3.989 0 01-2.667-1.019 1 1 0 01-.285-1.05l1.738-5.42-1.233-.617a1 1 0 01.894-1.788l1.599.799L9 4.323V3a1 1 0 011-1zm-5 8.274l-.818 2.552c.25.112.526.174.818.174.292 0 .569-.062.818-.174L5 10.274zm10 0l-.818 2.552c.25.112.526.174.818.174.292 0 .569-.062.818-.174L15 10.274z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' scissors -#' @name scissors -#' @description Render an svg icon of a scissors -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$scissors( -#' type = "solid", -#' id = "my_scissors_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the scissors icon" -#' ) -#' @return Render an svg icon of a scissors -#' @keywords rheroicons scissors -icons$scissors <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_scissors", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M14.121 14.121L19 19m-7-7l7-7m-7 7l-2.879 2.879M12 12L9.121 9.121m0 5.758a3 3 0 10-4.243 4.243 3 3 0 004.243-4.243zm0-5.758a3 3 0 10-4.243-4.243 3 3 0 004.243 4.243z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_scissors", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5.5 2a3.5 3.5 0 101.665 6.58L8.585 10l-1.42 1.42a3.5 3.5 0 101.414 1.414l8.128-8.127a1 1 0 00-1.414-1.414L10 8.586l-1.42-1.42A3.5 3.5 0 005.5 2zM4 5.5a1.5 1.5 0 113 0 1.5 1.5 0 01-3 0zm0 9a1.5 1.5 0 113 0 1.5 1.5 0 01-3 0z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(d = "M12.828 11.414a1 1 0 00-1.414 1.414l3.879 3.88a1 1 0 001.414-1.415l-3.879-3.879z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' search_circle -#' @name search_circle -#' @description Render an svg icon of a search_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$search_circle( -#' type = "solid", -#' id = "my_search_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the search_circle icon" -#' ) -#' @return Render an svg icon of a search_circle -#' @keywords rheroicons search_circle -icons$search_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_search_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 16l2.879-2.879m0 0a3 3 0 104.243-4.242 3 3 0 00-4.243 4.242zM21 12a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_search_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9 9a2 2 0 114 0 2 2 0 01-4 0z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M10 18a8 8 0 100-16 8 8 0 000 16zm1-13a4 4 0 00-3.446 6.032l-2.261 2.26a1 1 0 101.414 1.415l2.261-2.261A4 4 0 1011 5z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' search -#' @name search -#' @description Render an svg icon of a search -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$search( -#' type = "solid", -#' id = "my_search_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the search icon" -#' ) -#' @return Render an svg icon of a search -#' @keywords rheroicons search -icons$search <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_search", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 21l-6-6m2-5a7 7 0 11-14 0 7 7 0 0114 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_search", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M8 4a4 4 0 100 8 4 4 0 000-8zM2 8a6 6 0 1110.89 3.476l4.817 4.817a1 1 0 01-1.414 1.414l-4.816-4.816A6 6 0 012 8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' selector -#' @name selector -#' @description Render an svg icon of a selector -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$selector( -#' type = "solid", -#' id = "my_selector_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the selector icon" -#' ) -#' @return Render an svg icon of a selector -#' @keywords rheroicons selector -icons$selector <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_selector", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 9l4-4 4 4m0 6l-4 4-4-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_selector", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 3a1 1 0 01.707.293l3 3a1 1 0 01-1.414 1.414L10 5.414 7.707 7.707a1 1 0 01-1.414-1.414l3-3A1 1 0 0110 3zm-3.707 9.293a1 1 0 011.414 0L10 14.586l2.293-2.293a1 1 0 011.414 1.414l-3 3a1 1 0 01-1.414 0l-3-3a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' server -#' @name server -#' @description Render an svg icon of a server -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$server( -#' type = "solid", -#' id = "my_server_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the server icon" -#' ) -#' @return Render an svg icon of a server -#' @keywords rheroicons server -icons$server <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_server", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 12h14M5 12a2 2 0 01-2-2V6a2 2 0 012-2h14a2 2 0 012 2v4a2 2 0 01-2 2M5 12a2 2 0 00-2 2v4a2 2 0 002 2h14a2 2 0 002-2v-4a2 2 0 00-2-2m-2-4h.01M17 16h.01")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_server", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M2 5a2 2 0 012-2h12a2 2 0 012 2v2a2 2 0 01-2 2H4a2 2 0 01-2-2V5zm14 1a1 1 0 11-2 0 1 1 0 012 0zM2 13a2 2 0 012-2h12a2 2 0 012 2v2a2 2 0 01-2 2H4a2 2 0 01-2-2v-2zm14 1a1 1 0 11-2 0 1 1 0 012 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' share -#' @name share -#' @description Render an svg icon of a share -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$share( -#' type = "solid", -#' id = "my_share_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the share icon" -#' ) -#' @return Render an svg icon of a share -#' @keywords rheroicons share -icons$share <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_share", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8.684 13.342C8.886 12.938 9 12.482 9 12c0-.482-.114-.938-.316-1.342m0 2.684a3 3 0 110-2.684m0 2.684l6.632 3.316m-6.632-6l6.632-3.316m0 0a3 3 0 105.367-2.684 3 3 0 00-5.367 2.684zm0 9.316a3 3 0 105.368 2.684 3 3 0 00-5.368-2.684z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_share", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M15 8a3 3 0 10-2.977-2.63l-4.94 2.47a3 3 0 100 4.319l4.94 2.47a3 3 0 10.895-1.789l-4.94-2.47a3.027 3.027 0 000-.74l4.94-2.47C13.456 7.68 14.19 8 15 8z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' shield_check -#' @name shield_check -#' @description Render an svg icon of a shield_check -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$shield_check( -#' type = "solid", -#' id = "my_shield_check_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the shield_check icon" -#' ) -#' @return Render an svg icon of a shield_check -#' @keywords rheroicons shield_check -icons$shield_check <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_shield_check", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 12l2 2 4-4m5.618-4.016A11.955 11.955 0 0112 2.944a11.955 11.955 0 01-8.618 3.04A12.02 12.02 0 003 9c0 5.591 3.824 10.29 9 11.622 5.176-1.332 9-6.03 9-11.622 0-1.042-.133-2.052-.382-3.016z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_shield_check", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M2.166 4.999A11.954 11.954 0 0010 1.944 11.954 11.954 0 0017.834 5c.11.65.166 1.32.166 2.001 0 5.225-3.34 9.67-8 11.317C5.34 16.67 2 12.225 2 7c0-.682.057-1.35.166-2.001zm11.541 3.708a1 1 0 00-1.414-1.414L9 10.586 7.707 9.293a1 1 0 00-1.414 1.414l2 2a1 1 0 001.414 0l4-4z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' shield_exclamation -#' @name shield_exclamation -#' @description Render an svg icon of a shield_exclamation -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$shield_exclamation( -#' type = "solid", -#' id = "my_shield_exclamation_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the shield_exclamation icon" -#' ) -#' @return Render an svg icon of a shield_exclamation -#' @keywords rheroicons shield_exclamation -icons$shield_exclamation <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_shield_exclamation", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M20.618 5.984A11.955 11.955 0 0112 2.944a11.955 11.955 0 01-8.618 3.04A12.02 12.02 0 003 9c0 5.591 3.824 10.29 9 11.622 5.176-1.332 9-6.03 9-11.622 0-1.042-.133-2.052-.382-3.016zM12 9v2m0 4h.01")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_shield_exclamation", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 1.944A11.954 11.954 0 012.166 5C2.056 5.649 2 6.319 2 7c0 5.225 3.34 9.67 8 11.317C14.66 16.67 18 12.225 18 7c0-.682-.057-1.35-.166-2.001A11.954 11.954 0 0110 1.944zM11 14a1 1 0 11-2 0 1 1 0 012 0zm0-7a1 1 0 10-2 0v3a1 1 0 102 0V7z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' shopping_bag -#' @name shopping_bag -#' @description Render an svg icon of a shopping_bag -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$shopping_bag( -#' type = "solid", -#' id = "my_shopping_bag_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the shopping_bag icon" -#' ) -#' @return Render an svg icon of a shopping_bag -#' @keywords rheroicons shopping_bag -icons$shopping_bag <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_shopping_bag", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 11V7a4 4 0 00-8 0v4M5 9h14l1 12H4L5 9z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_shopping_bag", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 2a4 4 0 00-4 4v1H5a1 1 0 00-.994.89l-1 9A1 1 0 004 18h12a1 1 0 00.994-1.11l-1-9A1 1 0 0015 7h-1V6a4 4 0 00-4-4zm2 5V6a2 2 0 10-4 0v1h4zm-6 3a1 1 0 112 0 1 1 0 01-2 0zm7-1a1 1 0 100 2 1 1 0 000-2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' shopping_cart -#' @name shopping_cart -#' @description Render an svg icon of a shopping_cart -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$shopping_cart( -#' type = "solid", -#' id = "my_shopping_cart_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the shopping_cart icon" -#' ) -#' @return Render an svg icon of a shopping_cart -#' @keywords rheroicons shopping_cart -icons$shopping_cart <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_shopping_cart", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 3h2l.4 2M7 13h10l4-8H5.4M7 13L5.4 5M7 13l-2.293 2.293c-.63.63-.184 1.707.707 1.707H17m0 0a2 2 0 100 4 2 2 0 000-4zm-8 2a2 2 0 11-4 0 2 2 0 014 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_shopping_cart", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M3 1a1 1 0 000 2h1.22l.305 1.222a.997.997 0 00.01.042l1.358 5.43-.893.892C3.74 11.846 4.632 14 6.414 14H15a1 1 0 000-2H6.414l1-1H14a1 1 0 00.894-.553l3-6A1 1 0 0017 3H6.28l-.31-1.243A1 1 0 005 1H3zM16 16.5a1.5 1.5 0 11-3 0 1.5 1.5 0 013 0zM6.5 18a1.5 1.5 0 100-3 1.5 1.5 0 000 3z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' sort_ascending -#' @name sort_ascending -#' @description Render an svg icon of a sort_ascending -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$sort_ascending( -#' type = "solid", -#' id = "my_sort_ascending_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the sort_ascending icon" -#' ) -#' @return Render an svg icon of a sort_ascending -#' @keywords rheroicons sort_ascending -icons$sort_ascending <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_sort_ascending", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 4h13M3 8h9m-9 4h6m4 0l4-4m0 0l4 4m-4-4v12")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_sort_ascending", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M3 3a1 1 0 000 2h11a1 1 0 100-2H3zM3 7a1 1 0 000 2h5a1 1 0 000-2H3zM3 11a1 1 0 100 2h4a1 1 0 100-2H3zM13 16a1 1 0 102 0v-5.586l1.293 1.293a1 1 0 001.414-1.414l-3-3a1 1 0 00-1.414 0l-3 3a1 1 0 101.414 1.414L13 10.414V16z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' sort_descending -#' @name sort_descending -#' @description Render an svg icon of a sort_descending -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$sort_descending( -#' type = "solid", -#' id = "my_sort_descending_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the sort_descending icon" -#' ) -#' @return Render an svg icon of a sort_descending -#' @keywords rheroicons sort_descending -icons$sort_descending <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_sort_descending", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 4h13M3 8h9m-9 4h9m5-4v12m0 0l-4-4m4 4l4-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_sort_descending", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M3 3a1 1 0 000 2h11a1 1 0 100-2H3zM3 7a1 1 0 000 2h7a1 1 0 100-2H3zM3 11a1 1 0 100 2h4a1 1 0 100-2H3zM15 8a1 1 0 10-2 0v5.586l-1.293-1.293a1 1 0 00-1.414 1.414l3 3a1 1 0 001.414 0l3-3a1 1 0 00-1.414-1.414L15 13.586V8z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' sparkles -#' @name sparkles -#' @description Render an svg icon of a sparkles -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$sparkles( -#' type = "solid", -#' id = "my_sparkles_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the sparkles icon" -#' ) -#' @return Render an svg icon of a sparkles -#' @keywords rheroicons sparkles -icons$sparkles <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_sparkles", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5 3v4M3 5h4M6 17v4m-2-2h4m5-16l2.286 6.857L21 12l-5.714 2.143L13 21l-2.286-6.857L5 12l5.714-2.143L13 3z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_sparkles", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 2a1 1 0 011 1v1h1a1 1 0 010 2H6v1a1 1 0 01-2 0V6H3a1 1 0 010-2h1V3a1 1 0 011-1zm0 10a1 1 0 011 1v1h1a1 1 0 110 2H6v1a1 1 0 11-2 0v-1H3a1 1 0 110-2h1v-1a1 1 0 011-1zM12 2a1 1 0 01.967.744L14.146 7.2 17.5 9.134a1 1 0 010 1.732l-3.354 1.935-1.18 4.455a1 1 0 01-1.933 0L9.854 12.8 6.5 10.866a1 1 0 010-1.732l3.354-1.935 1.18-4.455A1 1 0 0112 2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' speakerphone -#' @name speakerphone -#' @description Render an svg icon of a speakerphone -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$speakerphone( -#' type = "solid", -#' id = "my_speakerphone_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the speakerphone icon" -#' ) -#' @return Render an svg icon of a speakerphone -#' @keywords rheroicons speakerphone -icons$speakerphone <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_speakerphone", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11 5.882V19.24a1.76 1.76 0 01-3.417.592l-2.147-6.15M18 13a3 3 0 100-6M5.436 13.683A4.001 4.001 0 017 6h1.832c4.1 0 7.625-1.234 9.168-3v14c-1.543-1.766-5.067-3-9.168-3H7a3.988 3.988 0 01-1.564-.317z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_speakerphone", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 3a1 1 0 00-1.447-.894L8.763 6H5a3 3 0 000 6h.28l1.771 5.316A1 1 0 008 18h1a1 1 0 001-1v-4.382l6.553 3.276A1 1 0 0018 15V3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' star -#' @name star -#' @description Render an svg icon of a star -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$star( -#' type = "solid", -#' id = "my_star_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the star icon" -#' ) -#' @return Render an svg icon of a star -#' @keywords rheroicons star -icons$star <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_star", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M11.049 2.927c.3-.921 1.603-.921 1.902 0l1.519 4.674a1 1 0 00.95.69h4.915c.969 0 1.371 1.24.588 1.81l-3.976 2.888a1 1 0 00-.363 1.118l1.518 4.674c.3.922-.755 1.688-1.538 1.118l-3.976-2.888a1 1 0 00-1.176 0l-3.976 2.888c-.783.57-1.838-.197-1.538-1.118l1.518-4.674a1 1 0 00-.363-1.118l-3.976-2.888c-.784-.57-.38-1.81.588-1.81h4.914a1 1 0 00.951-.69l1.519-4.674z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_star", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9.049 2.927c.3-.921 1.603-.921 1.902 0l1.07 3.292a1 1 0 00.95.69h3.462c.969 0 1.371 1.24.588 1.81l-2.8 2.034a1 1 0 00-.364 1.118l1.07 3.292c.3.921-.755 1.688-1.54 1.118l-2.8-2.034a1 1 0 00-1.175 0l-2.8 2.034c-.784.57-1.838-.197-1.539-1.118l1.07-3.292a1 1 0 00-.364-1.118L2.98 8.72c-.783-.57-.38-1.81.588-1.81h3.461a1 1 0 00.951-.69l1.07-3.292z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' status_offline -#' @name status_offline -#' @description Render an svg icon of a status_offline -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$status_offline( -#' type = "solid", -#' id = "my_status_offline_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the status_offline icon" -#' ) -#' @return Render an svg icon of a status_offline -#' @keywords rheroicons status_offline -icons$status_offline <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_status_offline", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M18.364 5.636a9 9 0 010 12.728m0 0l-2.829-2.829m2.829 2.829L21 21M15.536 8.464a5 5 0 010 7.072m0 0l-2.829-2.829m-4.243 2.829a4.978 4.978 0 01-1.414-2.83m-1.414 5.658a9 9 0 01-2.167-9.238m7.824 2.167a1 1 0 111.414 1.414m-1.414-1.414L3 3m8.293 8.293l1.414 1.414")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_status_offline", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M3.707 2.293a1 1 0 00-1.414 1.414l6.921 6.922c.05.062.105.118.168.167l6.91 6.911a1 1 0 001.415-1.414l-.675-.675a9.001 9.001 0 00-.668-11.982A1 1 0 1014.95 5.05a7.002 7.002 0 01.657 9.143l-1.435-1.435a5.002 5.002 0 00-.636-6.294A1 1 0 0012.12 7.88c.924.923 1.12 2.3.587 3.415l-1.992-1.992a.922.922 0 00-.018-.018l-6.99-6.991zM3.238 8.187a1 1 0 00-1.933-.516c-.8 3-.025 6.336 2.331 8.693a1 1 0 001.414-1.415 6.997 6.997 0 01-1.812-6.762zM7.4 11.5a1 1 0 10-1.73 1c.214.371.48.72.795 1.035a1 1 0 001.414-1.414c-.191-.191-.35-.4-.478-.622z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' status_online -#' @name status_online -#' @description Render an svg icon of a status_online -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$status_online( -#' type = "solid", -#' id = "my_status_online_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the status_online icon" -#' ) -#' @return Render an svg icon of a status_online -#' @keywords rheroicons status_online -icons$status_online <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_status_online", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5.636 18.364a9 9 0 010-12.728m12.728 0a9 9 0 010 12.728m-9.9-2.829a5 5 0 010-7.07m7.072 0a5 5 0 010 7.07M13 12a1 1 0 11-2 0 1 1 0 012 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_status_online", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5.05 3.636a1 1 0 010 1.414 7 7 0 000 9.9 1 1 0 11-1.414 1.414 9 9 0 010-12.728 1 1 0 011.414 0zm9.9 0a1 1 0 011.414 0 9 9 0 010 12.728 1 1 0 11-1.414-1.414 7 7 0 000-9.9 1 1 0 010-1.414zM7.879 6.464a1 1 0 010 1.414 3 3 0 000 4.243 1 1 0 11-1.415 1.414 5 5 0 010-7.07 1 1 0 011.415 0zm4.242 0a1 1 0 011.415 0 5 5 0 010 7.072 1 1 0 01-1.415-1.415 3 3 0 000-4.242 1 1 0 010-1.415zM10 9a1 1 0 011 1v.01a1 1 0 11-2 0V10a1 1 0 011-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' stop -#' @name stop -#' @description Render an svg icon of a stop -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$stop( -#' type = "solid", -#' id = "my_stop_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the stop icon" -#' ) -#' @return Render an svg icon of a stop -#' @keywords rheroicons stop -icons$stop <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_stop", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 12a9 9 0 11-18 0 9 9 0 0118 0z")), htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 10a1 1 0 011-1h4a1 1 0 011 1v4a1 1 0 01-1 1h-4a1 1 0 01-1-1v-4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_stop", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM8 7a1 1 0 00-1 1v4a1 1 0 001 1h4a1 1 0 001-1V8a1 1 0 00-1-1H8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' sun -#' @name sun -#' @description Render an svg icon of a sun -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$sun( -#' type = "solid", -#' id = "my_sun_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the sun icon" -#' ) -#' @return Render an svg icon of a sun -#' @keywords rheroicons sun -icons$sun <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_sun", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 3v1m0 16v1m9-9h-1M4 12H3m15.364 6.364l-.707-.707M6.343 6.343l-.707-.707m12.728 0l-.707.707M6.343 17.657l-.707.707M16 12a4 4 0 11-8 0 4 4 0 018 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_sun", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 2a1 1 0 011 1v1a1 1 0 11-2 0V3a1 1 0 011-1zm4 8a4 4 0 11-8 0 4 4 0 018 0zm-.464 4.95l.707.707a1 1 0 001.414-1.414l-.707-.707a1 1 0 00-1.414 1.414zm2.12-10.607a1 1 0 010 1.414l-.706.707a1 1 0 11-1.414-1.414l.707-.707a1 1 0 011.414 0zM17 11a1 1 0 100-2h-1a1 1 0 100 2h1zm-7 4a1 1 0 011 1v1a1 1 0 11-2 0v-1a1 1 0 011-1zM5.05 6.464A1 1 0 106.465 5.05l-.708-.707a1 1 0 00-1.414 1.414l.707.707zm1.414 8.486l-.707.707a1 1 0 01-1.414-1.414l.707-.707a1 1 0 011.414 1.414zM4 11a1 1 0 100-2H3a1 1 0 000 2h1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' support -#' @name support -#' @description Render an svg icon of a support -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$support( -#' type = "solid", -#' id = "my_support_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the support icon" -#' ) -#' @return Render an svg icon of a support -#' @keywords rheroicons support -icons$support <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_support", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M18.364 5.636l-3.536 3.536m0 5.656l3.536 3.536M9.172 9.172L5.636 5.636m3.536 9.192l-3.536 3.536M21 12a9 9 0 11-18 0 9 9 0 0118 0zm-5 0a4 4 0 11-8 0 4 4 0 018 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_support", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 10a8 8 0 11-16 0 8 8 0 0116 0zm-2 0c0 .993-.241 1.929-.668 2.754l-1.524-1.525a3.997 3.997 0 00.078-2.183l1.562-1.562C15.802 8.249 16 9.1 16 10zm-5.165 3.913l1.58 1.58A5.98 5.98 0 0110 16a5.976 5.976 0 01-2.516-.552l1.562-1.562a4.006 4.006 0 001.789.027zm-4.677-2.796a4.002 4.002 0 01-.041-2.08l-.08.08-1.53-1.533A5.98 5.98 0 004 10c0 .954.223 1.856.619 2.657l1.54-1.54zm1.088-6.45A5.974 5.974 0 0110 4c.954 0 1.856.223 2.657.619l-1.54 1.54a4.002 4.002 0 00-2.346.033L7.246 4.668zM12 10a2 2 0 11-4 0 2 2 0 014 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' switch_horizontal -#' @name switch_horizontal -#' @description Render an svg icon of a switch_horizontal -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$switch_horizontal( -#' type = "solid", -#' id = "my_switch_horizontal_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the switch_horizontal icon" -#' ) -#' @return Render an svg icon of a switch_horizontal -#' @keywords rheroicons switch_horizontal -icons$switch_horizontal <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_switch_horizontal", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 7h12m0 0l-4-4m4 4l-4 4m0 6H4m0 0l4 4m-4-4l4-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_switch_horizontal", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8 5a1 1 0 100 2h5.586l-1.293 1.293a1 1 0 001.414 1.414l3-3a1 1 0 000-1.414l-3-3a1 1 0 10-1.414 1.414L13.586 5H8zM12 15a1 1 0 100-2H6.414l1.293-1.293a1 1 0 10-1.414-1.414l-3 3a1 1 0 000 1.414l3 3a1 1 0 001.414-1.414L6.414 15H12z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' switch_vertical -#' @name switch_vertical -#' @description Render an svg icon of a switch_vertical -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$switch_vertical( -#' type = "solid", -#' id = "my_switch_vertical_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the switch_vertical icon" -#' ) -#' @return Render an svg icon of a switch_vertical -#' @keywords rheroicons switch_vertical -icons$switch_vertical <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_switch_vertical", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 16V4m0 0L3 8m4-4l4 4m6 0v12m0 0l4-4m-4 4l-4-4")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_switch_vertical", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5 12a1 1 0 102 0V6.414l1.293 1.293a1 1 0 001.414-1.414l-3-3a1 1 0 00-1.414 0l-3 3a1 1 0 001.414 1.414L5 6.414V12zM15 8a1 1 0 10-2 0v5.586l-1.293-1.293a1 1 0 00-1.414 1.414l3 3a1 1 0 001.414 0l3-3a1 1 0 00-1.414-1.414L15 13.586V8z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' table -#' @name table -#' @description Render an svg icon of a table -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$table( -#' type = "solid", -#' id = "my_table_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the table icon" -#' ) -#' @return Render an svg icon of a table -#' @keywords rheroicons table -icons$table <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_table", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 10h18M3 14h18m-9-4v8m-7 0h14a2 2 0 002-2V8a2 2 0 00-2-2H5a2 2 0 00-2 2v8a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_table", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 4a3 3 0 00-3 3v6a3 3 0 003 3h10a3 3 0 003-3V7a3 3 0 00-3-3H5zm-1 9v-1h5v2H5a1 1 0 01-1-1zm7 1h4a1 1 0 001-1v-1h-5v2zm0-4h5V8h-5v2zM9 8H4v2h5V8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' tag -#' @name tag -#' @description Render an svg icon of a tag -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$tag( -#' type = "solid", -#' id = "my_tag_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the tag icon" -#' ) -#' @return Render an svg icon of a tag -#' @keywords rheroicons tag -icons$tag <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_tag", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M7 7h.01M7 3h5c.512 0 1.024.195 1.414.586l7 7a2 2 0 010 2.828l-7 7a2 2 0 01-2.828 0l-7-7A1.994 1.994 0 013 12V7a4 4 0 014-4z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_tag", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M17.707 9.293a1 1 0 010 1.414l-7 7a1 1 0 01-1.414 0l-7-7A.997.997 0 012 10V5a3 3 0 013-3h5c.256 0 .512.098.707.293l7 7zM5 6a1 1 0 100-2 1 1 0 000 2z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' template -#' @name template -#' @description Render an svg icon of a template -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$template( -#' type = "solid", -#' id = "my_template_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the template icon" -#' ) -#' @return Render an svg icon of a template -#' @keywords rheroicons template -icons$template <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_template", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 5a1 1 0 011-1h14a1 1 0 011 1v2a1 1 0 01-1 1H5a1 1 0 01-1-1V5zM4 13a1 1 0 011-1h6a1 1 0 011 1v6a1 1 0 01-1 1H5a1 1 0 01-1-1v-6zM16 13a1 1 0 011-1h2a1 1 0 011 1v6a1 1 0 01-1 1h-2a1 1 0 01-1-1v-6z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_template", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M3 4a1 1 0 011-1h12a1 1 0 011 1v2a1 1 0 01-1 1H4a1 1 0 01-1-1V4zM3 10a1 1 0 011-1h6a1 1 0 011 1v6a1 1 0 01-1 1H4a1 1 0 01-1-1v-6zM14 9a1 1 0 00-1 1v6a1 1 0 001 1h2a1 1 0 001-1v-6a1 1 0 00-1-1h-2z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' terminal -#' @name terminal -#' @description Render an svg icon of a terminal -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$terminal( -#' type = "solid", -#' id = "my_terminal_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the terminal icon" -#' ) -#' @return Render an svg icon of a terminal -#' @keywords rheroicons terminal -icons$terminal <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_terminal", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8 9l3 3-3 3m5 0h3M5 20h14a2 2 0 002-2V6a2 2 0 00-2-2H5a2 2 0 00-2 2v12a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_terminal", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M2 5a2 2 0 012-2h12a2 2 0 012 2v10a2 2 0 01-2 2H4a2 2 0 01-2-2V5zm3.293 1.293a1 1 0 011.414 0l3 3a1 1 0 010 1.414l-3 3a1 1 0 01-1.414-1.414L7.586 10 5.293 7.707a1 1 0 010-1.414zM11 12a1 1 0 100 2h3a1 1 0 100-2h-3z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' thumb_down -#' @name thumb_down -#' @description Render an svg icon of a thumb_down -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$thumb_down( -#' type = "solid", -#' id = "my_thumb_down_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the thumb_down icon" -#' ) -#' @return Render an svg icon of a thumb_down -#' @keywords rheroicons thumb_down -icons$thumb_down <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_thumb_down", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 14H5.236a2 2 0 01-1.789-2.894l3.5-7A2 2 0 018.736 3h4.018a2 2 0 01.485.06l3.76.94m-7 10v5a2 2 0 002 2h.096c.5 0 .905-.405.905-.904 0-.715.211-1.413.608-2.008L17 13V4m-7 10h2m5-10h2a2 2 0 012 2v6a2 2 0 01-2 2h-2.5")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_thumb_down", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M18 9.5a1.5 1.5 0 11-3 0v-6a1.5 1.5 0 013 0v6zM14 9.667v-5.43a2 2 0 00-1.105-1.79l-.05-.025A4 4 0 0011.055 2H5.64a2 2 0 00-1.962 1.608l-1.2 6A2 2 0 004.44 12H8v4a2 2 0 002 2 1 1 0 001-1v-.667a4 4 0 01.8-2.4l1.4-1.866a4 4 0 00.8-2.4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' thumb_up -#' @name thumb_up -#' @description Render an svg icon of a thumb_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$thumb_up( -#' type = "solid", -#' id = "my_thumb_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the thumb_up icon" -#' ) -#' @return Render an svg icon of a thumb_up -#' @keywords rheroicons thumb_up -icons$thumb_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_thumb_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M14 10h4.764a2 2 0 011.789 2.894l-3.5 7A2 2 0 0115.263 21h-4.017c-.163 0-.326-.02-.485-.06L7 20m7-10V5a2 2 0 00-2-2h-.095c-.5 0-.905.405-.905.905 0 .714-.211 1.412-.608 2.006L7 11v9m7-10h-2M7 20H5a2 2 0 01-2-2v-6a2 2 0 012-2h2.5")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_thumb_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 10.5a1.5 1.5 0 113 0v6a1.5 1.5 0 01-3 0v-6zM6 10.333v5.43a2 2 0 001.106 1.79l.05.025A4 4 0 008.943 18h5.416a2 2 0 001.962-1.608l1.2-6A2 2 0 0015.56 8H12V4a2 2 0 00-2-2 1 1 0 00-1 1v.667a4 4 0 01-.8 2.4L6.8 7.933a4 4 0 00-.8 2.4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' ticket -#' @name ticket -#' @description Render an svg icon of a ticket -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$ticket( -#' type = "solid", -#' id = "my_ticket_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the ticket icon" -#' ) -#' @return Render an svg icon of a ticket -#' @keywords rheroicons ticket -icons$ticket <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_ticket", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 5v2m0 4v2m0 4v2M5 5a2 2 0 00-2 2v3a2 2 0 110 4v3a2 2 0 002 2h14a2 2 0 002-2v-3a2 2 0 110-4V7a2 2 0 00-2-2H5z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_ticket", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 6a2 2 0 012-2h12a2 2 0 012 2v2a2 2 0 100 4v2a2 2 0 01-2 2H4a2 2 0 01-2-2v-2a2 2 0 100-4V6z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' translate -#' @name translate -#' @description Render an svg icon of a translate -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$translate( -#' type = "solid", -#' id = "my_translate_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the translate icon" -#' ) -#' @return Render an svg icon of a translate -#' @keywords rheroicons translate -icons$translate <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_translate", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M3 5h12M9 3v2m1.048 9.5A18.022 18.022 0 016.412 9m6.088 9h7M11 21l5-10 5 10M12.751 5C11.783 10.77 8.07 15.61 3 18.129")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_translate", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M7 2a1 1 0 011 1v1h3a1 1 0 110 2H9.578a18.87 18.87 0 01-1.724 4.78c.29.354.596.696.914 1.026a1 1 0 11-1.44 1.389c-.188-.196-.373-.396-.554-.6a19.098 19.098 0 01-3.107 3.567 1 1 0 01-1.334-1.49 17.087 17.087 0 003.13-3.733 18.992 18.992 0 01-1.487-2.494 1 1 0 111.79-.89c.234.47.489.928.764 1.372.417-.934.752-1.913.997-2.927H3a1 1 0 110-2h3V3a1 1 0 011-1zm6 6a1 1 0 01.894.553l2.991 5.982a.869.869 0 01.02.037l.99 1.98a1 1 0 11-1.79.895L15.383 16h-4.764l-.724 1.447a1 1 0 11-1.788-.894l.99-1.98.019-.038 2.99-5.982A1 1 0 0113 8zm-1.382 6h2.764L13 11.236 11.618 14z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' trash -#' @name trash -#' @description Render an svg icon of a trash -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$trash( -#' type = "solid", -#' id = "my_trash_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the trash icon" -#' ) -#' @return Render an svg icon of a trash -#' @keywords rheroicons trash -icons$trash <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_trash", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M19 7l-.867 12.142A2 2 0 0116.138 21H7.862a2 2 0 01-1.995-1.858L5 7m5 4v6m4-6v6m1-10V4a1 1 0 00-1-1h-4a1 1 0 00-1 1v3M4 7h16")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_trash", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M9 2a1 1 0 00-.894.553L7.382 4H4a1 1 0 000 2v10a2 2 0 002 2h8a2 2 0 002-2V6a1 1 0 100-2h-3.382l-.724-1.447A1 1 0 0011 2H9zM7 8a1 1 0 012 0v6a1 1 0 11-2 0V8zm5-1a1 1 0 00-1 1v6a1 1 0 102 0V8a1 1 0 00-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' trending_down -#' @name trending_down -#' @description Render an svg icon of a trending_down -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$trending_down( -#' type = "solid", -#' id = "my_trending_down_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the trending_down icon" -#' ) -#' @return Render an svg icon of a trending_down -#' @keywords rheroicons trending_down -icons$trending_down <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_trending_down", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13 17h8m0 0V9m0 8l-8-8-4 4-6-6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_trending_down", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12 13a1 1 0 100 2h5a1 1 0 001-1V9a1 1 0 10-2 0v2.586l-4.293-4.293a1 1 0 00-1.414 0L8 9.586 3.707 5.293a1 1 0 00-1.414 1.414l5 5a1 1 0 001.414 0L11 9.414 14.586 13H12z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' trending_up -#' @name trending_up -#' @description Render an svg icon of a trending_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$trending_up( -#' type = "solid", -#' id = "my_trending_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the trending_up icon" -#' ) -#' @return Render an svg icon of a trending_up -#' @keywords rheroicons trending_up -icons$trending_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_trending_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13 7h8m0 0v8m0-8l-8 8-4-4-6 6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_trending_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M12 7a1 1 0 110-2h5a1 1 0 011 1v5a1 1 0 11-2 0V8.414l-4.293 4.293a1 1 0 01-1.414 0L8 10.414l-4.293 4.293a1 1 0 01-1.414-1.414l5-5a1 1 0 011.414 0L11 10.586 14.586 7H12z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' truck -#' @name truck -#' @description Render an svg icon of a truck -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$truck( -#' type = "solid", -#' id = "my_truck_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the truck icon" -#' ) -#' @return Render an svg icon of a truck -#' @keywords rheroicons truck -icons$truck <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_truck", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(fill = "#fff", d = "M9 17a2 2 0 11-4 0 2 2 0 014 0zM19 17a2 2 0 11-4 0 2 2 0 014 0z")), - htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", `stroke-linejoin` = "round", - `stroke-width` = "2", d = "M13 16V6a1 1 0 00-1-1H4a1 1 0 00-1 1v10a1 1 0 001 1h1m8-1a1 1 0 01-1 1H9m4-1V8a1 1 0 011-1h2.586a1 1 0 01.707.293l3.414 3.414a1 1 0 01.293.707V16a1 1 0 01-1 1h-1m-6-1a1 1 0 001 1h1M5 17a2 2 0 104 0m-4 0a2 2 0 114 0m6 0a2 2 0 104 0m-4 0a2 2 0 114 0")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_truck", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8 16.5a1.5 1.5 0 11-3 0 1.5 1.5 0 013 0zM15 16.5a1.5 1.5 0 11-3 0 1.5 1.5 0 013 0z")), - htmltools::tag(`_tag_name` = "path", list(d = "M3 4a1 1 0 00-1 1v10a1 1 0 001 1h1.05a2.5 2.5 0 014.9 0H10a1 1 0 001-1V5a1 1 0 00-1-1H3zM14 7a1 1 0 00-1 1v6.05A2.5 2.5 0 0115.95 16H17a1 1 0 001-1v-5a1 1 0 00-.293-.707l-2-2A1 1 0 0015 7h-1z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' upload -#' @name upload -#' @description Render an svg icon of a upload -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$upload( -#' type = "solid", -#' id = "my_upload_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the upload icon" -#' ) -#' @return Render an svg icon of a upload -#' @keywords rheroicons upload -icons$upload <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_upload", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 16v1a3 3 0 003 3h10a3 3 0 003-3v-1m-4-8l-4-4m0 0L8 8m4-4v12")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_upload", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 17a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zM6.293 6.707a1 1 0 010-1.414l3-3a1 1 0 011.414 0l3 3a1 1 0 01-1.414 1.414L11 5.414V13a1 1 0 11-2 0V5.414L7.707 6.707a1 1 0 01-1.414 0z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' user_add -#' @name user_add -#' @description Render an svg icon of a user_add -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$user_add( -#' type = "solid", -#' id = "my_user_add_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the user_add icon" -#' ) -#' @return Render an svg icon of a user_add -#' @keywords rheroicons user_add -icons$user_add <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_user_add", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M18 9v3m0 0v3m0-3h3m-3 0h-3m-2-5a4 4 0 11-8 0 4 4 0 018 0zM3 20a6 6 0 0112 0v1H3v-1z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_user_add", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M8 9a3 3 0 100-6 3 3 0 000 6zM8 11a6 6 0 016 6H2a6 6 0 016-6zM16 7a1 1 0 10-2 0v1h-1a1 1 0 100 2h1v1a1 1 0 102 0v-1h1a1 1 0 100-2h-1V7z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' user_circle -#' @name user_circle -#' @description Render an svg icon of a user_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$user_circle( -#' type = "solid", -#' id = "my_user_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the user_circle icon" -#' ) -#' @return Render an svg icon of a user_circle -#' @keywords rheroicons user_circle -icons$user_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_user_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5.121 17.804A13.937 13.937 0 0112 16c2.5 0 4.847.655 6.879 1.804M15 10a3 3 0 11-6 0 3 3 0 016 0zm6 2a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_user_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M18 10a8 8 0 11-16 0 8 8 0 0116 0zm-6-3a2 2 0 11-4 0 2 2 0 014 0zm-2 4a5 5 0 00-4.546 2.916A5.986 5.986 0 0010 16a5.986 5.986 0 004.546-2.084A5 5 0 0010 11z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' user_group -#' @name user_group -#' @description Render an svg icon of a user_group -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$user_group( -#' type = "solid", -#' id = "my_user_group_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the user_group icon" -#' ) -#' @return Render an svg icon of a user_group -#' @keywords rheroicons user_group -icons$user_group <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_user_group", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 20h5v-2a3 3 0 00-5.356-1.857M17 20H7m10 0v-2c0-.656-.126-1.283-.356-1.857M7 20H2v-2a3 3 0 015.356-1.857M7 20v-2c0-.656.126-1.283.356-1.857m0 0a5.002 5.002 0 019.288 0M15 7a3 3 0 11-6 0 3 3 0 016 0zm6 3a2 2 0 11-4 0 2 2 0 014 0zM7 10a2 2 0 11-4 0 2 2 0 014 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_user_group", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M13 6a3 3 0 11-6 0 3 3 0 016 0zM18 8a2 2 0 11-4 0 2 2 0 014 0zM14 15a4 4 0 00-8 0v3h8v-3zM6 8a2 2 0 11-4 0 2 2 0 014 0zM16 18v-3a5.972 5.972 0 00-.75-2.906A3.005 3.005 0 0119 15v3h-3zM4.75 12.094A5.973 5.973 0 004 15v3H1v-3a3 3 0 013.75-2.906z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' user_remove -#' @name user_remove -#' @description Render an svg icon of a user_remove -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$user_remove( -#' type = "solid", -#' id = "my_user_remove_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the user_remove icon" -#' ) -#' @return Render an svg icon of a user_remove -#' @keywords rheroicons user_remove -icons$user_remove <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_user_remove", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M13 7a4 4 0 11-8 0 4 4 0 018 0zM9 14a6 6 0 00-6 6v1h12v-1a6 6 0 00-6-6zM21 12h-6")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_user_remove", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M11 6a3 3 0 11-6 0 3 3 0 016 0zM14 17a6 6 0 00-12 0h12zM13 8a1 1 0 100 2h4a1 1 0 100-2h-4z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' user -#' @name user -#' @description Render an svg icon of a user -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$user( -#' type = "solid", -#' id = "my_user_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the user icon" -#' ) -#' @return Render an svg icon of a user -#' @keywords rheroicons user -icons$user <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_user", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M16 7a4 4 0 11-8 0 4 4 0 018 0zM12 14a7 7 0 00-7 7h14a7 7 0 00-7-7z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_user", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 9a3 3 0 100-6 3 3 0 000 6zm-7 9a7 7 0 1114 0H3z", `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' users -#' @name users -#' @description Render an svg icon of a users -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$users( -#' type = "solid", -#' id = "my_users_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the users icon" -#' ) -#' @return Render an svg icon of a users -#' @keywords rheroicons users -icons$users <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_users", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M12 4.354a4 4 0 110 5.292M15 21H3v-1a6 6 0 0112 0v1zm0 0h6v-1a6 6 0 00-9-5.197M13 7a4 4 0 11-8 0 4 4 0 018 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_users", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M9 6a3 3 0 11-6 0 3 3 0 016 0zM17 6a3 3 0 11-6 0 3 3 0 016 0zM12.93 17c.046-.327.07-.66.07-1a6.97 6.97 0 00-1.5-4.33A5 5 0 0119 16v1h-6.07zM6 11a5 5 0 015 5v1H1v-1a5 5 0 015-5z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' variable -#' @name variable -#' @description Render an svg icon of a variable -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$variable( -#' type = "solid", -#' id = "my_variable_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the variable icon" -#' ) -#' @return Render an svg icon of a variable -#' @keywords rheroicons variable -icons$variable <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_variable", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4.871 4A17.926 17.926 0 003 12c0 2.874.673 5.59 1.871 8m14.13 0a17.926 17.926 0 001.87-8c0-2.874-.673-5.59-1.87-8M9 9h1.246a1 1 0 01.961.725l1.586 5.55a1 1 0 00.961.725H15m1-7h-.08a2 2 0 00-1.519.698L9.6 15.302A2 2 0 018.08 16H8")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_variable", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4.649 3.084A1 1 0 015.163 4.4 13.95 13.95 0 004 10c0 1.993.416 3.886 1.164 5.6a1 1 0 01-1.832.8A15.95 15.95 0 012 10c0-2.274.475-4.44 1.332-6.4a1 1 0 011.317-.516zM12.96 7a3 3 0 00-2.342 1.126l-.328.41-.111-.279A2 2 0 008.323 7H8a1 1 0 000 2h.323l.532 1.33-1.035 1.295a1 1 0 01-.781.375H7a1 1 0 100 2h.039a3 3 0 002.342-1.126l.328-.41.111.279A2 2 0 0011.677 14H12a1 1 0 100-2h-.323l-.532-1.33 1.035-1.295A1 1 0 0112.961 9H13a1 1 0 100-2h-.039zm1.874-2.6a1 1 0 011.833-.8A15.95 15.95 0 0118 10c0 2.274-.475 4.44-1.332 6.4a1 1 0 11-1.832-.8A13.949 13.949 0 0016 10c0-1.993-.416-3.886-1.165-5.6z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' video_camera -#' @name video_camera -#' @description Render an svg icon of a video_camera -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$video_camera( -#' type = "solid", -#' id = "my_video_camera_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the video_camera icon" -#' ) -#' @return Render an svg icon of a video_camera -#' @keywords rheroicons video_camera -icons$video_camera <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_video_camera", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15 10l4.553-2.276A1 1 0 0121 8.618v6.764a1 1 0 01-1.447.894L15 14M5 18h8a2 2 0 002-2V8a2 2 0 00-2-2H5a2 2 0 00-2 2v8a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_video_camera", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 6a2 2 0 012-2h6a2 2 0 012 2v8a2 2 0 01-2 2H4a2 2 0 01-2-2V6zM14.553 7.106A1 1 0 0014 8v4a1 1 0 00.553.894l2 1A1 1 0 0018 13V7a1 1 0 00-1.447-.894l-2 1z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' view_boards -#' @name view_boards -#' @description Render an svg icon of a view_boards -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$view_boards( -#' type = "solid", -#' id = "my_view_boards_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the view_boards icon" -#' ) -#' @return Render an svg icon of a view_boards -#' @keywords rheroicons view_boards -icons$view_boards <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_view_boards", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M9 17V7m0 10a2 2 0 01-2 2H5a2 2 0 01-2-2V7a2 2 0 012-2h2a2 2 0 012 2m0 10a2 2 0 002 2h2a2 2 0 002-2M9 7a2 2 0 012-2h2a2 2 0 012 2m0 10V7m0 10a2 2 0 002 2h2a2 2 0 002-2V7a2 2 0 00-2-2h-2a2 2 0 00-2 2")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_view_boards", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M2 4a1 1 0 011-1h2a1 1 0 011 1v12a1 1 0 01-1 1H3a1 1 0 01-1-1V4zM8 4a1 1 0 011-1h2a1 1 0 011 1v12a1 1 0 01-1 1H9a1 1 0 01-1-1V4zM15 3a1 1 0 00-1 1v12a1 1 0 001 1h2a1 1 0 001-1V4a1 1 0 00-1-1h-2z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' view_grid_add -#' @name view_grid_add -#' @description Render an svg icon of a view_grid_add -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$view_grid_add( -#' type = "solid", -#' id = "my_view_grid_add_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the view_grid_add icon" -#' ) -#' @return Render an svg icon of a view_grid_add -#' @keywords rheroicons view_grid_add -icons$view_grid_add <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_view_grid_add", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M17 14v6m-3-3h6M6 10h2a2 2 0 002-2V6a2 2 0 00-2-2H6a2 2 0 00-2 2v2a2 2 0 002 2zm10 0h2a2 2 0 002-2V6a2 2 0 00-2-2h-2a2 2 0 00-2 2v2a2 2 0 002 2zM6 20h2a2 2 0 002-2v-2a2 2 0 00-2-2H6a2 2 0 00-2 2v2a2 2 0 002 2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_view_grid_add", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5 3a2 2 0 00-2 2v2a2 2 0 002 2h2a2 2 0 002-2V5a2 2 0 00-2-2H5zM5 11a2 2 0 00-2 2v2a2 2 0 002 2h2a2 2 0 002-2v-2a2 2 0 00-2-2H5zM11 5a2 2 0 012-2h2a2 2 0 012 2v2a2 2 0 01-2 2h-2a2 2 0 01-2-2V5zM14 11a1 1 0 011 1v1h1a1 1 0 110 2h-1v1a1 1 0 11-2 0v-1h-1a1 1 0 110-2h1v-1a1 1 0 011-1z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' view_grid -#' @name view_grid -#' @description Render an svg icon of a view_grid -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$view_grid( -#' type = "solid", -#' id = "my_view_grid_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the view_grid icon" -#' ) -#' @return Render an svg icon of a view_grid -#' @keywords rheroicons view_grid -icons$view_grid <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_view_grid", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 6a2 2 0 012-2h2a2 2 0 012 2v2a2 2 0 01-2 2H6a2 2 0 01-2-2V6zM14 6a2 2 0 012-2h2a2 2 0 012 2v2a2 2 0 01-2 2h-2a2 2 0 01-2-2V6zM4 16a2 2 0 012-2h2a2 2 0 012 2v2a2 2 0 01-2 2H6a2 2 0 01-2-2v-2zM14 16a2 2 0 012-2h2a2 2 0 012 2v2a2 2 0 01-2 2h-2a2 2 0 01-2-2v-2z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_view_grid", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5 3a2 2 0 00-2 2v2a2 2 0 002 2h2a2 2 0 002-2V5a2 2 0 00-2-2H5zM5 11a2 2 0 00-2 2v2a2 2 0 002 2h2a2 2 0 002-2v-2a2 2 0 00-2-2H5zM11 5a2 2 0 012-2h2a2 2 0 012 2v2a2 2 0 01-2 2h-2a2 2 0 01-2-2V5zM11 13a2 2 0 012-2h2a2 2 0 012 2v2a2 2 0 01-2 2h-2a2 2 0 01-2-2v-2z")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' view_list -#' @name view_list -#' @description Render an svg icon of a view_list -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$view_list( -#' type = "solid", -#' id = "my_view_list_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the view_list icon" -#' ) -#' @return Render an svg icon of a view_list -#' @keywords rheroicons view_list -icons$view_list <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_view_list", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M4 6h16M4 10h16M4 14h16M4 18h16")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_view_list", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M3 4a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zm0 4a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zm0 4a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1zm0 4a1 1 0 011-1h12a1 1 0 110 2H4a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' volume_off -#' @name volume_off -#' @description Render an svg icon of a volume_off -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$volume_off( -#' type = "solid", -#' id = "my_volume_off_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the volume_off icon" -#' ) -#' @return Render an svg icon of a volume_off -#' @keywords rheroicons volume_off -icons$volume_off <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_volume_off", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M5.586 15H4a1 1 0 01-1-1v-4a1 1 0 011-1h1.586l4.707-4.707C10.923 3.663 12 4.109 12 5v14c0 .891-1.077 1.337-1.707.707L5.586 15z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(`stroke-linecap` = "round", - `stroke-linejoin` = "round", `stroke-width` = "2", d = "M17 14l2-2m0 0l2-2m-2 2l-2-2m2 2l2 2")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_volume_off", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M9.383 3.076A1 1 0 0110 4v12a1 1 0 01-1.707.707L4.586 13H2a1 1 0 01-1-1V8a1 1 0 011-1h2.586l3.707-3.707a1 1 0 011.09-.217zM12.293 7.293a1 1 0 011.414 0L15 8.586l1.293-1.293a1 1 0 111.414 1.414L16.414 10l1.293 1.293a1 1 0 01-1.414 1.414L15 11.414l-1.293 1.293a1 1 0 01-1.414-1.414L13.586 10l-1.293-1.293a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' volume_up -#' @name volume_up -#' @description Render an svg icon of a volume_up -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$volume_up( -#' type = "solid", -#' id = "my_volume_up_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the volume_up icon" -#' ) -#' @return Render an svg icon of a volume_up -#' @keywords rheroicons volume_up -icons$volume_up <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_volume_up", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M15.536 8.464a5 5 0 010 7.072m2.828-9.9a9 9 0 010 12.728M5.586 15H4a1 1 0 01-1-1v-4a1 1 0 011-1h1.586l4.707-4.707C10.923 3.663 12 4.109 12 5v14c0 .891-1.077 1.337-1.707.707L5.586 15z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_volume_up", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M9.383 3.076A1 1 0 0110 4v12a1 1 0 01-1.707.707L4.586 13H2a1 1 0 01-1-1V8a1 1 0 011-1h2.586l3.707-3.707a1 1 0 011.09-.217zM14.657 2.929a1 1 0 011.414 0A9.972 9.972 0 0119 10a9.972 9.972 0 01-2.929 7.071 1 1 0 01-1.414-1.414A7.971 7.971 0 0017 10c0-2.21-.894-4.208-2.343-5.657a1 1 0 010-1.414zm-2.829 2.828a1 1 0 011.415 0A5.983 5.983 0 0115 10a5.984 5.984 0 01-1.757 4.243 1 1 0 01-1.415-1.415A3.984 3.984 0 0013 10a3.983 3.983 0 00-1.172-2.828 1 1 0 010-1.415z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' wifi -#' @name wifi -#' @description Render an svg icon of a wifi -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$wifi( -#' type = "solid", -#' id = "my_wifi_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the wifi icon" -#' ) -#' @return Render an svg icon of a wifi -#' @keywords rheroicons wifi -icons$wifi <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_wifi", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M8.111 16.404a5.5 5.5 0 017.778 0M12 20h.01m-7.08-7.071c3.904-3.905 10.236-3.905 14.141 0M1.394 9.393c5.857-5.857 15.355-5.857 21.213 0")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_wifi", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M17.778 8.222c-4.296-4.296-11.26-4.296-15.556 0A1 1 0 01.808 6.808c5.076-5.077 13.308-5.077 18.384 0a1 1 0 01-1.414 1.414zM14.95 11.05a7 7 0 00-9.9 0 1 1 0 01-1.414-1.414 9 9 0 0112.728 0 1 1 0 01-1.414 1.414zM12.12 13.88a3 3 0 00-4.242 0 1 1 0 01-1.415-1.415 5 5 0 017.072 0 1 1 0 01-1.415 1.415zM9 16a1 1 0 011-1h.01a1 1 0 110 2H10a1 1 0 01-1-1z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' x_circle -#' @name x_circle -#' @description Render an svg icon of a x_circle -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$x_circle( -#' type = "solid", -#' id = "my_x_circle_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the x_circle icon" -#' ) -#' @return Render an svg icon of a x_circle -#' @keywords rheroicons x_circle -icons$x_circle <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_x_circle", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M10 14l2-2m0 0l2-2m-2 2l-2-2m2 2l2 2m7-2a9 9 0 11-18 0 9 9 0 0118 0z")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_x_circle", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M10 18a8 8 0 100-16 8 8 0 000 16zM8.707 7.293a1 1 0 00-1.414 1.414L8.586 10l-1.293 1.293a1 1 0 101.414 1.414L10 11.414l1.293 1.293a1 1 0 001.414-1.414L11.414 10l1.293-1.293a1 1 0 00-1.414-1.414L10 8.586 8.707 7.293z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' x -#' @name x -#' @description Render an svg icon of a x -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$x( -#' type = "solid", -#' id = "my_x_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the x icon" -#' ) -#' @return Render an svg icon of a x -#' @keywords rheroicons x -icons$x <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_x", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M6 18L18 6M6 6l12 12")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_x", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M4.293 4.293a1 1 0 011.414 0L10 8.586l4.293-4.293a1 1 0 111.414 1.414L11.414 10l4.293 4.293a1 1 0 01-1.414 1.414L10 11.414l-4.293 4.293a1 1 0 01-1.414-1.414L8.586 10 4.293 5.707a1 1 0 010-1.414z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' zoom_in -#' @name zoom_in -#' @description Render an svg icon of a zoom_in -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$zoom_in( -#' type = "solid", -#' id = "my_zoom_in_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the zoom_in icon" -#' ) -#' @return Render an svg icon of a zoom_in -#' @keywords rheroicons zoom_in -icons$zoom_in <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_zoom_in", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 21l-6-6m2-5a7 7 0 11-14 0 7 7 0 0114 0zM10 7v3m0 0v3m0-3h3m-3 0H7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_zoom_in", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(d = "M5 8a1 1 0 011-1h1V6a1 1 0 012 0v1h1a1 1 0 110 2H9v1a1 1 0 11-2 0V9H6a1 1 0 01-1-1z")), - htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", d = "M2 8a6 6 0 1110.89 3.476l4.817 4.817a1 1 0 01-1.414 1.414l-4.816-4.816A6 6 0 012 8zm6-4a4 4 0 100 8 4 4 0 000-8z", - `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - -#' zoom_out -#' @name zoom_out -#' @description Render an svg icon of a zoom_out -#' @param type render an outline or solid icon (default outline) -#' @param id a unique ID to be applied to the svg icon -#' @param class a css class to be applied to the svg icon -#' @param aria_hidden should the icon be hidden from screen readers (default: TRUE) -#' @param title a string that describes the icon (optional) -#' @examples -#' rheroicons::icons$zoom_out( -#' type = "solid", -#' id = "my_zoom_out_icon", -#' class = "my-icons", -#' aria_hidden = FALSE, -#' title = "a title for the zoom_out icon" -#' ) -#' @return Render an svg icon of a zoom_out -#' @keywords rheroicons zoom_out -icons$zoom_out <- function(type = "outline", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) { - stopifnot( - "Aria Hidden must be TRUE or FALSE" = is.logical(aria_hidden), - "Invalid icon type" = type %in% c("solid", "outline") - ) - icon_styles <- list( - outline = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_outline rheroicons_zoom_out", - width = "24", height = "24", `data-icon-set` = "outline", xmlns = "http://www.w3.org/2000/svg", - fill = "none", viewBox = "0 0 24 24", stroke = "currentColor", htmltools::tag(`_tag_name` = "path", - list(`stroke-linecap` = "round", `stroke-linejoin` = "round", `stroke-width` = "2", - d = "M21 21l-6-6m2-5a7 7 0 11-14 0 7 7 0 0114 0zM13 10H7")))), - solid = htmltools::tag(`_tag_name` = "svg", list(class = "rheroicons rheroicons_solid rheroicons_zoom_out", - width = "20", height = "20", `data-icon-set` = "solid", xmlns = "http://www.w3.org/2000/svg", - viewBox = "0 0 20 20", fill = "currentColor", htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M8 4a4 4 0 100 8 4 4 0 000-8zM2 8a6 6 0 1110.89 3.476l4.817 4.817a1 1 0 01-1.414 1.414l-4.816-4.816A6 6 0 012 8z", - `clip-rule` = "evenodd")), htmltools::tag(`_tag_name` = "path", list(`fill-rule` = "evenodd", - d = "M5 8a1 1 0 011-1h4a1 1 0 110 2H6a1 1 0 01-1-1z", `clip-rule` = "evenodd")))) - ) - el <- icon_styles[[type]] - if (!is.null(id)) { - el$attribs$id <- id - } - if (!is.null(class)) { - el$attribs$class <- paste0(el$attribs$class, " ", class) - } - if (isTRUE(aria_hidden)) { - el$attribs$`aria-hidden` <- "true" - } - if (!is.null(title)) { - stopifnot(is.character(title)) - el$children <- htmltools::tagList( - htmltools::tag("title", list(title)), - el$children - ) - } - return(el) -} - diff --git a/R/rheroicon.R b/R/rheroicon.R new file mode 100644 index 0000000..567e01c --- /dev/null +++ b/R/rheroicon.R @@ -0,0 +1,65 @@ +#' rheroicon +#' +#' Render an rheroicon icon by name. Use `launch_gallery` to view the icons +#' available in this package or visit the gallery on shinyapps.io (see link +#' below). All icons are rendered with three CSS classes: global ("rheroicons"), +#' icon style ("rheroicons_outline" or "rheroicons_solid"), and icon name ( +#' "rheroicons_academic_cap"). Use any of these classes to customize the style +#' of the icon or define your own classes using the argument `class`. +#' +#' @param name an icon name +#' @param type choose icon style "solid" or "outline" (default: "outline") +#' @param classnames a string containing one or more CSS classes +#' +#' @examples +#' rheroicon(name = "academic_cap") +#' rheroicon(name = "academic_cap", type = "solid") +#' rheroicon(name = "academic_cap", classnames = "education-icons") +#' +#' +#' @references +#' \url{https://github.com/tailwindlabs/heroicons} +#' \url{https://davidruvolo.shinyapps.io/rheroicons-demo/} +#' +#' @export +rheroicon <- function(name, type = "outline", classnames = NULL) { + + icon <- rheroicons[[name]] + + # warn if icon does not exist + if (is.null(icon)) { + cli::cli_alert_danger( + text = paste0( + "Icon \"", as.character(name), "\" ", + "cannot be found" + ) + ) + } + + # throw error if input value for "type" is invalid + if (!type %in% c("outline", "solid")) { + cli::cli_alert_danger( + text = paste0( + "Icon type \"", as.character(type), "\"", + " is invalid. Use 'outline' or 'solid'." + ) + ) + } + + # process only if icon exists + if (length(icon) && type %in% c("outline", "solid")) { + svg <- icon$icons[[type]] + + # append class attribute if applicable + if (!is.null(classnames)) { + svg <- .set__classnames( + svg = svg, + class = classnames + ) + } + + # return element as html + htmltools::HTML(svg) + } + +} \ No newline at end of file diff --git a/R/sysdata.rda b/R/sysdata.rda new file mode 100644 index 0000000000000000000000000000000000000000..ebb5991b969370b543291b3a7380ec28f3d43157 GIT binary patch literal 23592 zcmZU)Wl$Sh`z?+nNRZ+LZGb?77BAXD2oPL@Lm{}k6lh;0K=9yB@j`HSiaQi9?i9Bc zs^`4to;&mZ-TB|S&zEPf^Az|Y`|JL8Pe>(s9 z=Rf~!{crG($v@lw{P&;wKYz>Vx&Ja^cHNJD8uBE6zuk257ia^s1aKfAz?qKUfItKU zUIfH@1h%K2I-iCU{y=*uHsny~dU-c|Nl5>_)3Iq&Q6H1%bt!kTE>v3MQ6N^Cc^f`_ zT_8xR!=TRcHsTP}GQ7WKD-DyXHCc7H6h|U8uckNWp0{jpDh^yFVz!2(vpv7>w0K_H zNq2f$&tFKm>oig~&&&6=XIE`m`{Aywt$S9R6mJ7cm|IC1Q?8B)NX8^|bMg60$#J?l zIv#UG^E3V>Qzdh&1#yFfcR$}=krX{H$*(t8e*IGtbOs~j&MYDEqdx6D`*Zf`?a=v& zM0BYyA{Y?4^PQcvGA9|1vRN;l&C507%Vq*)>O|B6^gGBo0U zz`vbJj8HQ_1L|f+FjVGR<>r*1sy}L*#Fwi>MFJV*!buKMk>rcJmPWEt#>Pg|(`Kke zt3X^PdBteSbhy#nI@O`cqSFMSO8>td|7Qt()Wk-D97&4vBmRf_zx!qsFCCF+h^f8nys18ekB${4PVz8<%5z)D@iYlqQ{!=qqSoliqqv3x9 zkMAn_7@rz^zj^0=!DK{A^v{bc8iM#VcfG_#G6KXwY^&FL&~IMnzM@YN5dh7n>g^(G z?@qFh*Dsq)zI>FMQ(>-~(EPxwUe$Zy)g|`I|N4jCr&IpRgTRRX$=lD&Byay~I#S0b z(xDP!j-@KnZ=|I<9eK2TU(*-6J9*j~n>c4VOS?+9P+h(|st~=V5TQi$Y%&7G%3Tr< zWVEhO{)CO-cc4KG0e}$^O|*zn2AnFBQW}bo+=3`kjZEN~zm5(CP=Zzqdk86Mp`ay1 zBQ;ou0W8mKb~=^#W$qTiOupB2aZhy(Piiwu@>Be^98IdLR7u``neHED!uI0Hd)BLB zheaJ3Rm-9hm(jvGCi=6==>y*~pP85db3KAh$KpsqwISy``iEqWh7cy7!}J+1Af`$VEK}pA# zl7|&jMrhglF3t*B=GXg-TP>K|Q4xA=hAQ<{fZf&!q97I^%6V9sQyM8PpsVT-U3~wmlj=hj0y_pnEEbz-$HdFA>3|$;uL1xn=5hRf%Ik zF?9#EU>A!(i#KpaCLudhgI!OicE81@eMIu`t-Tt7h-yrJCtEoXLZF_=z|$dnsZfF- z#gXOfpx>e)6!cJvqy$ICDU5hF?@)#UdWCW_6U^o4TWh9D#W#3BGRP@TV?(=7DVvZ& zcb_B$5QVBM$d{+Uj#!ooK+}fz-2v?01vE#=HcMYiD8@ZB4^zyCCM+Z5&9i(=M$MeG z2}zDi16YE&o!W?2XF>FCAVRxHakm}194Kj+osua zg{L8i_(~S>8k931lP?!I{*|F)UyTT6{o1AfVDjcMabVxgOeexf&%<&=g=sA?Aj(i& z_yDw?84)RruXW%)iq*MjWcL+h5lGtMwt_l&q4Z)`KDK%<2a1><##-4PuE4 zNU?M5A{ep=%1DU*s%4j?!Az`Ns{6tEGXhab5(puoS#RaEsa*f~Q<5`N;p6(9l}bKL zL(#^9hldLt-!ZvB9+w5l^KR+@Rg>9o(|-3+qA+*~qNQhxRnVS9A*mtI-O3t0oN(%I z-Vik}@Vg}{xf>$Cysa6$zULeD;0=%qCBh~3Tx|+mYH$=v2GYKnm)y8m6VxGRallld zgzC5R^ds|N0Rhrd^LsAa>@LPGlZ%@oM~=2*OJ9WUFX}_X_xr_{-{Md_FCqyrq1}Lz0X3BXT9y_&p1@zJ?)i+ycc7AtA-@r~prq%wxU zk?5jmjnIj_DY|#Jm@yGT^HlCkMl~va7hg!KPbM73Brn+0U;D)z`N=J|lmA%MpvD+N_(XtcDt!GuARd@fiX2R&1W;1i6B3I!iLp`B%+Gz1 z2OzhXSN6zix2}GKTzq@(Fev0;(;rl>Q)MAk&X+xFw)8_@vei4-)TE#3E}t>P(sH`n zL|_S`0Y-AoYHp}GnyW5r!TGTzaG!b?6n@;=L&Rh(gi$a$Cd~Ne0Sul=3Fp6AIqK`mOiAAF#-zX{#G2vw-xh*Y28w{|u$DC;dG9OUQK0eb4 z_uDchCFUc6DZeVtz!&2NkSX?+rc(2k3sGr7B7hgH-)=A+FwkcjUQghkRmC0mf(=o+~+Y+w^X6Vur?4%iNh3Kok9Q&WZMk|r@-#WiLRi}>?$y18-g~{`pk@ozA0(u zI`pwTBGzMYiBuDq1q6F&eU4*KyA_WuZn<&@iFR8vFs`6a`_OJBNnp*YX}hkQTO!fq zNXphE1LB@Nksc>^0JEy(IcS05Byqs-P9io-_(c&pq%LK%Z4pFxL_nJl47L<3O`r>4 zNffh$R>5Ytfw-WUH?0V!HKwNd2e5P1AxB>3DIQlRTcTzz6=88o?~<@Iq{bYPBRR?P>TUB~ME$GE+)Wz8B|ywj(pnS^Cf z@PL{|Tv9d0Cdk7~p#4EU>@WXU(gjUxe{FSUARk|PR}Clq3VE%z%wiL23$InzuD=?( zY_e+#y`zdnQ8{cyVe@#(6bLLW{IX)5%hj)1Kms_0#7y@ZXO3tqr#hx0qkMWki>o zY>cYSgaMG}k%U1IVJwAG#K(6wk^fQGj-<}qc9X7_+ITNzC@dEK*>YS85MIHf3yrJQ zM4%NJEjHT|YS}cC9lNyAEP3C2ELXL8QV!sAxLL~_F*i+VTk&?!nKC4Ujykh4A9uh} zjxbVH z$v=|Nwv0&bKMEMgTQLCr!!+sqr+0n5-&4lI{<1O8dBPd^Xvxg<_<(Zzz~V0N8ONB& zPNPMhQzmAo28OqcUF-S|9wkNlXHse+nfqrwsL7a0Z%sin zu`V@P9}C6swOO-x)pJ3Q@6>jv!$s7gYurFQ&eZEu2;YP={54=wx# zFD>4V|EiiTNfRH6D&a!Wks#9(2mwtBOLK+9_>3TGzLu&d=AI8C#$pWnr{at5B@U{F zXEty04MGy3E=fIEI4YV^)n)0}iq^=0p2Gdf9+hO8#jW@?70@m%jLn!}vkX(iF~lvs z-P~*5vc5>Cw%&|w43m{rPiT!LRAXsE%_bpS5{jtke|d21+2yJc@kq@x+ZN`8!g0*xK+SQ8W| zi6Lnmsy;3k)W_?|SCnWV3y+mSHv>RU>{(R$n^I!AQew)k`A2iPe)H*V?%F1_csV34 zj$rx%!ogT+Zh)tj`DV(}w1q9(e8Cjx^mkqjsZ2*)i%emd6#_~(J#*w^gqpeNbS!WeaEtaQb@kMs9Kg=UkK-p z2bk)JKLsP-HaK}PsOluzURj!t`U$q4bj8M3vH)AU{B?KgEX0;tJs9`x`i)#1Y+vbL z$yhznI&%AJxw++6v67vil&3>U2cSan4zVTxhuoM+$|QK--1liOeXTt#g~f-g;ckNsYgQt{(6u?A@giE`6xz|j|CYqZA2z35)<1s-DA zYil1x=?^%$$n-26f@^cQ~05c)Ea5YMlBkgZiC#i6NYebc|`qw$iiU3!g986;?V;8~a1Kfdq z_fW2+#n~^^NQ`jabhNyYhKs|RHiZB{3!P`cLLc3rrxl2O-nU)RhMWKgf^9@c4-A*w zspANb3fK!pdH3kj`x5Kxs0;;!U%RG}RDG!WLSmKPObBCuK_(rDhFInJd7-YZ1^Npi zLfJN~&3nSIibRSl1NvVssk0O%bC^<^-^(4fAC+=Bwi)6aPU69Ne5J+jgs7+P0ihaqqlVn{HSUW$~$Tk=Eq|c7v zWW-#ut+wnK&TP%)p&{NIaSrN^!v>0ODjW=tGI3RP%Ak9VZ458v!a>bxtF`O+03z%c zCO0J@o1zb$u>|E>BYw{`eS6(xWZ%Q}x|nNsh274PLv_crl;y4W!mh_+?b$iy8quky zL>n&;7XHnR@=It&g@`Et#{sQ)M+2Sx^Ps(E*i!Vk1cR z#);{nA(o$ToMwz7zj^!L$bqxHRz>aK9KWqd7dfm~76tGAfXapB)+{ygR$AER0Rl~qv9MJ)s7geBsiGTiatEHNUv z_~!zl3%>^16KrP;Mc~G^I~)Rg_5rpbSF7KIGHzV1v$pELS}^)Vwv*eYBlzl8clLER z$1L~xRzB+0fK zXdQv6ASZ>ODOQhus4_h6&34Z4ew=ZC5^u3JG;NPh=c%LzXF0|DYy9iiOiD=r2P9 zMqV(lpU&5S6%v}Cg=Q_h{m5&RB9?8vtV>1F*AK5aUh0z69H z4q$epEM<$Hsdxaz+#1>y5~7z-v?8kd5k=IcDvnIR&q6`#TRALlMjJI;jMr-4_{pG< zaKeEYYBSnN*nIEZLxFOWh}LRQg-H zQ3lm%HmyXVNr*&~9Yg#hyOeB}IN?aUfIHv0fje2U5DWKm^TA6ff`U*mL`@A@L;Oh@ z5!%gu!HMyxD8s%Y6by}R?3EwgJcrGg96j_r#06+uXQ1YS&=u1Tb`sf|2~!+@Y=bBB z#x;5HrCjEQxfew1xrMO+!D56(gWLdZh@k`4Z$yaFT+>?Y>?*!6VA%MtT&hXLInq{+ z3f6UAMF|$IN9Mg7LMM-4{?hhX*s;D~iF;-pFE{VwpR5WF)gNx(G9Y>w@uf6ak%)sE zL5Zqa&r+7Jn)c5nnfUSz{EXkXBbEi#&>ABEvcidOKyBL?G&G~K?YVLaK|Tbf6v3a@QJ z=cfG3TaIf<%XBQjLmSE5-VZDJ#&3+h_)Hilj4e6vF3t`X3p`qtbEpp*%*+N2;oi!& zA=*rTxP2=|`>4l&pRE|WC}xD?L%3Y1)6g<6k(hvja4p{E}N z7s2E0Vf?zv#0Hf*Dl^lltrup?ZuP_j`ez(K1F)xw6iCvP#J+>*RLYYvh_Phk*biD* z$e8_uIDkfP+$r}GBo~@wdsOscERnDi5eaiD+Rb?>>l)$c8I*6mO2zynfA_GhGe+Ep8-f@igjD?e=BJ&$+(9yRqQ#7w@OHMW)BEFlY`UjjkUsS+>P0* zB1sl7{+}5Og$C1BA_N913xj8m1_~V4vn%RIRkh4frI3&;q9Mw$%HpAB>T;@_aq)Q% z+Aa$OlmOAoBMvCCGS|+5&Wlq7Eo(Oua&*1i&p!*NS|ziaPkr89-YiZLX8esrNgcPR%Q~YwW>mM@RFIWD2v}$sAddX9?O*L*J^4= zGTk?IUQ=2Y)W=lNpApF~$}V(cqb{oi<&3cBu$%c1UPL!gc}`rpC7wA=EP-Zgc^D~L zGEq_kO(g_PP<)*njsPF`&i>QL>dsM`$`dO`@v#gy@JN@Ic$>I7r0H+V8)? zbrf|#O3}%Eztoz+T*&YCu84T?Qq!98=ne5|E&XNY5@q3N5BYOBd2fA1nkVuVjuk2L zB8@#-okV>7+20De!M*W6CI1Y~kE1U}G3>v&gCaW6t_dFzIxw7`i?FQ=&Hnr73nCR5%D+scVkxEf@xZf!?JRDSH6wl^PC3Q ztso@gV<`am7Y#(@n1)&1tE@JJhWSyM@SQD0#I+@N_{E~4JE}9G)}pbX; zYw}g+$l|+^?&sv-V1^w=oh1TeeP%`|h!!4&gg~E~p?1;}SR)HyydcA5ZLO|#OdfKB z9=H(Et;94Mke!c@KSPgsR&1!qmxQTt50YU>9!+A;%id7aw+lNR7^LwoN~davd>8k{%+^4 z!nRd92534ONhum50Fly~vb1QRv7DbWR0EhUWDCoUX{rL(S)dzMK-e@mT6&ah_$Wbi zLxWBXfEeXMkf)@n4lROnX#tuTs~!}xv$7i*#W&g#Bsn0ehN_ zu+$w!{pzc%pnI<7MyV{-RHi1tx9S^gIqc$v$dBEw0_BUeqYam9v$TVS1oB}`h{?rL zs;D+`%1WJkTa?Yo&S%{utBV4g{zc4Ze76TxT*)|>q&qTau^CJY%A?5Y^gD!h5PRdl! zCz>E&V7V6DPv&|oUSchg<& zCcNxk*T$+t+_Ne01vG^(H#8GitaBS{ql3K*9T3DYV-s5VAtegqWgPfeB^-cdj;uNm z%RAzsL{}Ec9hEir*l)IcN4r8mPNM-pZaK}hpj7J<_3|vP>P50D*4jKXEHEpTs;Zq* zmMv@aE}QMF>vh(y^_x5H?G`5;WA?$;sK6bxsJ>@gT}b{-~CJJw?nmxNS<=W&UBZp%Sr=jP6R>n`$` z;cEjUMQn8+(+Fr1N-XPfC&YU}b>y~i>~0PbL~A~%t}SPH zChKKE7^2!Y6J|XITID98{QbxKHF8U}q#2yd@bmW%1yMlR{T^2%Yp~mg#*ve7>Au~R z4TM;yrSaL|D0!zeY&6}IrBW3t<(1`(K#jghDL1&LH?r(lQl@UMu;&Kj=UrnKk!*x( zX$Se=I}%lfJeAa$h?P_r4v$^+Q_Fld`HH!!aAuIed_??ftWMaLdetme1Il;aXlzQC z=UL$|t!2c)Ay`4Ttz+uUD`3t6lX$MWTDEnbXlU_)x#bCqi)OO`fcd>mBUnddqcdSR z+n_i&RGw%~6Y9Xlh5uFOf#Fr!g)KO}hiCJo28H>%tIwwJogaROY0{mGK}vg2T9OS= zCA3ZAxaZ+zji0kfkJRLvgM4|zZn*Z#u&%z&On)9o@?|sxGdx`Vly}^jVJ-oMt?Fk#(lGEWe(ZgZo*Om?|r;a+vTk`(GbxsN5Ou zGO4vhDq{HWde39>It}fsx%HFM{q@g3E3N7*6XI|c;gw0d<5;aZ__=W!T$|~Ut7mR8 zU&jm2+v2MiY+56mAAVJpKz-Sp;oNkdb8??I*J_l@6B= zSr^ub@}9?vGCXHSgXz-CkI$O7!17MdEnk#du6oIKmx6jLC`|Up;qY>w*8v9S3Dw;# z2L9+|*URqP>xqIW<@3u6wfEsT&dX%y>E$vuoUzwd{9e(wsh&pfiKgwd)D&<01ifN^ zp4^*r*pDfwfbrWfZBlJUC=0CvO zPLz^Gd5m?&5zCZV0REfEUj_X(#f^(=6vjiZF)BJm1qZ0=D`F)l$Fv0Uof_mK!Q;dC zdA)a-UWade4&q7i@BR)`0ng#EhDeyPON5nD704V2!|<+^`t;D1xYam>s<(Z4mXkDY z;_1jRCo?AVM8+kydbi=qftIcQxt`PkevbTTjM?*~WP&`P7|J}cmd6C=??qBFc0=grhf5V54HPc)WQx0< zSv*B{#m{{UhWgL;fqjOqyL;8eKp&s;+tAbTQx}Q;_+az;Kd95(tUvPX6dG7Wt?%yN z-Ek9lU!szEFN<)#f`>^8tJ5*j)Td9dU!Kub%2iDC&G&`j>}Jhb6AZxgivktzX)tZ0W=;C_B%Yrh5BClMwk~_ag|LSC#`yzx%@XHUc+yu|}xl<&e=O0+VyWAFLvbF9` zd-llV6(BED58r*Ft)~t1THJBp$Ahf5JH!@Aa6>d03SVUtkX^`ZP?fE*x@dB7?;tq- z{{9V?bpuEeWp)<;vhWx+S{S&&<&HD5b^We#PfYiRKHxz2FFCQRV1Lnky0jDj+H`MeR7AN=`@m zqJRWtRjGI}#O!G)l(1?%{>+Pqv4feu{$;-kcc99c_Ks&v3w9Lk%WlY`ANie9mFXZ@ zrOS)Ttec0-%7HaPlhUl2ih-7D!F+}q=Sl)`w@|5w6evH|T?Ry!XD)D9R##s|r>9$x_<)j8zHs5CRJXoqSDB~QR&;8BPOcRg+`!B$&aZ6C?eX`Wi4V{=VQ5#K^A z`{702GY*4TBdAX6kWJ@@k%{*&!$YFLX==FMjjO(2f!}ma*Y58_KXF`mh--*?^I7Oe z4PvGu&o_5!cLq4kMGr5H{2D$fAK=`mg@G%-ckeXC7S)LpM52LxU`?B@x)H}a3&o=) z=g-H-QUibV@RYH>uG+03Nj%Zp< zIyNaPopjDX8gi=!#hFfpgIFT0%W0L8sH|7t?@&@|?E$r=AYWqH*FuZ)s!c`-C<1r1 zAqCamD%@tQ&VhDtQZ)js(=lm9K>HpF?;P}0u{ea`ep z4sG(^gs^i>9ZHSYvq9MUDtIQ%q_IAu>8R{W<8y$DwlO9vFpaI5Uu*vpLPasY@W)w2 z6VGU4DYXXdz1ZKq>EsJN4AkOl>|X&ITyN|}FvLG|0IKWfGeR1IzPvLo2W>SRYbzB{ zf$~-iTUqDnUQV)5?{z-y2C!7PY7btG!{FRMhS4n<+v}A9kA!G=CwDVU_J-QhwU$ZX z%XD!4qYVm1E{6Lf?p5VS#_&&5pT&;8n)|JQ0olxlp9 zeTeL~IX6m}*QC0xa~GZW<&LU6h_HUI8r@@?rJv(6jWlU}|E3vd!~Q&D^oH#y{0+x2 zxBWKD_b%`r@%&g6QCzQP#KYl{g%370xY7{Br)Esht!@P%;I@CcuVhKXTnL`;2w6^k zY$uH$FFt*fl06p8Uyg*y4SNQt$fvMAmEB*&?4yW)`B4l-CzdXewA1?S*g?n;fF`6- zjXtVq{&~1Ps7SVj(QDUTifZ@}xmKe;W2sh@UR^@5$lDKT6Z}dQ_z?LyX1NjNz2d;0 zJC7IR@^PqX@7(-)@hEceH-G@z+K-T+i;GLAHr*OjHMh1g83pBz23h$&>OFH^gny

bYLlTGL5vqlue^}XO&XZ;D25uDM`xSXZyV)BzjGOBw1x5NYsKnzRooZW8$ghm31 zj)eL^eK(RHaJc|&`}z3O`VEjbrdwzlseve#Z*3P2=r9lzKAK4G^QyYrmAmn}=HRzB zYVi!$-Qv!jVJ`k`FH*QXeXb?UkDVR^m#7(&%G+4U`KOwYg4uy@i?gz>Yy$Q3lw3U% zr~+nP`36sFc)ZSTs9i(>O#^4#+~M3EJZ@9Ty7oHZepT8FZZ%Ytp!1aIFbDEDi zx@YP`%0#8v#izAI`^%5{xpTZVkT-S%$@!ltU+QQ#3l`^{l4{17qVqx_y5+3qndQaX z`X7mMD_}+$nCns9um3#B`nI$GBRps9tI*Hek`-jMj(Ekdi0T#thH9K9e|0;fT;8|Y zXW$$5VjJZx5?Rhq;p_T=7HBvfgW&^fIZrmThT+%U*cc6_J+Hq~QdT%kt#O`2z;J*1 zH+OX)>1}UVR zgSXh2l=8J<^# zDm1z2G(Y3-I!Z-q6u*65ixiK9429`S>A2oWFl4`h}Wy zm0j8Xz1-;eDZue}--&!U&-R9B>ha3Kl-m!zY=F`OJ5?NKfw7LoO&-?hi)PKG001_& zW1m_~MzQhwdE(fv>#t|JnZ$^Y2MApS_n#FeM;5?WHc5OMBfhrRa;(Q|602BAOlT1> z+M%v^{s#Vi9o@UJx_na%=5{07#A0uS0vm4pc4WSv8QUU)gpF#*RX_7OvY#Eip%y_=$UKkzdWDf4qwv6fJK4>e^C=6i zTZ_)*z-EAn^mTjk0U&4^f0mlz*2!Wez|?(ay|P|Vbo?4S)A~Bm2lKF}F<^l-QVqGW zr%g8+kedlUURk)px6CtiR_fBWvjUr;7ac>zzBsL7HkBgrC@YalIngi{7R3!!Yx$<` zY1uA)L1&kbl$RfxX`iZZhLK2%trBwtD!eIjx3IC6=wyzFB)g6JnNzm`=ptSg0gc^-8P;LPqpQ zs@lFDrw!#}!LbjDuKv3KnZ{3Zm%i#OSMeR2jYebt_k2n#@Qi_(LxLIb8R(we#Q=7% z|C|h`o+&C`^Gz;yMXWoRD<#yraLMJP(WE}&fwTL2OPvAoz~}W&a4u&A{*J`%C?m>x#l#MTUPvx(DwGDu0t(i<6cdrd-xt8r8?K(X_5442BjLdT5HQ zz>FpO=LAM{W8m=}85K2zq>v?wpilI}!n?^%RN2bm_Kit4d+rHqNsM9wOE0M!^)A0U zsVs15fQX7CpK5%qd#|TicKkXRr(dPhR@jx3APM9jeeWpVv41x%FVt1*2~$M_kf>NFkt7+adKMBy9}alHsXI_vHzAzRsbAYkQhJnhS6u0;T-o zgQe9`PjVG_AYWX7o63RDPibnGvD~|__Q0sf%_f-@R)-l&EbefduZCaD$-t|b$};tZ zvI_Syj9?`UWKl%KdU4aCAaPTH>Iih?N8D?4xk&`5X^82NeS`O$7@fiH>-xjnMjB6-S3zDx(t z4UWpu7ia1q zQ8L(=v-=QSJ;cCjOe^wQ_ZjTL!r zjsn1o#6*FJB}c0*1{c1Lf=sPGYUnvK2Q9%qlr@o&CMP{M+Q&5P4q1VO*Uw}1nc$l2 zuQ`Sc<*ZebZXGL}nK@F5V@-TyWA6sO71H?BJfq_h{6Md1OSmPWGc#>?-iTuXX;q}v z6K)wKBJz^sKZWWObAHATtkJi?q$RDKOSZnVL*561FeQeXxRS{U*{$j4Z}wsxZOPbG z1un*lDp#F3X+rK#L?A(q=UWAAd2bzrSd}yC>u)R~Y4Fp~>#t9ZxT(#=>K@y-4&%IG zN!FW_aRB&S61mIf;V6EAxKIDKdvhih0w%YZ2w{rYJz2f7Xr>nPmpS>O1fkQwJ`o}H zAx(wC2ISQgqG`$RTqwi;E5+C>EZtP|^M`*;?toTx3D54{$l_H;0C)bzHSh#cU!Bn{ z__@%jBMZmd^Ca5E_TsNMeH`8slA)*lJSi}nKP4$f^&T;tIr2eju(wnM8r(o?lHyCn z;b0^hK|;AjF+I`V@P;BH+jBjQuynPQ7l}oG56?JeJeUP@zxkd%Kv3PfnEy?08ys%Y z^Zn{;dK`7~UvGEA7Qd47<|PiBz8wWv(J2^cf}we8>GPE%1kM5m49F z#4F|Du`}$FCxmS+H^#(d^pH2Y<`LY1%LMd9p;qk5X@zB@BUA|nDEKcErE-=`*IDC3 z>WZ=8@t;7xm}m025dx7fnJL^Z67GN}CEP|kQnx%Ur=O2?IMC7Fbn?U+(xt1`vD2h4 z7%WAe?yNhZh{H8o>{d643Ac6_usC}G03&7)T(sJ3B}QzMKMlpSNOGtV4#GH;$*bp0 zRO0RX2~5q9%EuRW5_3?eVEcG6WPYd4A56{49%B%{Z7SR5?0blG2Q@ad(( zW!p1t1=Dx<12vT&pt1zY@9_Fce=-Jsq01*FkIGHe4h9}djGcSd$OT$+rEXoKTlV<; z?=+p6e?v7Q<{~wRV??ZUZ$8?<`R=PdrRF*ZJ~rpzl%e+K2_;XhK@u=SRGd<#?nP11 zMvS#EQnW(#1w{$W0C*b-Oe$l#O`d!-?jXj<4%g-mMe%VX0LrD^2Ts;?O0x%?8FAa$ z@M`hT%D#jSI`X8-<-CL3Sw@-+QA=F_k;}ti6${q!33HZ9zu9MPaho2}3*vmsP3%S7 ze6jcSQRMRE{GGDnUs{X@+nBtTgn_$ZACidSlX2uq7o6KqBxh6D-4#31F z-26F@;8!}{h1MqVI+de#;5)FyX2NJ8;=e@OM!v?*AM1L5FOLEtu<6(#L%-L~M?yMv zcVUC9hJSM|#EDNHU=3y+cKb*RlYe#szmDR}6)zdzd!9MVMj#9$KG0N3jj4^3bEXA(5&mZ6P~cc84(t0-RvFSsX*U#lq#ol<;oFJcSEuOVc>J0+kv|RFK8&tPg~m-eo@wUgLV_MutkckNzxIjV)LBw_7j5G*mohpb=Ju;t^!WRCFs)!Qew zipy*-KLBLm3R%w8)TAcF%F%R%xSc;c1`Rw(eMpM&dyTX$is4jhf_h_c?OJ0lOAeOL@%uN+_4@wSwkmSY_VpY1@B3ABdEIkE_(Izd zz2=0$OcmckEont)LYa;v2h(ayX_BX=?g7W2FZ1dUQP>T$N98BK`ZSbZbnHCB)FM6W zmFy*wCjVXad6Zv|sl(L`i=+~(As{TpSuuDhjEw>l&xq`~TE2Dmj+JPFJF^Py7GnfE z@*kd&-AAvalmguHn!N;^YnYX)lsi#9U{X~qAYw<7ksp>-)*pHCTRVC~OyQKY^?+)> zlnd1zM=-ZCANpfa-8}j|_Ld7wqt(>?%!zv0m;FUl8m>mWA|`0&Vj_;QkDwys?p?#M zN8$&xm_s%6S;acc2vSo>TY*tb8Q&9DzJ+ba|wN~|t7{W~|=qni- z9qWF}q}V?Bo@>W-6hFf($Zh})!!<``1?=dueN2}RNsYbaat>RKN4*NAoy4R&G)!)u z&L^`0GY&!aw^~iLJ z%H=3@4Xx+de-sMxTJC6Fu0?LCITE*vUKszYgn*dLaT%5MqzCJP#t{a#v#;Fn42%!~ zF@e6dT$scM{VS>Sv70ZCQf2n;GVm-WE@+-6k(`*RQE`ugqp1g`pq%91WW}f|GwZutQP@&JE`TcR{uK~f10hQxD6=SM~ zz8|~o3H{VsvKF$TV#_xEb9?Tbf^r^)Hw;P?3!hoiMlQxm_&4X3E>c8`D(T5h2}24w zH%^VUX%{ceuapj~&xjbq#=nxy=f(_@HkcL}EHSsLBpJuqKE;@YqXBcLo$tNg{#hKD z*{ht=@cQQ4aQEV%yvs>{CX0BX>b(o{iuFf7soynEpx1R>es`&jXQQ$Y)FBxB&`vXA zUV8=`;XY0~4kd0CqwhJDz}lHIa@}1h{LPT{^&+~N;=ZV}6CZP0clC=UswClxCHHrB zL^nL^OX*vVNL;={rR}Fi=Tk42^*Ap77|z?iy9ysni~f|tYEP7c8|Ia%UXfEbfl;4m z#K>$c=dGu`V((1Xq~}k9Ur#{{vNZx_>brV0-|N4C?HpGb*q%<5@mP4;luC4U&I-FY znN=2d{O)JLm8C@T=waL=y?*pd+r;P$ksv7RZFH2>Nnc~cYA5mmlqF(9^ogIe)XKmK z4k?E&F%uRaBA{-+0Nx>+p$t| z>r@X9%(`k5aQR;Wl^bg0nwLQ8dn)us$97%11#F^}b?V1OQkBXtq(KYDbLP5TclZa# z&xc+Z<{^xjuEUg5v*9W&C!ENH%B3HrMk6f`@ltWTk+~wo4dp=tJxIl&_}{HS1uX`4 z`ozy;dqKS-wI>uvPOB48TUnH=s_X@p;t@zF?GVB23 zets>GT&PWRl4O)ooV#v}RX}9Kka@Zg)`Ei&9KmaysM{lTNQ13Fh=vb_02*Q}jT$jy zLl|Tt6V@DLx+DXr2>rxxxgV^yUhzc}~?_nUIi$^GFCY8`smr8*yxZlY3@86zz zCit+1YeVmeBhmK(R@wTA^m^&HQW*u6;gcjluWCT)t!)?uQm?WUqktQ92?Y`5W=Sf0 z!lll%qvO=4MNeqbwlSD=7qtvXDcVY=@M6`qh?0@X79lLjJ<2Z^p`FHqa{yTpOud#v z5#437iUS3Kb*z+VUacWAtdy(_sP91map-j*fV5(YuiE=Ry{q4Erl!vxGd~vlJ6FQ- zy?xKi|6aqBXW!j<-WSjFIex~!rQ!dNbBC!lw!PnZ-gRC__WB;Tv602lIN#Cga_r@L z|D*VQt&87Z&(r%>yC1RUdOSZX(9iRJPTS7$yxvF6^mH=$-&>~heQuAe#pUt4k4L)r zyuV*pkEPiDUwfI@`hAx-_B~!drP}d#U%B~z2VLbof2sC+-y?&);eVHbt=xS5EvJd( zOwMQ9>GiYrzUPJJaCN6!+HCvX&$sQ|%C5A)a?8XFBe+QH!tz~{Ei2o@9-%GmtLsP);euvfazlW#f_TL`&D_@VR*>gPaH{H_rJ{te0-u;$40D!*`0bfi& zSfC381^g;1wvYw1AS{X?owy(^1OkNo_#3a{KLqbz=<(X zMS=j)Of*4A@ll-IAVy3iK&B2!$|_$FBZ$KAa7+Ytb;-9|FpZiqxd?5b3AC$Gmw8HY zI3B1Un04?R){y;02?h-Ugr5vEL~~eT%e7s*JU9jh#aE1monWes$x}|_5zfwHMyl5r z&n9U$X$K-wM}or^KyoLPWfDll8^BGeRK_5gh(<44!Y_IpPWNxV`Fy{SNjBKoO{SRg z-6=hSqaJCUqE(eaP%3M-F^xp1$QDKr#pvwzIUAQX-P2zWXO9%5r;kz!ca(CXGUi#r zAgL&t8f%D1goe8I_hTjDyuJ@DjGDbB^>}LaT;+2HsVJ{1JQs%cyn6Su)6MGMM4=tm zIdyzyD?4WpE_0CWwrbr4s;(&%Bv`hn-i8*E6vxpjC??(4POeoOGDeCQQ;rPm*lAFN zAtYPAa}rRhrb#%j#N!vV+(hFGAe^(>BRRM-eAQs1&L z3WYb@(NiI=42!CFgaY#FWZ*za5@e7hvq;SFmT1gzp;*ZjY)BKSiGX8FMG(OfQt6ls zanqAou4$-dOQG`4RS6srmw9Up2+RD%j9(z6nV=6?LkI%@BbUZ)0wn zY$*Cm@AQ^=yT@r>VJ|ZAlDjx!7#b4TFVeiUDb<3W7$ZQBZQir>nVC$Pmokj{yOGw) zV3J534MGSO!O-QS`ix#YRaHu($N32*1+Y5ta!6HGN-TMON|UY#N&wKo4Gaqg9*vCw zuS2}5rdL-kMHT44JTNrDZK6U#Q5bX6RTxziRhoP>28kj71YkR0Qw^}D1Yi`vHC|qI z%$Ij_6<0BgT%I)uubd>16RQK?)O!K~?T2XTZYGs>`c|#!6q<0iN>YruWp3Epwp5iX zCONH~)Y4fd^H#L1@LG10#V|4Gkd%(Mur`;XSlj#JKZ+HCRV_7X*n#yaAzY zo^0HX2IHShzS^iAa(Fqid$~)=H#>Hsti=hoD$ZKdLbF)9yqSnFNuvaa4O57k>eBAY z6}^J?mu2n68Uj~TotMi7APm#xR&PMG;&f=ObY;kxlbFDAu0o5%F4avdm;y)-A+u!N zE9GRtX<8x{l1RH@b&gvsMBuf3voQ^)W+3ar1#P1?0jA(lh6~VL!OGQcAR4!*lZm2WCH49A6G5D5XJch1w&*0^L2E(MvE zJ=vJhw6$+U$%>=aU0c-F8JD3LBvD&CbO#$VZ4jzTDQmEIU?{OehIbK?hS+LF5i289 z+X00TM3a*e44k;kL5j1MEXv@B#}*h!)hjSG%%M$k#iy8>P)kNu3n@krn1PDhFJ;WR zMvx3J?MiOC^2Id!46Ek#j>tr}ZYOgwbYD@iU`_%E!Dgt*D2=oMkb=6^mui)^td^w= znj9?{6BU*#~2Jlc9k(qT1d{ zm^+#kJgbbmrJJ_QywI077a7w=LOKTZN?daEHQCmVAn6QIvx7wjP7znw&I#V&MT8ly zsC%^ZTGXJ!JXtl{fpCZlAh~Ax_YxO8=14ja2=RndTN)CTt=W3s0NDl!2ps=V+d1ys zb0Ek_76Z0)TThQ+c(TG!q@>#ojkiEyqiLj&r3y3(1BD$SLwkN_Vo8?YrP=cbuOyNx zi^3N0{Ram5sx-YUHtLl93KGiB!BhmTqcmAM&z2k@)zD@E&p$wJh#UK$DsokN8WRuUP}BqX{MeZpz3u8+@cA{AS@bt0s`3bu3SE} zdO||pb0i4|vu{gAR5q~HhHNAxFU0WSSXL+(BAIR#1ruvj!-^Ygdf8^ZsX+mB=~l3* z(^llOUez4Y_^II953X1>|Xu!kGZOnP6tEoMFdT`co^rax1tbz zo#2G<{ThfSN1zX=0xu74CR3k71G}NqLx2v`aZ_sUM$q%dgNSPGfkh4N!=r`h zRuUGQC~x7Z49I1}HI5eq0z{EMuY!1mKSBr#cWi_pN`*@V1^5C2<7fyAV!7;YprYcw zUTk<3H6fnb8X>2pxsaBWRcS(2lq97oIC~u}4PGHcu_aE}(zG@7K7^~%)GO*%!%_h$ zBn6_?UeMML=qh3e-4PDOf+2#nPwH%m4NA!yiRCC$s3e$Y3Jgm&+T7HYW@Q)#ARX~F#ZA(z12q&P6l5SO07K1Rzy0{iyQw`S@y87S2%+i{l=uz-|xWlUAdm{j)a1=Ug!j2c8qSHbki-xSS%{MaZ4HrHY|`41t9avPPW33WnhJ@y@e;L*JAWFcVD3OyjAEm-hD0dNlQf=Mxd zNaU&l@SYoex-}bvxf(Tn!UFu{P(<5-0eFG}#OeqO(_$|?Wd##0w%Z#35o~fCw$i)6 zKwIOy&LokJv&3cngfFb%0kfW3S$W&0xKK?gKLRX zw_)9C0)jy&yG-t=z!Zf6k^&2)35;W^Kt%wm&jUP7SbMuNIv*10c1%o@aW|x8s}gaE z>7FQ{qc5%>2JdmDmz5QCBLRl-81T5sxqQQ0IGS4EFB-%`2!b~*rpU7^1#ae?R?{tB zJ2>R%slg5-0I2e9YuFeWbs3dWWsVbdGDz!)6zT-T?pRRn;t+!an6{`Z*Ekt1sAv#r z7#4-y&^6bikdp$yv!p{Zks?6n1Efq+QQ5hM$pi<@h&nWM1i{U@g;RNOE^xY?*?kn3 z1uowlIoNtj3}uxueK3@s9q?=P+lbl zB3uhGy{%gD;1mKvPk#3Apxb*l*!QOT*OLIacD>aTSI`WFn(P(90)vN{7=d4MM6a@_g3!+Dx za4Uu)hGbsDx;7^%-FK4gXyO6^lLU542%OUT(X3n-J+Dae)D2bZ^k0Hy&X=th+q$ zzPl4xn?hja+`7i;8DmWjN|#dWHJIKE-TK<7xC8~U5}yx_L9xij2u==4g*8P%R9jbg z1Q!%ifU>HHRaArp77C*J=%7N!6G61(17mSS6I?)D>vguMB58sGzz`Qht|W|tD7J(e zVkAQ)!qv7R!d4Fbfb@Vl3Lu-oz&rSqZ4M_P6cIJmMc}u`DX~FCgMr~IzXS!sm=gYN7+VLh=xNK7){Wb~|uB;6Ps{Km7y+${vm% zuZ$XU_Z+_DOG8gY0bahOkUq#DED#q8763O82;vb1$D(FOXh5o>p>ZzdRJn03K|wvh zfWIykMYQ8|nDH`AC{%t06@x=gj;2NV39?HpGhVKT$zL1WbVnMw*S><1fwRTr!1py~I#3L^ASZ={l2_73JuFp@|RV-U#p zR0aD&h$dTd<*%kt7l-;kS6cVmz#st->8w|n4c*wc@ZR6tk8p~I?tfqU>K6F0rF9%Y zfVn_`ut0K0DWIZp7$Q-CtwsPSL4pDlU=CxyhUOnW9=^nr>MXuwjGsQ!>Y?&J9ofL} zA-gYtggLU`vr+b_R64^?4xbJOfdOEEzbo0_RQ%|1oYw1#!wgH#NFXkdG0m{ZhA3q? zn^iZe3ND=ulr@0?de9ISj=VEsUf9eY%}2OCu3~`jxoxcp(V`h+iOkb zZ&mGd&eTyta(dMFJnF8UYxKfEfCNJU0d}l<4$#B#G~jx)KVEGLblYt|H^Oo4D49ct z=QK1pcJvr#3?O{W8tvs(Qc}wdwl+4@Rd>n?Cl12gF%Fdr&BKKPLO={GZ-N5R%5b!F zn|9=ratI5?zL~JxLs}P<6k8~8!2xi%5Xl4u$Qrru9d`)Z2OAK8fVFko7}Z1)==@`V z9`DWIl0j5n<043s0k`8C_@G;KTc{|xH_0TD6F6lglM|_Q&xUk1kfb(H*m%w{+%ZrV zJyX>@N<2+kHI@+9q@^qE{u*Q%Gm4;tG@4`#rs3O(IBqQ=?eiu8+%_^wgcrAwA+(4& zN*VzZa`I9-Eafb~wAXD9^7q7fwOn~<{*43SY0fiBsRV8MMZMiHlD67E=y zh66DIPR$(AJC6W9_6BAn4s$eK<1>|OG;H62HwZ?{m@Q(S89Xmw6-Y|~dIJZ^-IWr~$ZQx|mX z+|a>Rxbv_{jy!{KPNqP-r;XI2OciKpEzFgQ7b(t{q*M+v(Iz<}Wd}(~HO*@kTG$Jv zv>lCeu%0VjQ)D`Gfvh~G=T#fJHab?#+M8FaCh1YE#kFj42RP>9%2p{^u%#xaW7z?9 zCR(pBvX%IlL(7Ba_Fk-$JIxessKUFYcSdb$cAJuDAyT+r8Hy(Y(grY%S6i&>mx63u zmXu9S)aA%_Dra(lqlVJnLWbQwGPpiD@eyM07~>tDcrtemU9Ghs*lqdBjG7ZdLsn_j zs18LEmZ0s>w-Iih?_E;7)J;k<^7ZCeaz<9QQfk2lnJ}^#EjZ%&(9Mx{tY%ia%M@;f zCF1o9CF@odmT95V% -# paste0(., collapse = "") %>% -# XML::htmlParse(.) %>% -# XML::getNodeSet("/html/body/*") %>% -# `[[`(1) -# node_string <- renderNode(node) -# node_func <- makeFunc(node_string, "camera", "outline") -# node_styled <- cleanFunc(node_func) -# write(node_styled, "~/Desktop/test.R", append = FALSE) - -#'////////////////////////////////////// - -# define a function that extracts viewBox values and converts it to R string -viewbox_string <- function(string) { - l <- stringr::str_extract(string, '"viewbox" = "(.*?)"') %>% - gsub(pattern = "[^0-9]+", replacement = " ", x = .) %>% - trimws(., "both") %>% - stringr::str_split(string = ., pattern = "[[:space:]]") %>% - `[[`(1) %>% - .[c(3, 4)] %>% - as.list() - names(l) <- c("width", "height") - paste0("\"", names(l), "\" = \"", l, "\"", collapse = ", ") -} - -#'////////////////////////////////////// - - -#' @name makeAttrs -#' @details -#' Modified from the original function "makeAttrs", this function -#' extracts and reformats svg attributes for use in R. -#' @references \url{https://github.com/alandipert/html2r/blob/master/app.R} -#' @importFrom XML xmlAttrs -makeAttrs <- function(node) { - attrs <- XML::xmlAttrs(node) - names(attrs) %>% - Map(function(name) { - val <- attrs[[name]] - paste0( - '"', name, '"', - " = ", - # process value - if (val == "") "NA" else paste0('"', val, '"') - ) - }, .) -} - - -#' @name Keep -#' @references \url{https://github.com/alandipert/html2r/blob/master/app.R} -Keep <- function(fun, xs) Map(fun, xs) %>% Filter(Negate(is.null), .) - - -#' @name renderNode -#' @details renders svg elements into R code -#' @importFrom XML xmlName xmlChildren -#' @importFrom purrr partial -#' @references \url{https://github.com/alandipert/html2r/blob/master/app.R} -renderNode <- function(node, indent = 0) { - tagName <- paste0("`_tag_name` = ", "\"", XML::xmlName(node), "\", ") - newIndent <- indent + length(tagName) + 1 - XML::xmlChildren(node) %>% - Keep(purrr::partial(renderNode, indent = newIndent), .) %>% - append(makeAttrs(node), .) %>% - paste(collapse = ", ") %>% - trimws(which = c("left")) %>% - paste0("htmltools::tag(", tagName, "list(", ., "))") -} - -#' Render SVG +#' List Files #' -#' Render node set into SVG icon +#'returns data frame containing the file path, icon type, icon name +#' build data for specific directory #' -#' @param node output from render node -#' @param icon name of the icon -#' @param type icon style type (i.e., outline or solid) +#' @param path a path to the icons (i.e., node_modules/...) #' #' @noRd -renderSVG <- function(node, icon, type) { - - # string to inject input arguments into element - optional_args <- paste0( - "list\\(", - "\"class\" = \"", - paste0( - "rheroicons", # global class - " rheroicons_", type, # icon style class - " rheroicons_", icon # icon class - ), - "\", ", - viewbox_string(node), ", ", - "`data-icon-set` = \"", type, "\", " - ) - - # add optional arguments R code + fix viewBox - svg <- stringr::str_replace(node, "list\\(", optional_args) %>% - stringr::str_replace(., pattern = "viewbox", replacement = "viewBox") - - return(svg) - -} - - -#' SVG to R Code -#' -#' Wrap two SVG shiny tag strings into an R function -#' -#' @param name name of the icone -#' @param icons a list containing svg string for solid and outline icon -#' -#' @importFrom stringr str_replace -#' @importFrom formatR tidy_source -#' -#' @noRd -svg_to_rcode <- function(name, icons) { - - # build url for reference - urls <- list( - outline = paste0( - "https://github.com/refactoringui/heroicons/blob/master/", - "outline/", name, ".svg" - ), - solid = paste0( - "https://github.com/refactoringui/heroicons/blob/master/", - "solid/", name, ".svg" - ) - ) - - # build function - out <- paste0( - "#' ", name, "\n", - "#' @name ", name, "\n", - "#' @description Render an svg icon of a ", name, "\n", - "#' @param type render an outline or solid icon (default outline)\n", - "#' @param id a unique ID to be applied to the svg icon\n", - "#' @param class a css class to be applied to the svg icon\n", - "#' @param aria_hidden should the icon be hidden from screen readers", - " (default: TRUE)\n", - "#' @param title a string that describes the icon (optional)\n", - "#' @examples\n", - "#' rheroicons::icons$", name, "(\n", - "#' type = \"solid\",\n", - "#' id = \"my_", name, "_icon\",\n", - "#' class = \"my-icons\",\n", - "#' aria_hidden = FALSE,\n", - "#' title = \"a title for the ", name, " icon\"\n", - "#' )\n", - "#' @return Render an svg icon of a ", name, "\n", - "#' @keywords rheroicons ", name, "\n", - # "#'\n", - # "#' @export\n", - "icons$", - name, - " <- function", - "(type = \"outline\", id = NULL, class = NULL, aria_hidden = FALSE, title = NULL) {\n", - " stopifnot(\n", - " \"Aria Hidden must be TRUE or FALSE\" = is.logical(aria_hidden),\n", - " \"Invalid icon type\" = type %in% c(\"solid\", \"outline\")\n", - " )\n", - " icon_styles <- list(\n", - " outline = ", icons$outline, ",\n", - " solid = ", icons$solid, "\n", - " )\n", - " el <- icon_styles[[type]]\n", - " if (!is.null(id)) {\n", - " el$attribs$id <- id\n", - " }\n", - " if (!is.null(class)) {\n", - " el$attribs$class <- paste0(el$attribs$class, \" \", class)\n", - " }\n", - " if (isTRUE(aria_hidden)) {\n", - " el$attribs$`aria-hidden` <- \"true\"\n", - " }\n", - " if (!is.null(title)) {\n", - " stopifnot(is.character(title))\n", - " el$children <- htmltools::tagList(\n", - " htmltools::tag(\"title\", list(title)),\n", - " el$children\n", - " )\n", - " }\n", - " return(el)\n", - "}\n" - ) - return(out) -} - - -#' As SVG String -#' -#' Convert Raw SVG to R Shiny Tag String from file -#' -#' @param path file path to SVG file -#' @param icon name of the icon -#' @param type icon style (outline or solid) -#' -#' @references \url{https://github.com/alandipert/html2r/blob/master/app.R} -#' @importFrom XML htmlParse getNodeSet -#' -#' @noRd -as_svg_string <- function(path, icon, type) { - readLines(path) %>% - paste0(., collapse = "") %>% - XML::htmlParse(.) %>% - XML::getNodeSet("/html/body/*") %>% - `[[`(1) %>% - renderNode(.) %>% - renderSVG(node = ., icon = icon, type = type) %>% - cleanFunc(.) -} - - -#' @name cleanFunc -#' @details formats R code -#' @importFrom formatR tidy_source -cleanFunc <- function(string) { - string_formatted <- formatR::tidy_source(text = string, output = FALSE) - return(string_formatted$text.tidy) -} - - -#' @name get_files -#' @details returns data frame containing the file path, icon type, icon name -# build data for specific directory get_files <- function(path) { list.files(path, full.names = TRUE) %>% as.data.frame(., stringsAsFactors = FALSE) %>% @@ -267,29 +44,94 @@ get_files <- function(path) { } -# @name init_files -# @details a short function that creates the output files with notes -init_file <- function() { - file.create("R/icons.R") - header <- paste0( - "#' Heroicons for R\n", - "#'\n", - "#' @references\n", - "#' \\url{https://github.com/refactoringui/heroicons}\n", - "#' \\url{https://davidruvolo.shinyapps.io/rheroicons-demo/}\n", - "#'\n", - "#' @examples\n", - "#' rheroicons::icons$book_open()\n", - "#' rheroicons::icons$book_open(type = \"outline\")\n", - "#' rheroicons::icons$book_open(type = \"solid\")\n", - "#' rheroicons::icons$book_open(id = \"myBookIcon\")\n", - "#' rheroicons::icons$book_open(class = \"my-icon-set\")\n", - "#' rheroicons::icons$book_open(aria_hidden = FALSE)\n", - "#' rheroicons::icons$book_open(title = \"read documentation\")\n", - "#'\n", - "#' @keywords rheroicons\n", - "#' @export\n", - "icons <- list()\n" +#' Append CSS Classes +#' +#' Add rheroicons css classes to svg string. Several CSS classes are added to +#' each SVG icon. This includes a global class ("rheroicons"), an icon type +#' class ("rheroicons_outline" or "rheroicons_solid"), and a class based on +#' the icon's name ("rheroicons_academic_cap"). +#' +#' @param svg`a character array containing the SVG markup for the icon +#' @param type the icon type, either "solid" or "outline" +#' @param icon the name of the icon +#' +#' @noRd +.append__css__classes <- function(svg, type, icon) { + stringr::str_replace( + string = svg, + pattern = "% + gsub(pattern = "[^0-9]+", replacement = " ", x = .) %>% + trimws(., "both") %>% + stringr::str_split(string = ., pattern = "[[:space:]]") %>% + `[[`(1) %>% + # .[c(3, 4)] %>% + as.list() + + # set names + names(dims) <- c("min-x", "min-y", "width", "height") + + # return + new_viewbox <- paste0( + "viewbox=\"", + dims$`min-x`, " ", + dims$`min-y`, " ", + dims$width, " ", + dims$height, "\" ", + "width=\"", dims$width, "\" ", + "height=\"", dims$height, "\"" ) - writeLines(header, "R/icons.R") + + # replace in string + stringr::str_replace( + string = svg, + pattern = viewbox, + replacement = new_viewbox + ) +} + +#' Prep SVG +#' +#' Load the contents of an svg file, add CSS classes, and create +#' structure for each icon +#' +#' @param path path to SVG icon +#' @param type the icon style; either "solid" or "outline" +#' @param icon the name of the icon +#' +#' @noRd +.process__svg <- function(path, type, icon) { + readLines(path, warn = FALSE) %>% + trimws(., which = "both") %>% + paste0(., collapse = "") %>% + .append__css__classes(svg = ., type = type, icon = icon) %>% + .extract__viewbox__dims(svg = .) } \ No newline at end of file diff --git a/dev/icons_convert.R b/dev/convert.R similarity index 57% rename from dev/icons_convert.R rename to dev/convert.R index 7d0a0e3..7c87454 100644 --- a/dev/icons_convert.R +++ b/dev/convert.R @@ -32,47 +32,30 @@ stopifnot( ) # init base file -init_file() +# init_file() # run loop +rheroicons <- list() reps <- NROW(paths$outline) pb <- txtProgressBar(max = reps) for (i in seq_len(reps)) { - # msg - # cat("Converting icon", i, "of", reps, "...") - - # Generate Shiny Tag Strings from Raw SVG files - outline <- as_svg_string( - path = paths$outline[i, "path"], - icon = paths$outline[i, "icon"], - type = paths$outline[i, "type"] - ) - solid <- as_svg_string( - path = paths$solid[i, "path"], - icon = paths$solid[i, "icon"], - type = paths$solid[i, "type"] - ) - - # Generate R function - r_code <- svg_to_rcode( - name = paths$outline[i, "icon"], + # build master object + rheroicons[[paths$outline$icon[i]]] <- list( icons = list( - outline = outline, - solid = solid + outline = .process__svg( + path = paths$outline$path[i], + type = paths$outline$type[i], + icon = paths$outline$icon[i] + ), + solid = .process__svg( + path = paths$solid$path[i], + type = paths$solid$type[i], + icon = paths$solid$icon[i] + ) ) ) - # write function to file - write( - x = r_code, - # file = paste0("R/", paths$outline[i, "icon"], ".R"), - file = "R/icons.R", - append = TRUE, - sep = "\n\n\n" - ) - # message setTxtProgressBar(pb, value = i) - # cat("complete!\n") } \ No newline at end of file diff --git a/dev/dev.R b/dev/dev.R index 76fcce3..9dfde42 100644 --- a/dev/dev.R +++ b/dev/dev.R @@ -2,14 +2,13 @@ #' FILE: dev.R #' AUTHOR: David Ruvolo #' CREATED: 2020-08-07 -#' MODIFIED: 2020-08-10 +#' MODIFIED: 2020-09-06 #' PURPOSE: package management #' STATUS: ongoing #' PACKAGES: usethis; #' COMMENTS: NA #'//////////////////////////////////////////////////////////////////////////// - # init primary files usethis::use_namespace() usethis::use_description() @@ -18,30 +17,25 @@ usethis::use_github_action_check_standard() usethis::use_news_md() usethis::use_testthat() - # pkgs usethis::use_package(package = "htmltools", min_version = TRUE) usethis::use_package(package = "shiny") - -# clean up existing icons -sapply( - list.files("R", full.names = TRUE)[list.files("R") != "launch_gallery.R"], - file.remove -) +usethis::use_package(package = "stringr") +usethis::use_package(package = "cli") # convert icons -source("dev/icons_convert.R") - -# unit testing -devtools::test() -#' devtools::load_all() +source("dev/convert.R") +# use dataset +usethis::use_data(rheroicons, internal = TRUE, overwrite = TRUE) # checks devtools::check_man() +devtools::load_all() +devtools::test() devtools::check() -# pkgbump +# init pkgbump pkgbump::set_pkgbump( files = c( "package.json", @@ -49,4 +43,4 @@ pkgbump::set_pkgbump( ) ) -pkgbump::pkgbump(version = "0.1.6") \ No newline at end of file +pkgbump::pkgbump(version = "0.2.0") \ No newline at end of file From 89e4e1208861de0cb0324826593fa9f11bc116ff Mon Sep 17 00:00:00 2001 From: davidruvolo51 Date: Sun, 6 Sep 2020 18:47:44 +0200 Subject: [PATCH 3/5] updated unit tests to match new functions --- tests/testthat.R | 12 ++-- tests/testthat/test-rheroicon.R | 66 +++++++++++++++++++++ tests/testthat/test-rheroicons.R | 98 -------------------------------- 3 files changed, 72 insertions(+), 104 deletions(-) create mode 100644 tests/testthat/test-rheroicon.R delete mode 100644 tests/testthat/test-rheroicons.R diff --git a/tests/testthat.R b/tests/testthat.R index bb284c4..fb531c3 100644 --- a/tests/testthat.R +++ b/tests/testthat.R @@ -1,17 +1,17 @@ #'//////////////////////////////////////////////////////////////////////////// #' FILE: testthat.R #' AUTHOR: David Ruvolo -#' CREATED: 2020-08-10 -#' MODIFIED: 2020-08-10 -#' PURPOSE: main testhat file +#' CREATED: 2020-09-06 +#' MODIFIED: 2020-09-06 +#' PURPOSE: main unit testing file #' STATUS: working -#' PACKAGES: testthat; rheroicons -#' COMMENTS: this file was generated by `dev/dev.R` +#' PACKAGES: userthis; rheroicons +#' COMMENTS: NA #'//////////////////////////////////////////////////////////////////////////// # pkgs library(testthat) library(rheroicons) -# test +# file to check test_check("rheroicons") diff --git a/tests/testthat/test-rheroicon.R b/tests/testthat/test-rheroicon.R new file mode 100644 index 0000000..f1814bb --- /dev/null +++ b/tests/testthat/test-rheroicon.R @@ -0,0 +1,66 @@ +#' //////////////////////////////////////////////////////////////////////////// +#' FILE: test-rheroicon.R +#' AUTHOR: David Ruvolo +#' CREATED: 2020-09-06 +#' MODIFIED: 2020-09-06 +#' PURPOSE: tests for the function `rheroicon` +#' STATUS: in.progress +#' PACKAGES: usethis; rheroicons; +#' COMMENTS: NA +#' //////////////////////////////////////////////////////////////////////////// + + +#' Class evaluation +#' +#' Does the default output of the `rheroicon` function return an HTML +#' element? The SVG icons are stored in an internal dataset as SVG +#' character strings. When used in web-based project (i.e., shiny), +#' the output should have the class `HTML` +test_that("rheroicon class", { + expect_equal( + object = class(rheroicon(name = "academic_cap"))[1], + expected = "html", + label = "Output is not an HTML element" + ) +}) + + +#' Icon Type +#' +#' If the argument `type` is used, is the appropriate icon returned? +#' There are two styles to choose from (solid and outline). Each icon +#' has a slightly different markup and can be evaluated using the +#' class attribute. +test_that("icon type", { + expect_equal( + object = c( + stringr::str_match( + string = rheroicon(name = "rss", type = "outline"), + pattern = "rheroicons_outline" + )[1], + stringr::str_match( + string = rheroicon(name = "rss", type = "solid"), + pattern = "rheroicons_solid" + )[1] + ), + expected = c("rheroicons_outline", "rheroicons_solid"), + label = "Icon types are not properly rendered" + ) +}) + + + +#' Classnames +#' +#' If the argument `classnames` is used, are CSS classes properly +#' appended to the class attribute? +test_that("classnames", { + expect_equal( + object = stringr::str_extract( + string = rheroicon(name = "map", classnames = "my-icons"), + pattern = "class=.([\\w\\s-])+." + ), + expected = "class=\"rheroicons rheroicons_outline rheroicons_map my-icons\"", + label = "css classnames are not properly added" + ) +}) \ No newline at end of file diff --git a/tests/testthat/test-rheroicons.R b/tests/testthat/test-rheroicons.R deleted file mode 100644 index 8a4738d..0000000 --- a/tests/testthat/test-rheroicons.R +++ /dev/null @@ -1,98 +0,0 @@ -#'//////////////////////////////////////////////////////////////////////////// -#' FILE: test-rheroicons.R -#' AUTHOR: David Ruvolo -#' CREATED: 2020-08-10 -#' MODIFIED: 2020-08-10 -#' PURPOSE: icon tests -#' STATUS: in.progress -#' PACKAGES: rheroicons; testthat -#' COMMENTS: NA -#'//////////////////////////////////////////////////////////////////////////// - -#' ~ 1 ~ -#' Evaluate Base Markup -#' Make sure function returns a proper SVG element -test_that("base markup assessment", { - el <- icons$adjustments() - expect_equal( - object = el$name, - expected = "svg", - label = "Primary output is not an SVG element" - ) -}) - - -#' ~ 2 ~ -#' Evaluate Icon Style -#' confirm that argument type returns the proper icon -test_that("evaluation of argument type", { - styles <- c( - icons$adjustments(type = "outline")$attribs$`data-icon-set`, - icons$adjustments(type = "solid")$attribs$`data-icon-set` - ) - expect_equal( - object = styles, - expected = c("outline", "solid"), - label = "Argument 'type' does not return proper icon" - ) -}) - - -#' ~ 3 ~ -#' ID argument -#' confirm that the ID attribute is added to the svg element -test_that("evaluation of argument 'id'", { - el <- icons$adjustments(id = "adjustIcon") - expect_equal( - object = length(el$attribs$id), - expected = 1, - label = "Argument 'id' does not return expected attribute" - ) -}) - - -#' ~ 4 ~ -#' Class argument -#' confirm that user defined css classes are added to existing classes -test_that("evaluation of argument 'class'", { - el <- strsplit( - x = icons$adjustments(class = "my_icon_set")$attribs$class, - split = " " - )[[1]] - expect_equal( - object = el[length(el)], - expected = "my_icon_set", - label = "Argument 'class' does not return user defined class" - ) -}) - - -#' ~ 4 ~ -#' ARIA Hidden Attribute -#' confirm that aria hidden attribute is properly set -test_that("evaluation of argument 'aria_hidden'", { - el <- c( - length(icons$adjustments(aria_hidden = FALSE)$attribs$`aria-hidden`), - length(icons$adjustments(aria_hidden = TRUE)$attribs$`aria-hidden`) - ) - expect_equal( - object = el, - expected = c(0, 1), - label = "Argument 'aria_hidden' does not return expected value" - ) -}) - - - -#' ~ 5 ~ -#' Title Argument -#' confirm that a element is added to the markup -#' (this element should be the first child) -test_that("evaluation of argument 'title'", { - el <- icons$adjustments(title = "Make adjustments") - expect_equal( - object = el$children[[1]]$name, - expected = "title", - label = "'title' element does not render as expected" - ) -}) \ No newline at end of file From fee13c0b05f426543d2a6bb64278eed9984fdc8c Mon Sep 17 00:00:00 2001 From: davidruvolo51 Date: Sun, 6 Sep 2020 18:48:13 +0200 Subject: [PATCH 4/5] rewrote gallery using internal dataset --- R/launch_gallery.R | 322 +++++++++++++++++++++++++++- inst/rheroicons-demo/R/mod_icon.R | 83 ------- inst/rheroicons-demo/app.R | 218 ------------------- inst/rheroicons-demo/www/styles.css | 235 -------------------- 4 files changed, 312 insertions(+), 546 deletions(-) delete mode 100644 inst/rheroicons-demo/R/mod_icon.R delete mode 100644 inst/rheroicons-demo/app.R delete mode 100644 inst/rheroicons-demo/www/styles.css diff --git a/R/launch_gallery.R b/R/launch_gallery.R index 9e0c4de..be96a73 100644 --- a/R/launch_gallery.R +++ b/R/launch_gallery.R @@ -1,20 +1,322 @@ -#' \code{launch_gallery} +#' rheroicons gallery #' -#' This function starts the rheroicons gallery -#' @return This function starts the rheroicons gallery +#' Run the rheroicons gallery and search for icons. Click on an icon +#' name to copy the function to the clipboard. +#' +#' @param ... additional options passed down to runApp #' #' @examples #' \dontrun{ #' rheroicons::launch_gallery() #' } #' -#' @keywords rheroicons gallery demo -#' #' @export -launch_gallery <- function() { - path <- system.file("rheroicons-demo", package = "rheroicons") - if (path == "") { - stop("Demo app does not exist.") +launch_gallery <- function(...) { + shiny::shinyApp(ui = .ui, server = .server, ...) +} + +#' gallery icon list element +#' +#' Create individual clickable component +#' +#' @param id a unique ID for the component +#' @param set icon style +#' @param icon name of the icon +#' +#' @noRd +.gallery__list__element <- function(id, set, icon) { + ns <- shiny::NS(id) + shiny::tags$li( + id = ns("icon"), + class = "icon-item", + shiny::tags$button( + id = ns("icon-copy"), + class = "icon-name icon-button", + `data-value` = paste0( + "rheroicons::rheroicon(", + "name = \"", id, "\", ", + "type = \"", set, "\"", + ")" + ), + htmltools::HTML(icon), + shiny::tags$span(id) + ) + ) +} + + +#' Icon Gallery List +#' +#' render component containing all icons in a rheroicons set +#' +#' @param id a unique ID for the ui component +#' @param set icon set +#' +#' @noRd +.gallery__list <- function(id, set) { + ns <- shiny::NS(id) + + # define elements + parent <- shiny::tags$ul(id = ns("icon-set"), class = "icon-list") + children <- list() + + # outline icons + if (set == "outline") { + lapply(seq_len(length(rheroicons)), function(d) { + + # run nth function + html <- as.character(rheroicons[[d]]$icons$outline) + + # render grandchild element and send to child element + children[[d]] <<- .gallery__list__element( + id = names(rheroicons[d]), + set = "outline", + icon = html + ) + }) + } + + # outline icons + if (set == "solid") { + lapply(seq_len(length(rheroicons)), function(d) { + + # run nth function + html <- as.character(rheroicons[[d]]$icons$solid) + + # render grandchild element and send to child element + children[[d]] <<- .gallery__list__element( + id = names(rheroicons[d]), + set = "solid", + icon = html + ) + }) } - shiny::runApp(path, display.mode = "normal") + + # bind children and return + parent$children <- children + return(parent) +} + +#' rheroicons gallery UI +#' +#' UI for rheroicons galler shiny app +#' +#' @noRd +.ui <- function() { + + shiny::addResourcePath( + prefix = "rheroicons", + directoryPath = system.file( + "inst/rheroicons-demo/www", + package = "rheroicons" + ) + ) + + shiny::tagList( + shiny::tags$head( + shiny::tags$meta(charset = "utf-8"), + shiny::tags$meta( + `http-quiv` = "x-ua-compatible", + content = "ie=edge" + ), + shiny::tags$meta( + name = "viewport", + content = "width=device-width, initial-scale=1" + ), + shiny::tags$link( + rel = "stylesheet", + href = "rheroicons/rheroicons.min.css" + ), + shiny::tags$title("rheroicons") + ), + shiny::tags$nav( + id = "nav", + class = "navbar", + shiny::tags$ul( + class = "menu nav-links", + shiny::tags$li( + class = "menu-item", + shiny::tags$p( + class = "menu-link", + rheroicon(name = "photograph", type = "outline"), + "rheroicons" + ) + ), + shiny::tags$li( + class = "menu-item", + shiny::tags$a( + class = "menu-link", + href = "https://github.com/davidruvolo51/rheroicons", + shiny::tag( + "svg", + list( + height = "30", + width = "30", + role = "img", + viewBox = "0 0 24 24", + xmlns = "http://www.w3.org/2000/svg", + shiny::tag( + "path", + list( + d = "M12 .297c-6.63 0-12 5.373-12 12 0 5.303 3.438 9.8 8.205 11.385.6.113.82-.258.82-.577 0-.285-.01-1.04-.015-2.04-3.338.724-4.042-1.61-4.042-1.61C4.422 18.07 3.633 17.7 3.633 17.7c-1.087-.744.084-.729.084-.729 1.205.084 1.838 1.236 1.838 1.236 1.07 1.835 2.809 1.305 3.495.998.108-.776.417-1.305.76-1.605-2.665-.3-5.466-1.332-5.466-5.93 0-1.31.465-2.38 1.235-3.22-.135-.303-.54-1.523.105-3.176 0 0 1.005-.322 3.3 1.23.96-.267 1.98-.399 3-.405 1.02.006 2.04.138 3 .405 2.28-1.552 3.285-1.23 3.285-1.23.645 1.653.24 2.873.12 3.176.765.84 1.23 1.91 1.23 3.22 0 4.61-2.805 5.625-5.475 5.92.42.36.81 1.096.81 2.22 0 1.606-.015 2.896-.015 3.286 0 .315.21.69.825.57C20.565 22.092 24 17.592 24 12.297c0-6.627-5.373-12-12-12" + ) + ) + ) + ) + ) + ) + ) + ), + shiny::tags$main( + id = "main", + class = "main", + shiny::tags$header( + class = "header", + shiny::tags$h1( + rheroicon(name = "photograph", type = "outline"), + "rheroicons" + ), + shiny::tags$p( + "The", shiny::tags$strong("rheroicons"), "package", + "brings the fantastic SVG", + "icon collection", + shiny::tags$a( + href = "https://github.com/refactoringui/heroicons", + "heroicons" + ), + "to R for use in your R-based web projects." + ), + shiny::tags$cite( + "by", + shiny::tags$a( + href = "https://github.com/davidruvolo51", + "@dcruvolo" + ) + ), + ), + shiny::tags$section( + class = "section", + shiny::tags$h2("Available Icons"), + shiny::tags$p( + "View outline or solid icons. Click an icon to copy the", + "R code to the clipboard." + ), + shiny::tags$form( + class = "form", + shiny::tags$legend("Options"), + shiny::tags$fieldset( + id = "iconSet", + class = "select-input-group hidden", + `data-group` = "iconSet", + shiny::tags$label( + `for` = "select_icon_family", + "Select an Icon Set" + ), + shiny::tags$button( + id = "icon-set", + class = "select-input-parent", + `data-group` = "iconSet", + shiny::tags$span( + class = "select-input-selected", + "-- Choose --" + ), + rheroicon( + name = "chevron_down", + type = "outline", + classnames = "select-input-parent-icon" + ) + ), + shiny::tags$ol( + id = "icon-set-options", + class = "select-input-options hidden", + `data-group` = "iconSet", + shiny::tags$li( + class = "select-input-option", + `data-group` = "iconSet", + shiny::tags$button( + id = "set-option-a", + class = "select-input-option-button", + `data-group` = "iconSet", + `data-value` = "outline", + rheroicon( + name = "check_circle", + type = "solid", + classnames = "selected-icon" + ), + "Outline" + ) + ), + shiny::tags$li( + class = "select-input-option", + `data-group` = "iconSet", + shiny::tags$button( + id = "set-option-b", + class = "select-input-option-button", + `data-group` = "iconSet", + `data-value` = "solid", + rheroicon( + name = "check_circle", + type = "solid", + classnames = "selected-icon" + ), + "Solid" + ) + ) + ) + ) + ), + shiny::uiOutput("icons") + ), + shiny::tags$textarea( + id = "icon-clipboard", + class = "visually-hidden" + ) + ), + shiny::tags$div( + id = "status-success", + class = "status-box", + rheroicon( + name = "thumb_up", + type = "outline" + ), + shiny::tags$p("Successfully copied icon!") + ), + shiny::tags$div( + id = "status-failed", + class = "status-box", + rheroicon( + name = "exclamation", + type = "outline" + ), + shiny::tags$p("Copy Failed") + ), + shiny::tags$script(src = "rheroicons/rheroicons.min.js") + ) +} + + +#' rheroicons server +#' +#' @param input required shiny object +#' @param output required shiny object +#' @param session required shiny object +#' +#' @noRd +.server <- function(input, output, session) { + + outline_gallery <- .gallery__list("outline-icons", "outline") + solid_gallery <- .gallery__list("solid-icons", "solid") + + shiny::observe({ + if (input$iconSet == "outline") { + output$icons <- shiny::renderUI({ + outline_gallery + }) + } + if (input$iconSet == "solid") { + output$icons <- shiny::renderUI({ + solid_gallery + }) + } + }) } \ No newline at end of file diff --git a/inst/rheroicons-demo/R/mod_icon.R b/inst/rheroicons-demo/R/mod_icon.R deleted file mode 100644 index 6ca4fac..0000000 --- a/inst/rheroicons-demo/R/mod_icon.R +++ /dev/null @@ -1,83 +0,0 @@ -#'//////////////////////////////////////////////////////////////////////////// -#' FILE: mod_icon.R -#' AUTHOR: David Ruvolo -#' CREATED: 2020-06-28 -#' MODIFIED: 2020-08-10 -#' PURPOSE: module for icon lists and items -#' STATUS: working -#' PACKAGES: NA -#' COMMENTS: NA -#'//////////////////////////////////////////////////////////////////////////// - -#' ~ 1 ~ -#' icon_ui -#' ui component for
  • element; to be used in following component -#' @param id element id -#' @param set icon family (i.e., outline or solid) -#' @param icon html markup for the icon as a string -icon_list_item_ui <- function(id, set, icon) { - ns <- NS(id) - tags$li( - id = ns("icon"), - class = "icon-item", - tags$button( - id = ns("icon-copy"), - class = "icon-name icon-button", - `data-value` = paste0( - "rheroicons::icons$", - id, - "(type = \"", set, "\")" - ), - HTML(icon), - tags$span(id) - ) - ) -} - - -#' ~ 2 ~ -#' icon_list_ui -#' render
      containing all icons in a rheroicons set -icon_list_ui <- function(id, set) { - ns <- NS(id) - - # define elements - parent <- tags$ul(id = ns("icon-set"), class = "icon-list") - children <- list() - - # outline icons - if (set == "outline") { - lapply(seq_len(length(rheroicons::icons)), function(d) { - - # run nth function - html <- as.character(icons[[d]](type = "outline")) - - # render grandchild element and send to child element - children[[d]] <<- icon_list_item_ui( - id = names(icons[d]), - set = "outline", - icon = html - ) - }) - } - - # outline icons - if (set == "solid") { - lapply(seq_len(length(rheroicons::icons)), function(d) { - - # run nth function - html <- as.character(icons[[d]](type = "solid")) - - # render grandchild element and send to child element - children[[d]] <<- icon_list_item_ui( - id = names(icons[d]), - set = "solid", - icon = html - ) - }) - } - - # bind children and return - parent$children <- children - return(parent) -} \ No newline at end of file diff --git a/inst/rheroicons-demo/app.R b/inst/rheroicons-demo/app.R deleted file mode 100644 index 254b7af..0000000 --- a/inst/rheroicons-demo/app.R +++ /dev/null @@ -1,218 +0,0 @@ -#'//////////////////////////////////////////////////////////////////////////// -#' FILE: app.R -#' AUTHOR: David Ruvolo -#' CREATED: 2020-06-24 -#' MODIFIED: 2020-08-25 -#' PURPOSE: rheroicons demo -#' STATUS: working -#' PACKAGES: shiny; rheroicons -#' COMMENTS: NA -#'//////////////////////////////////////////////////////////////////////////// - -# install -# devtools::install_github("davidruvolo51/rheroicons@dev") -# remove.packages("rheroicons") - -# pkgs -suppressPackageStartupMessages(library(shiny)) -suppressPackageStartupMessages(library(rheroicons)) - -# pre-render icon UIs -outline_ui <- icon_list_ui("outline-icons", "outline") -solid_ui <- icon_list_ui("solid-icons", "solid") - -# ui -ui <- tagList( - singleton( - tags$head( - tags$meta(charset = "utf-8"), - tags$meta(`http-quiv` = "x-ua-compatible", content = "ie=edge"), - tags$meta( - name = "viewport", - content = "width=device-width, initial-scale=1" - ), - tags$link( - rel = "stylesheet", - href = "rheroicons.min.css" - ), - tags$title("rheroicons") - ) - ), - tags$nav( - id = "nav", - class = "navbar", - tags$ul( - class = "menu nav-links", - tags$li( - class = "menu-item", - tags$p( - class = "menu-link", - rheroicons::icons$photograph(type = "outline"), - "rheroicons" - ) - ), - tags$li( - class = "menu-item", - tags$a( - class = "menu-link", - href = "https://github.com/davidruvolo51/rheroicons", - tag( - "svg", - list( - height = "30", - width = "30", - role = "img", - viewBox = "0 0 24 24", - xmlns = "http://www.w3.org/2000/svg", - tag( - "path", - list( - d = "M12 .297c-6.63 0-12 5.373-12 12 0 5.303 3.438 9.8 8.205 11.385.6.113.82-.258.82-.577 0-.285-.01-1.04-.015-2.04-3.338.724-4.042-1.61-4.042-1.61C4.422 18.07 3.633 17.7 3.633 17.7c-1.087-.744.084-.729.084-.729 1.205.084 1.838 1.236 1.838 1.236 1.07 1.835 2.809 1.305 3.495.998.108-.776.417-1.305.76-1.605-2.665-.3-5.466-1.332-5.466-5.93 0-1.31.465-2.38 1.235-3.22-.135-.303-.54-1.523.105-3.176 0 0 1.005-.322 3.3 1.23.96-.267 1.98-.399 3-.405 1.02.006 2.04.138 3 .405 2.28-1.552 3.285-1.23 3.285-1.23.645 1.653.24 2.873.12 3.176.765.84 1.23 1.91 1.23 3.22 0 4.61-2.805 5.625-5.475 5.92.42.36.81 1.096.81 2.22 0 1.606-.015 2.896-.015 3.286 0 .315.21.69.825.57C20.565 22.092 24 17.592 24 12.297c0-6.627-5.373-12-12-12" - ) - ) - ) - ) - ) - ) - ) - ), - tags$main( - id = "main", - class = "main", - tags$header( - class = "header", - tags$h1( - rheroicons::icons$photograph(type = "outline"), - "rheroicons" - ), - tags$p( - "The", tags$strong("rheroicons"), "package", - "brings the fantastic SVG", - "icon collection", - tags$a( - href = "https://github.com/refactoringui/heroicons", - "heroicons" - ), - "to R for use in your R-based web projects." - ), - tags$cite( - "by", - tags$a( - href = "https://github.com/davidruvolo51", - "@dcruvolo" - ) - ), - ), - tags$section( - class = "section", - tags$h2("Available Icons"), - tags$p( - "View outline or solid icons. Click an icon to copy the", - "R code to the clipboard." - ), - tags$form( - class = "form", - tags$legend("Options"), - tags$fieldset( - id = "iconSet", - class = "select-input-group hidden", - `data-group` = "iconSet", - tags$label( - `for` = "select_icon_family", - "Select an Icon Set" - ), - tags$button( - id = "icon-set", - class = "select-input-parent", - `data-group` = "iconSet", - tags$span( - class = "select-input-selected", - "-- Choose --" - ), - icons$chevron_down( - type = "outline", - aria_hidden = TRUE, - class = "select-input-parent-icon" - ) - ), - tags$ol( - id = "icon-set-options", - class = "select-input-options hidden", - `data-group` = "iconSet", - tags$li( - class = "select-input-option", - `data-group` = "iconSet", - tags$button( - id = "set-option-a", - class = "select-input-option-button", - `data-group` = "iconSet", - `data-value` = "outline", - icons$check_circle( - type = "solid", - aria_hidden = TRUE, - class = "selected-icon" - ), - "Outline" - ) - ), - tags$li( - class = "select-input-option", - `data-group` = "iconSet", - tags$button( - id = "set-option-b", - class = "select-input-option-button", - `data-group` = "iconSet", - `data-value` = "solid", - icons$check_circle( - type = "solid", - aria_hidden = TRUE, - class = "selected-icon" - ), - "Solid" - ) - ) - ) - ) - ), - uiOutput("icons") - ), - tags$textarea( - id = "icon-clipboard", - class = "visually-hidden" - ) - ), - tags$div( - id = "status-success", - class = "status-box", - icons$thumb_up(type = "outline", aria_hidden = TRUE), - tags$p("Successfully copied icon!") - ), - tags$div( - id = "status-failed", - class = "status-box", - icons$exclamation(type = "outline", aria_hidden = FALSE), - tags$p("Copy Failed") - ), - tags$script(src = "rheroicons.min.js") -) - -# server -server <- function(input, output, session) { - - observe({ - if (input$iconSet == "outline") { - output$icons <- renderUI({ - outline_ui - }) - } - if (input$iconSet == "solid") { - output$icons <- renderUI({ - solid_ui - }) - } - }) -} - - -# app -shinyApp(ui, server) \ No newline at end of file diff --git a/inst/rheroicons-demo/www/styles.css b/inst/rheroicons-demo/www/styles.css deleted file mode 100644 index 8d74513..0000000 --- a/inst/rheroicons-demo/www/styles.css +++ /dev/null @@ -1,235 +0,0 @@ -/* vars */ - -:root { - --text: #3f454b; - --dark: #252525; - --light: #f6f6f6; - --blue: #507dbc; - --blue-light: #a6bbda; - --green: #92AC99; - --shadow: hsla(0, 0%, 0%, 0.18); -} - -/* reset tags */ - -html, body { - padding: 0; - margin: 0; - font-family: Arial, Helvetica, sans-serif; - font-size: 16pt; -} - -header, main, section, form, footer { - padding: 0; - margin: 0; -} - -h1, h2, h3 { - color: var(--dark); - padding: 0; - margin: 0; - margin-bottom: 12px; - line-height: 1.4; -} - -p { - color: var(--text); - padding: 0; - margin: 12px 0; - line-height: 1.6; -} - -button { - display: block; - margin: 0; - font-weight: 600; - text-transform: uppercase; - letter-spacing: 2px; - font-size: 12pt; - background-color: transparent; - padding: 6px 0; - border-radius: 6px; - border: 2px solid transparent; - cursor: pointer; -} - -/* visually hidden contet */ - -.visually-hidden { - position: absolute; - width: 1px; - height: 1px; - margin: -1px; - clip: rect(1px, 1px, 1px, 1px); - clip: rect(1px 1px 1px 1px); - overflow: hidden; - white-space: nowrap; -} - -/* menu */ - -.menu { - list-style: none; - margin: 0; - padding: 0; -} - -.menu .menu-item { - margin: 0; -} - -.menu .menu-item .menu-link { - text-transform: uppercase; - margin-right: 16px; - letter-spacing: 2px; - font-size: 11pt; - font-weight: 600; -} - -.menu .menu-item:last-child .menu-link { - margin-right: 0; -} - -/* navbar */ - -.navbar { - position: fixed; - top: 0; - left: 0; - display: grid; - grid-template-columns: 3fr 1fr; - width: 100%; - background-color: #ffffff; - -webkit-box-shadow: 0 3px 6px 2px var(--shadow); - box-shadow: 0 3px 6px 2px var(--shadow); - z-index: 3; -} - -.navbar .menu { - display: flex; - align-items: center; - box-sizing: content-box; - padding: 8px 32px; -} - -.navbar .menu .menu-item { - display: flex; - align-items: center; -} - -.navbar .menu .menu-item .menu-link { - color: var(--blue); - padding-bottom: 4px; - text-decoration: none; -} - -.navbar .menu .menu-item .menu-link:hover, .navbar .menu .menu-item .menu-link:focus { - box-shadow: inset 0 -3px 0 0 var(--blue); -} - -.navbar .menu.nav-links { - justify-content: flex-start; -} - -.navbar .menu.menu-options { - justify-content: flex-end; -} - -.navbar .menu.menu.menu-options .menu-item { - margin-right: 16px; -} - -.navbar .menu .menu-item .menu-link .rheroicons { - position: relative; - top: 3px; - width: 18px; - height: 18px; -} - -/* hero */ -.hero { - display: flex; - justify-content: center; - align-items: center; - width: 100%; - min-height: 100vh; -} - -.hero .hero-child { - display: block; - width: 100%; - height: 100vh; -} - -.hero .hero-child.hero-image { - position: absolute; - background-image: url(jacek-dylag-nhCPOp4A2Xo-unsplash.jpg); - background-size: cover; - background-position: 50% 50%; - background-repeat: no-repeat; -} - -.hero .hero-child.hero-content { - position: relative; - display: flex; - justify-content: flex-start; - align-items: center; - width: 100%; - margin: 0 auto; - background-color: transparent; - z-index: 2; -} - -.hero .hero-child.hero-content div { - width: 90%; - margin: 0 auto; - padding: 16px; - background-color: white; -} - -.hero .hero-child h1 { - font-size: 13pt; - text-transform: uppercase; - letter-spacing: 2px; - font-weight: bold; -} - -.hero .hero-content h2 { - font-size: 24pt; - letter-spacing: 1.6px; -} - -/* main */ -.main { - margin-top: 52px; - width: 100%; -} - -.main .section { - width: 90%; - margin: 0 auto; -} - -@media (min-width: 562px) { - .hero .hero-child.hero-image { - position: static; - width: 40%; - height: 100vh; - } - .hero .hero-child.hero-content { - width: 60%; - background-color: var(--light); - } - .hero .hero-child.hero-content div { - position: relative; - left: -5em; - background-color: #ffffff; - border-radius: 6px; - } -} - -@media (min-width: 972px) { - .main .section { - width: 972px; - } -} \ No newline at end of file From fcd3705e3e98e34a7f5c04dc4f8eb48aa2876b6a Mon Sep 17 00:00:00 2001 From: davidruvolo51 Date: Sun, 6 Sep 2020 18:49:13 +0200 Subject: [PATCH 5/5] updated package dependencies and README --- DESCRIPTION | 8 +++++-- NAMESPACE | 2 +- NEWS.md | 11 +++++++++ README.md | 64 +++++++++++++++++++++++++++++----------------------- package.json | 2 +- yarn.lock | 6 ++--- 6 files changed, 58 insertions(+), 35 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index 567e486..fe9ab66 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: rheroicons Title: The Heroicons library for use in R-based web projects -Version: 0.1.6 +Version: 0.2.0 Authors@R: person(given = "David", family = "Ruvolo", @@ -15,6 +15,10 @@ Roxygen: list(markdown = TRUE) RoxygenNote: 7.1.0 Imports: htmltools (>= 0.5.0), - shiny (>= 1.5.0) + shiny (>= 1.5.0), + cli, + stringr Suggests: testthat +Depends: + R (>= 2.10) diff --git a/NAMESPACE b/NAMESPACE index 1789786..3976463 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -1,4 +1,4 @@ # Generated by roxygen2: do not edit by hand -export(icons) export(launch_gallery) +export(rheroicon) diff --git a/NEWS.md b/NEWS.md index 0398570..903cc5b 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,3 +1,14 @@ +# rheroicons 0.2.0 + +* New package structure :rocket: icons are now generated using the function `rheroicon`. Select an icon using the argument `name`. Icons can be found in the gallery via `launch_gallery()` function. Use the argument `type` to return define the icon style as `outline` or `solid`. Icons can be further customized by passing additional css classes using the `classnames` argument. +* Restructured rheroicons gallery as icons are available using an internal dataset. The gallery's ui, server, and modules are now located in `R/launch_gallery.R`. Static assets are still located in `inst/rheroicons-demo`. +* Rewrote unit tests + +## rheroicons 0.1.6 + +* Updated to heroicons `v0.4.0` +* Redesigned icon gallery + ## rheroicons 0.1.5 * Restructured `outline` and `solid` icon lists to `icons`. Rendering icon style is now done using the `type` argument. By default, `type = "outline"`. diff --git a/README.md b/README.md index a35fb8a..a1c6c23 100644 --- a/README.md +++ b/README.md @@ -10,38 +10,37 @@ The `rheroicons` provides access to the fantastic SVG icon collection [heroicons ## Install +Use `devtools` or `remotes` to install the `rheroicons`. + ```r devtools::install_github("davidruvolo51/rheroicons") ``` -Use the rheroicons gallery to view all of the icons included in this package: [davidruvolo.shinyapps.io/rheroicons-demo/](https://davidruvolo.shinyapps.io/rheroicons-demo/). Alternatively, you can run the gallery locally. + +## Use + +There are well over a 200 icons in the collection and each icon has two styles (outline and solid). Icons can be found via the icon gallery. Click an icon name to copy the R code used to generate that icon. ```r rheroicons::launch_gallery() ``` -## Use - -There are well over a hundred icons in the collection and each icon has two styles (outline and solid). All icons are available in the object `icons`. +Icons are created using the `rheroicon` function. ```r # rheroicons version of `document-add` -rheroicons::icons$document_add() +rheroicons::rheroicon(name = "document_add") ``` -\***NOTE** All icons that have a dash (`-`) in the original name were renamed using underscores (`_`). +\***NOTE**: You can use the [heroicons](https://heroicons.com) site to find icons. All icons that have a dash (`-`) in the original name were renamed using underscores (`_`). ### Arguments All functions take the following arguments. +- `name`: an icon name - `type`: select the icon style (either `outline` or `solid`; default `outline`) -- `id`: a unique ID to be applied to the SVG icon -- `class`: a CSS class to be applied to the SVG icon -- `aria_hidden`: should the icon be readable or hidden from screen readers (default `FALSE`) -- `title`: add a title that describes the purpose for using the icon (ideal when `aria_hidden` is `FALSE`) - -*Note: The attribute `aria_hidden` is ideal for purely aesthetic icons* +- `classnames`: a CSS class to be applied to the SVG icon ```r library(shiny) @@ -49,21 +48,28 @@ tags$button( id = "copy", class = "btn", tags$span("Add to clipboard"), - rheroicons::icons$clipboard_copy( - id = "copy-btn-icon", - class = "button-icons", + rheroicons::rheroicon( + name = "clipboard_copy", type = "solid", - aria_hidden = TRUE + classnames = "btn__icons" ) ) ``` +\***NOTE**: the default icon type is `outline` + + ### Customizing the appearance of icons -Use the arguments `id` and `class` to define a custom identifier that can be used to select in CSS or JavaScript. +Use the argument `class` to define a custom css classes that can be used to select icons via CSS or JavaScript. ```r -rheroicons::icons$clipboard_copy(type = "outline", id = "copy-icon", class = "my-icon-set") +# clipboard_copy icon +rheroicons::rheroicon( + name = "clipboard_copy", + type = "outline", + class = "my__ui__icons" +) ``` However, you may find it easier to use the predefined classes generated by this package. All icons have three types of CSS classes. @@ -76,12 +82,14 @@ The following table displays the CSS clases by set for the `arrow_circle_down` i set | rheroicons function | rheroicons css classes :------ | :------------------ | :--------- -outline | `icons$arrow_circle_down(type = "outline")` | `rheroicons rheroicons_outline rheroicons_arrow_circle_down` -solid | `icons$arrow_circle_down(type = "solid")` | `rheroicons rheroicons_solid rheroicons_arrow_circle_down` +outline | `rheroicon(name ="arrow_circle_down", type = "outline")` | `rheroicons rheroicons_outline rheroicons_arrow_circle_down` +solid | `rheroicon(name ="arrow_circle_down", type = "solid")` | `rheroicons rheroicons_solid rheroicons_arrow_circle_down` In the Shiny UI, you can select items and style icons through CSS. Create a new `tags$style` element and define your styles (or use an external CSS file). ```r +library(shiny) + # ui ui <- tagList( tags$head( @@ -149,18 +157,18 @@ ui <- tagList( tags$main( tags$h2("rheroicons"), tags$div( - icons$arrow_circle_down(type = "outline"), - icons$arrow_circle_up(type = "outline"), - icons$arrow_circle_left(type = "outline"), - icons$arrow_circle_right(type = "outline") + rheroicon(name = "arrow_circle_down"), + rheroicon(name = "arrow_circle_up"), + rheroicon(name = "arrow_circle_left"), + rheroicon(name = "arrow_circle_right") ), tags$div( - icons$chart_bar(type = "solid"), - icons$chart_bar(type = "outline"), + rheroicon(name = "chart_bar", type = "solid"), + rheroicon(name = "chart_bar") ), tags$div( - icons$home(type = "solid"), - icons$home(type = "outline"), + rheroicon(name = "home", type = "solid"), + rheroicon(name = "home") ) ) ) diff --git a/package.json b/package.json index 5aea90b..53e47b7 100644 --- a/package.json +++ b/package.json @@ -1,6 +1,6 @@ { "name": "rheroicons", - "version": "0.1.6", + "version": "0.2.0", "author": "dcruvolo", "license": "MIT", "scripts": { diff --git a/yarn.lock b/yarn.lock index e574f0b..9d69a7d 100644 --- a/yarn.lock +++ b/yarn.lock @@ -2904,9 +2904,9 @@ hash.js@^1.0.0, hash.js@^1.0.3: minimalistic-assert "^1.0.1" heroicons@^0.4.0: - version "0.4.0" - resolved "https://registry.yarnpkg.com/heroicons/-/heroicons-0.4.0.tgz#6472b022bd689820ad49cbc84694d6f3a255fa30" - integrity sha512-CCPEBzBOJrliia0QL5tbR2E5MNlcrYcJhEB4m758RKh7h0vf9BjCqeOzKkIvASYPdOVld546Tixkg2i5ZAnkgA== + version "0.4.2" + resolved "https://registry.yarnpkg.com/heroicons/-/heroicons-0.4.2.tgz#edaffde42d14bffdd456f0566fd9b8e295ad69e2" + integrity sha512-24Bc6LKmamKHzGiNC80/r9v/7pQrma2V5KlaLUHGoarqm+hggmxnngU+RjHQT8sANWPa5FWKLftn4fpmvry/7w== hex-color-regex@^1.1.0: version "1.1.0"