Skip to content
Please note that GitHub no longer supports your web browser.

We recommend upgrading to the latest Google Chrome or Firefox.

Learn more
Permalink
Browse files

Bring back export

So we do need to export all functions for this to work
  • Loading branch information...
adam3smith committed Feb 9, 2019
1 parent 165dde3 commit efbdb4e7c6c6866d7e488db2fee681a77d57091a
@@ -5,6 +5,7 @@ export(archiv.fromText)
export(archiv.fromUrl)
export(archiv_perma)
export(archiv_wayback)
export(check_folder)
export(extract_urls_from_folder)
export(extract_urls_from_text)
export(extract_urls_from_webpage)
@@ -14,6 +15,8 @@ export(get_api_key)
export(get_default_folder)
export(get_folder_id)
export(get_folder_ids)
export(get_subfolders)
export(list_string)
export(set_api_key)
export(set_folder_id)
export(view_archiv)
@@ -21,7 +21,7 @@

#' Archivr: Save Your Websites in Perma.cc or the Wayback Machine
#'
#' Archivr is a toolkit for the long-run archiving of Qualitative data.
#' Archivr is a toolkit for the long-run archiving of qualitative data.
#' It takes a list of urls and uses either the perma.cc or Wayback Machine
#' archives to store the webpages for future reference. It will also parse
#' documents or webpages for urls to be archived.
@@ -128,7 +128,7 @@ archiv <- function (url_list, method="wayback") {


#' Creates a json string from a list of urls.
#'
#' @export
#' @param url_list A list of urls.
#' @return A json string representing the list.
list_string <- function (url_list) {
@@ -470,6 +470,7 @@ extract_urls_from_folder <- function (fp) {
#' Works with get_subfolders to flatten the folder ids tree
#' @param folder_list a list of perma.cc folder objects
#' @return A list of vectors with the id and name.
#' @export

check_folder <- function(folder_list) {
if (is.null(folder_list)) {
@@ -485,6 +486,7 @@ check_folder <- function(folder_list) {
#' @param id A folder id
#' @importFrom jsonlite fromJSON
#' @return A list of vectors with the id and name.
#' @export
get_subfolders <- function (id) {
perma_cc_key <- get('perma_cc_key', envir=archiv_env)
if (perma_cc_key == "") {
@@ -530,7 +532,7 @@ get_folder_id <- function () {

#' Get the perma.cc folder ids starting from the default folder.
#'
#' Use this to find the id of the perma.cc folder you want to set via [archivr::set_folder_id()].
#' Use this to find the id of the perma.cc folder you want to set via [set_folder_id()].
#' Requires API key to be set via [archivr::set_api_key()]
#' @importFrom jsonlite fromJSON
#' @export

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

Some generated files are not rendered by default. Learn more.

0 comments on commit efbdb4e

Please sign in to comment.
You can’t perform that action at this time.